Scribd
Upload
39 views4 pages

Assignment, 7339

Not available

Uploaded by

rohitvaishalibihar
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF, TXT or read online on Scribd
39 views4 pages

Assignment, 7339

Not available

Uploaded by

rohitvaishalibihar
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF, TXT or read online on Scribd
You are on page 1/ 4

Assignment

Assignment 1-2024
Partial Differential Equations
Semester-V
Q1. Find the general solution of the following partial differential equations
(i) uxx-4 uxy+3 uyy=0
(ii) x ux+y uy=2u.
Q2. Obtain the solution of the equation
yux-2xyuy-2xu=0
with the Cauchy data u0,y=y3.
Q3. Plot the characteristic curves for the partial differential equation
ux- uy=1.
Q4. Find the solution of the following initial value problem
ut=uxx , 0<x<2, t>0
ux,0=x, 0≤x≤2
u0,t=0, ux2,t=1, t≥0.

Sol 1(i)-uxx-4 uxy+3 uyy=0

I n [ ] : = pde = D[u[x, y], {x, 2}] - 4 D[u[x, y], x, y] + 3 D[u[x, y], {y, 2}]  0;
solution = DSolve[pde, u[x, y], {x, y}]
O u t [ ] =

{{u[x, y]  1 [3 x + y] + 2 [x + y]}}

(ii)-x ux+y uy=2u.

I n [ ] : = ClearAll[x, y, u]
pde = x D[u[x, y], x] + y D[u[x, y], y]  2 u[x, y];
solution = DSolve[pde, u[x, y], {x, y}]
O u t [ ] =
y
u[x, y]  x2 1  
x

solution 2 - yux-2xyuy-2xu= 0,with the Cauchy data u0,y=y3.

I n [ ] : = pde = y D[u[x, y], x] - 2 x y D[u[x, y], y]  2 x u[x, y]


bc = u[0, y]  y ^ 3;
solution = DSolve[pde, u[x, y], {x, y}]
O u t [ ] =

- 2 x y u(0,1) [x, y] + y u(1,0) [x, y]  2 x u[x, y]


O u t [ ] =

1 x2 + y
u[x, y]  
y
2 assignment ,7339.nb

x2 + y ^ 4
I n [ ] : = Plot3D , {x, - 3, 3}, {y, - 3, 3}, ColorFunction  "SouthwestColors"
y

O u t [ ] =

solution 3 -ux- uy=1.

In[1]:= pde3 = D[u[x, y], x] - D[u[x, y], y]  1;


solution = DSolve[pde3, u[x, y], {x, y}]
Out[2]= {{u[x, y]  x + 1 [x + y]}}

In[3]:= DSolve[u '[x]  1, u[x], x]


g0 = Plot3D[{x, x - 1, x + 1}, {x, - 5, 5}, {y, - 5, 5}]
Out[3]= {{u[x]  x + 1 }}

Out[4]=
assignment ,7339.nb 3

In[5]:= DSolve[u '[y]  - 1, u[y], y]


g1 = Plot3D[{- y, - y + 1, - y - 1}, {x, - 5, 5}, {y, - 5, 5}]
Out[5]= {{u[y]  - y + 1 }}

Out[6]=

In[7]:= Show[g0, g1, PlotRange  All, BoxRatios  {1, 1, 1}]

Out[7]=

solution 4 -
ut=uxx , 0<x<2, t>0
ux,0=x, 0≤x≤2
u0,t=0, ux2,t=1, t≥0.
4 assignment ,7339.nb

In[8]:= pde4 = {D[u[x, t], t] - D[u[x, t], {x, 2}]  0,


u[x, 0]  x, u[0, t]  0, Derivative[1, 0][u][2, t]  1};
NDSolve[pde4, u[x, t], {x, 0, 2}, {t, 0, 5}]
Plot3D[u[x, t] /. %, {x, 0, 2}, {t, 0, 5}]

Domain: {{0., 2.}, {0., 5.}}


Out[9]= u[x, t]  InterpolatingFunction [x, t]
Output: scalar

Out[10]=

You might also like

pFad - Phonifier reborn

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.


Alternative Proxies:

Alternative Proxy

pFad Proxy

pFad v3 Proxy

pFad v4 Proxy