Re: How to plot divergence of gradient as contour plot

*To*: mathgroup at smc.vnet.net*Subject*: [mg124034] Re: How to plot divergence of gradient as contour plot*From*: Bob Hanlon <hanlonr357 at gmail.com>*Date*: Fri, 6 Jan 2012 04:18:47 -0500 (EST)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com*References*: <201201051100.GAA14785@smc.vnet.net>

Needs["VectorAnalysis`"] coord = Cartesian[x, y, z]; ContourPlot[ Evaluate[Div[Grad[Sin[x + y], coord], coord]], {x, -5, 5}, {y, -5, 5}] Or f[x_, y_] = Div[Grad[Sin[x + y], coord], coord]; ContourPlot[f[x, y], {x, -5, 5}, {y, -5, 5}] Bob Hanlon On Thu, Jan 5, 2012 at 6:00 AM, Szymon Roziewski <szymon.roziewski at gmail.com> wrote: > Hello there, > > I am concerning to plot something like that. > > ContourPlot[Divergence[Gradient[Sin[x + y]]], {x, -5, 5}, {y, -5, 5}] > > Plotting divergence of gradient scalar field. > How can I manage to do that? > > Best regards, > Szymon Roziewski

**References**:**How to plot divergence of gradient as contour plot***From:*Szymon Roziewski <szymon.roziewski@gmail.com>