Advanced Search

mehdi jafari

749 Reputation

13 Badges

12 years, 106 days
Contact mehdi jafari

MaplePrimes Activity


These are questions asked by mehdi jafari

complex plot of an expression in "r" and...

mehdi jafari 749 Maple
syntax complexplot plotting
July 16 2022
1 1

how can i plot this complex expression with polar plot and 3d complex plot? i want both 2d polar form and 3d plot of this.
thnx for the help

> 

restart:with(plots,complexplot,implicitplot)

[complexplot, implicitplot]

 (1)
> 

f:=(r,theta)->I*sinh(theta-Pi/6)+cos(Pi/4)=r;

proc (r, theta) options operator, arrow; I*sinh(theta-(1/6)*Pi)+cos((1/4)*Pi) = r end proc

 (2)
> 

complexplot(f(r,theta), r = 0 .. 1, theta = 0 .. 2*Pi, coords=polar);
 

Error, (in plot) incorrect first argument [1/2*2^(1/2)-Im(sinh(theta-1/6*Pi)) = Re(r), Re(sinh(theta-1/6*Pi)) = Im(r), r = 0 .. 1]

  
> 

 

Download complexplot.mw

solve nonlinear double integral and plot...

mehdi jafari 749 Maple
integration plotting
July 11 2022
1 0

hi everyone
i have a nonlinear double int which want to be solved and then plot against "z" variable.
INT_problem.mw
tnx in advance

summation problem...

mehdi jafari 749 Maple
sum product
March 28 2022
1 7

How i can i write the code for the last equation which includes summations and one product in the picture? tnx for the help.

factor differential operators...

mehdi jafari 749 Maple
factorization differential-equations dfactor
September 08 2021
3 2

i have two equations;i.g eq1 and eq2. i want to factor psi(x,t) in eq2 using linear differential operators and substitute it in equation 1. could anyone help?


 

> 

restart:with(DEtools):
> 

eq1:=E*D(II)(x)*D[1](psi)(x,t)+E*II(x)*(D[1]@@2)(psi)(x,t)-G*A(x)*psi(x,t)+G*A(x)*D[1](v)(x,t)

E*(D(II))(x)*(D[1](psi))(x, t)+E*II(x)*(D[1, 1](psi))(x, t)-G*A(x)*psi(x, t)+G*A(x)*(D[1](v))(x, t)

 (1)
> 

convert(eq1,diff)

E*(diff(II(x), x))*(diff(psi(x, t), x))+E*II(x)*(diff(diff(psi(x, t), x), x))-G*A(x)*psi(x, t)+G*A(x)*(diff(v(x, t), x))

 (2)
> 

eq2:=-(G*D[1](A)(x)*psi(x,t)+G*A(x)*D[1](psi)(x,t))+(G*D[1](A)(x)*v(x,t))+G*A(x)*(D[1]@@2)(v)(x,t)-m(x)/G*D[2](v)(x,t)

-G*(D(A))(x)*psi(x, t)-G*A(x)*(D[1](psi))(x, t)+G*(D(A))(x)*v(x, t)+G*A(x)*(D[1, 1](v))(x, t)-m(x)*(D[2](v))(x, t)/G

 (3)
> 

convert(%,diff)

-G*(diff(A(x), x))*psi(x, t)-G*A(x)*(diff(psi(x, t), x))+G*(diff(A(x), x))*v(x, t)+G*A(x)*(diff(diff(v(x, t), x), x))-m(x)*(diff(v(x, t), t))/G

 (4)
> 

isolate(convert(eq2,diff),psi)

psi = (proc (x, t) options operator, arrow; -(G^2*A(x)*(diff(psi(x, t), x))-G^2*(diff(A(x), x))*v(x, t)-G^2*A(x)*(diff(diff(v(x, t), x), x))+m(x)*(diff(v(x, t), t)))/(G^2*(diff(A(x), x))) end proc)

 (5)
> 

eval(eq1,psi(x,t)=rhs((isolate(eq2,psi))(x,t))):convert(%,diff)

E*(diff(II(x), x))*(diff(psi(x, t), x))+E*II(x)*(diff(diff(psi(x, t), x), x))+A(x)*(G^2*A(x)*(diff(_XX(x, t), x))-G^2*A(x)*(diff(diff(v(x, t), x), x))-G^2*(diff(A(x), x))*v(x, t)+m(x)*(diff(v(x, t), t)))/(G*(diff(A(x), x)))+G*A(x)*(diff(v(x, t), x))

 (6)
> 

 

> 

 

> 

 


 

Download Dd.mw

pdsolve with piecewise boundary conditio...

mehdi jafari 749 Maple
pde pdsolve differential-equations
July 11 2021
1 0

I have a question? from the link: https://www.maplesoft.com/applications/view.aspx?SID=5084&view=html

How can we solve equation 2.1 to achieve solution 3.1 with boundary conditions explained in section " 1) Gaussian solution " ?
is this possible with maple?

Download pdsolve.mw

 

2 3 4 5 6 7 8 Last Page 4 of 25