delvin

55 Reputation

5 Badges

2 years, 186 days

MaplePrimes Activity


These are replies submitted by delvin

@nm 

These are the steps that I wrote in order.

@Alfred_F 

Thanks

@Alfred_F 

No, there is no need for the equation you mentioned. With those substitutions in the image, the equation is completely solved.

@nm 

Thanks, but those parts are very important to me, for example, f is X and the derivative of f is Y and the rest.

@nm 

Hi,

How do we get from equation 1 to equation 3 with Maple by converting equations 2?

 


 

 

 

pde:=i*diff(varphi[n](x,t),x)+(1+mu*(abs(varphi[n](x,t)))^(2))*(varphi[n+1](x,t)*exp(ik)+varphi[n-1](x,t)*exp(-ik))-nu*(abs(varphi[n](x,t)))^(2)*varphi[n](x,t)=0

i*(diff(varphi[n](x, t), x))+(1+mu*abs(varphi[n](x, t))^2)*(varphi[n+1](x, t)*exp(ik)+varphi[n-1](x, t)*exp(-ik))-nu*abs(varphi[n](x, t))^2*varphi[n](x, t) = 0

(1)

``

 

 

 

 

varphi[n](x,t)=chi[n]*exp(-i*vartheta*tau)

varphi[n](x, t) = chi[n]*exp(-i*vartheta*tau)

(2)

 

subs(varphi[n](x,t)=chi[n]*exp(-i*vartheta*tau),pde);

i*(diff(chi[n]*exp(-i*vartheta*tau), x))+(1+mu*abs(chi[n]*exp(-i*vartheta*tau))^2)*(varphi[n+1](x, t)*exp(ik)+varphi[n-1](x, t)*exp(-ik))-nu*abs(chi[n]*exp(-i*vartheta*tau))^2*chi[n]*exp(-i*vartheta*tau) = 0

(3)

 

q:=simplify(%);

exp(-2*Re(i*vartheta*tau)+ik)*mu*varphi[n+1](x, t)*abs(chi[n])^2-nu*abs(chi[n])^2*exp(-2*Re(i*vartheta*tau)-i*vartheta*tau)*chi[n]+exp(-2*Re(i*vartheta*tau)-ik)*mu*varphi[n-1](x, t)*abs(chi[n])^2+varphi[n+1](x, t)*exp(ik)+varphi[n-1](x, t)*exp(-ik) = 0

(4)

``


 

Download convert.mw

@Mariusz Iwaniuk 

Much obliged.

@nm 

I appreciate it.

@mmcdara

 thanks

Hi, 

Help 

@Carl Love 

Thank you for taking the time to do this.

@Carl Love 

I change 𝛯(𝜑), but it gives an error, what is the reason?

solutions:

 

J03.mw

@Carl Love 

I’M REALLY GRATEFUL.

@dharr 

The program does not run and the system hangs.

@dharr 

I wrote Jacobi correctly in the program.

what does it mean?

you can help me?

1 2 3 4 5 6 7 Page 1 of 8