Back

12.wxmx

/ Compute Divergence of a vector field. /

load("vect")$;

F(x,y,z):=read("Enter your Function (like [x,2y,exp(zy)]):");

Div:div(F(x,y,z));

Express_div:express(Div);

Solutiondiv:ev(Expressdiv,diff);