Advanced Search

Question: Typesetting:-delayDotProduct

Question:Typesetting:-delayDotProduct

wndrslope 15 Maple
physics vectorcalculus
September 13 2017
2

I ran into this problem when trying to do some symbolic vector calculus using the with(Physics[Vectors]) package. I have uploaded my document (at least I hope it uploads correctly). I use 1-D math input because I learned maple 13 years ago.

Thanks for any help you all can provide.

Cheers,

Dave
 

``

Problem 3-1

 

typsetting issue

 
> 

restart; with(Physics[Vectors]): Setup(mathematicalnotation=true);
#Coordinates(cartesian); Coordinates(X = [x,y,z,t])

[mathematicalnotation = true]

(1.1.1)
> 

D1:=D1_(t,x,y,z);
B:=B_(t,x,y,z);
E:=E_(t,x,y,z);
j__p:=j__p_(t,x,y,z);

D1_(t, x, y, z)

 

B_(t, x, y, z)

 

E_(t, x, y, z)

 

j__p_(t, x, y, z)

(1.1.2)
> 

f1:=epsilon=epsilon__0+rho/(B_.B_);

epsilon = epsilon__0+rho/Physics:-Vectors:-Norm(B_)^2

(1.1.3)
> 

f2:=%Divergence(D1_)=0;
f3:=%Divergence(epsilon*E_)=0;

%Divergence(D1_) = 0

 

%Divergence(epsilon*E_) = 0

(1.1.4)

poisson equation and assume sigma is sigma__p

> 

f4:=epsilon__0*%Divergence(E_)=sigma__p(t);

epsilon__0*%Divergence(E_) = sigma__p(t)

(1.1.5)
> 

f5:=diff(sigma__p(t),t)+%Divergence(j__p_)=0;
f6:=j__p=n*e(v__i_p-v__e_p);
f7:=j__p=n/(B_.B_)*(m__i+m__e)*Diff(E_,t);
f8:=j__p=rho/(B_.B_)*Diff(E_,t);

diff(sigma__p(t), t)+%Divergence(j__p_) = 0

 

j__p_(t, x, y, z) = n*e(v__i_p-v__e_p)

 

j__p_(t, x, y, z) = n*(m__i+m__e)*(Diff(E_, t))/Physics:-Vectors:-Norm(B_)^2

 

j__p_(t, x, y, z) = rho*(Diff(E_, t))/Physics:-Vectors:-Norm(B_)^2

(1.1.6)
> 

f9:=Diff(f2,t);
f10:=Diff(f3,t);
f11:=Diff(f4,t);

Diff(%Divergence(D1_) = 0, t)

 

Diff(%Divergence(epsilon*E_) = 0, t)

 

Diff(epsilon__0*%Divergence(E_) = sigma__p(t), t)

(1.1.7)

``


 

Download Typesetting-delayDotProduct.mw
Please Wait...