Kombinationen von div, rot und grad

Kartesische Koordinaten

div rot

Remove["Global`*"]
Needs["Calculus`VectorAnalysis`"]
SetCoordinates[Cartesian]
fx=           ; (* Funktion eingeben *)
fy=           ; (* Funktion eingeben *)
fz=           ; (* Funktion eingeben *)
vecf={fx,fy,fz}
Div[Curl[vecf]]

grad div

Remove["Global`*"]
Needs["Calculus`VectorAnalysis`"]
SetCoordinates[Cartesian]
fx=           ; (* Funktion eingeben *)
fy=           ; (* Funktion eingeben *)
fz=           ; (* Funktion eingeben *)
vecf={fx,fy,fz}
Grad[Div[vecf]]