Message Boards Message Boards

0
|
3685 Views
|
4 Replies
|
1 Total Likes
View groups...
Share
Share this post:

Solve this mixed partial differential equation

Posted 4 years ago

This is my QS: enter image description here This is my Code:

POSTED BY: Yuhai Xiang
4 Replies

enter image description here So you have the system and is underdetermined. That means the indicated function does not include enough equations to specify a solution.

POSTED BY: Mariusz Iwaniuk
Posted 4 years ago

Thanks

POSTED BY: Yuhai Xiang
Posted 4 years ago

I add more equation as:

enter image description here

This is my code

It is still not solvable.

POSTED BY: Yuhai Xiang

I tried with DSolve and NDSolve, but Mathematica fails.

With Maple 2020 I have: enter image description here

Translating to Mathematica code:

    ClearAll["`*"]
    sol = {R[z] -> R0*Exp[((Log[U0/UL] + 2*I*Pi*n)*z)/(2 L)], 
      u[z] -> U0/
       Exp[((Log[U0/UL] + 2*I*Pi*n)*z)/(2 L)]^2};(*  n\[Element]Integers *)

   u[z] /. sol[[2]] /. 
    z -> 0(*The equation satisfy a initial condition u[0]=U0 *)

    (* U0 *)

    {sol[[1]] /. n -> 0, sol[[2]] /. n -> 0}(*for n=0*)

    (* {R[z] -> R0 (U0/UL)^(z/(2 L)), u[z] -> U0 (U0/UL)^(-(z/L))} *)
POSTED BY: Mariusz Iwaniuk
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard

Group Abstract Group Abstract