ВУЗ:
Составители:
Рубрика:
Е. Ю. Ечкина Специализированный практикум с использованием системы Maple для решения задач математической физики
3. Задача Дирихле для прямоугольника.
22
22
00
00
0, 0 , 0 ,
(), (), (), ().
ab
xxa yya
uu
xa yb
xy
ufyufy u xu
ϕϕ
== ==
∂∂
+= <<<<
∂∂
== ==x
Примеры решения типовых задач
Привести к каноническому виду уравнение
22 2
22
610 3
uu uuu
xxyyxy
∂∂ ∂∂∂
−++−=
∂∂∂∂∂∂
0.
Решение. Будем рассматривать уравнение общего вида
222
12 34567
22
0.
uuuuu
aa aaaaua
xxyyxy
∂∂∂∂∂
++++++
∂∂∂∂∂∂
=
Зададим коэффициенты нашего уравнения
> a:=1, -6, 10, 1, -3, 0, 0;
a:=1,-6,10,1,-3,0,0
и само уравнение
> equ:=a[l]*diff(u(x,y),x,x)+a[2]* diff(u(x,y),x,y)+a[3]* diff(u(x,y),y,y)+ a[4]*
diff(u(x,y),x)+ a[5]* diff(u(x,y), y)+ a[6]*u+a[7]=;
equ:=
22 2
22
(, ) 6 (, ) 10 (, ) (, ) 3 (, ) 0uxy uxy uxy uxy uxy
xxyyxy
⎛⎞⎛ ⎞⎛⎞
⎛⎞
∂∂ ∂∂∂
⎛⎞
−++−
⎜⎟⎜ ⎟⎜⎟⎜⎟
⎜⎟
∂∂∂∂∂∂
⎝⎠
⎝⎠
⎝⎠⎝ ⎠⎝⎠
=
Вычислим матрицу старших коэффициентов и ее определитель
> eq:=lhs(equ);
eq:=
22 2
22
(, ) 6 (, ) 10 (, ) (, ) 3 (, )uxy uxy uxy uxy uxy
xxyyxy
⎛⎞⎛ ⎞⎛⎞
⎛⎞
∂∂ ∂∂∂
⎛⎞
−++−
⎜⎟⎜ ⎟⎜⎟⎜⎟
⎜⎟
∂∂∂∂∂∂
⎝⎠
⎝⎠
⎝⎠⎝ ⎠⎝⎠
>A:=linalq[matrix](2,2,[coeff(eq, diff(u(x,y),x,x)), coeff(eq, diff(u(x,y),x,y))/2, coeff(eq,
diff(u(x,y),x,y))/2, coeff(eq, diff(u(x,y),y,y))]);
>Delta:=simplify(linalg[det](A));
13
:
310
:1
A
−
⎡
⎤
=
⎢
⎥
−
⎣
⎦
∆
=
Так как определитель матрицы старших коэффициентов больше нуля, то тип
уравнения - эллиптический.
Формулируем характеристическое уравнение и решаем его
Кафедра автоматизации научных исследований факультета ВМК МГУ имени М. В. Ломоносова http://ani.cs.msu.su 18
Е. Ю. Ечкина Специализированный практикум с использованием системы Maple для решения задач математической физики
3. Задача Дирихле для прямоугольника.
∂ 2u ∂ 2u
+ = 0, 0 < x < a , 0 < y < b,
∂x 2 ∂y 2
u x =0 = f 0 ( y ), u x =a = f a ( y ), u y =0 = ϕ 0 ( x ), u y =a = ϕ b ( x ).
Примеры решения типовых задач
Привести к каноническому виду уравнение
∂ 2u ∂ 2u ∂ 2u ∂u ∂u
− 6 + 10 + − 3 = 0.
∂x 2
∂x∂y ∂y 2
∂x ∂y
Решение. Будем рассматривать уравнение общего вида
∂ 2u ∂ 2u ∂ 2u ∂u ∂u
a1 + a 2 + a3 + a4 + a5 + a6u + a7 = 0.
∂x 2
∂x∂y ∂y 2
∂x ∂y
Зададим коэффициенты нашего уравнения
> a:=1, -6, 10, 1, -3, 0, 0;
a:=1,-6,10,1,-3,0,0
и само уравнение
> equ:=a[l]*diff(u(x,y),x,x)+a[2]* diff(u(x,y),x,y)+a[3]* diff(u(x,y),y,y)+ a[4]*
diff(u(x,y),x)+ a[5]* diff(u(x,y), y)+ a[6]*u+a[7]=;
⎛ ∂2 ⎞ ⎛ ∂2 ⎞ ⎛ ∂2 ⎞ ⎛ ∂ ⎞ ⎛ ∂ ⎞
equ:= ⎜ 2 u( x, y ) ⎟ − 6 ⎜ u( x, y ) ⎟ + 10 ⎜ 2 u( x, y ) ⎟ + ⎜ u( x, y ) ⎟ − 3 ⎜ u( x, y ) ⎟ = 0
⎝ ∂x ⎠ ⎝ ∂x∂y ⎠ ⎝ ∂y ⎠ ⎝ ∂x ⎠ ⎝ ∂y ⎠
Вычислим матрицу старших коэффициентов и ее определитель
> eq:=lhs(equ);
⎛ ∂2 ⎞ ⎛ ∂2 ⎞ ⎛ ∂2 ⎞ ⎛ ∂ ⎞ ⎛ ∂ ⎞
eq:= ⎜ 2 u( x, y ) ⎟ − 6 ⎜ u( x, y ) ⎟ + 10 ⎜ 2 u( x, y ) ⎟ + ⎜ u( x, y ) ⎟ − 3 ⎜ u( x, y ) ⎟
⎝ ∂x ⎠ ⎝ ∂x∂y ⎠ ⎝ ∂y ⎠ ⎝ ∂x ⎠ ⎝ ∂y ⎠
>A:=linalq[matrix](2,2,[coeff(eq, diff(u(x,y),x,x)), coeff(eq, diff(u(x,y),x,y))/2, coeff(eq,
diff(u(x,y),x,y))/2, coeff(eq, diff(u(x,y),y,y))]);
>Delta:=simplify(linalg[det](A));
⎡ 1 −3⎤
A := ⎢ ⎥
⎣ −3 10 ⎦
∆ := 1
Так как определитель матрицы старших коэффициентов больше нуля, то тип
уравнения - эллиптический.
Формулируем характеристическое уравнение и решаем его
Кафедра автоматизации научных исследований факультета ВМК МГУ имени М. В. Ломоносова http://ani.cs.msu.su 18
