       Re: Partial Differential Equation

• To: mathgroup at smc.vnet.net
• Subject: [mg26663] Re: [mg26623] Partial Differential Equation
• From: Reza Malek-Madani <research at usna.edu>
• Date: Wed, 17 Jan 2001 00:47:18 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```Dear Phillipe:  You need to write a shooting method or use the Galerkin
scheme to solve a nonlinear BVP. Here is how you can use the shooting
method in Mathematica for your equation:

tfinal = 1; b1 = 0;
F[b_] := Module[{sol},
sol = NDSolve[{T'[t] == S[t],
S'[t] == -1/(t + 0.05) S[t] + 10^(-8) T[t]^4,
T == b, S == -0.07}, {T, S}, {t, 0, tfinal}];
First[Evaluate[S[t]] /. sol /. t -> tfinal]]

shoot=FindRoot[F[b] - b1, {b, 1, 0.9}];

sol=NDSolve[{T'[t] == S[t], S'[t]== -1/(t + 0.05) S[t] + 10^(-8) T[t]^4,
T == b/. shoot, S == -0.07}, {T, S}, {t, 0, tfinal}];

Plot[Evaluate[S[t]/.sol], {t,0,tfinal}]

Galerkin method is particularly useful if you have a nonlinear PDE or a
system of ODEs in higher than two dimensions.

Reza.

-------------------------------------------------------------------------
Research Office, MS 10m         Phone: 410-293-2504 (FAX -2507)
U.S. Naval Academy              Nimitz Room 17 in ERC
Annapolis MD 21402-5031         Email: research at usna.edu

--------------------------------------------------------------------------

On Sat, 13 Jan 2001, P. Poinas wrote:

> Dear Group,
>
> I am trying to solve the following problem:
>
> \!\(\(\(NDSolve[{\(T''\)[R] + \((1/\((R + 0.05)\))\)\ \(T'\)[R] -
>           10\^\(-8\)\ \ T[R]\^4 == 0, \(T'\) == \(-0.07\), \
> \(T'\) ==
>         0}, \ T, \ {R, \ 0, \ 1}]\)\(\ \)\)\)
>
> and I get the following message:
>
> NDSolve::"inrhs": "Differential equation does not evaluate to a number
> or the \
> equation is not an nth order linear ordinary differential equation."
>
> I know that this error is because I am defining the derivative at 2
> different R values:
>
> at R=0, T'[0 ]= -0.07
> and R=1, T' = 0
>
> hence it is not an initial boundary condition.
>
> 1) How can I turn around the problem?
>
>
> Actually, I found the Mathematica Book (V4) very weak on the subject. In
> page 924, it seems possible in In to find a solution to a linear
> differential equation, even with 2 boundary conditions defined at 2
> different x values! My problem being not linear cannot therefore be
> solved. But Mathematica does not mentioned the linearity as a show
> stopper.
>
> 2) Does anybody know a better description of Mathematica's capacity?
>
>         Thank you for helping me,
>
>
>                         Philippe Poinas
>
>
>

```

• Prev by Date: Re: Name of a list
• Next by Date: *** nonlinear system of ODE + Runge Kutta ?!!!! ***
• Previous by thread: Re: Partial Differential Equation
• Next by thread: Variable Names