, , Maple , , , , . cylind , .
> addcoords(cylind,[z,r,phi],[r*cos(phi),r*sin(phi),z]);
. , phi, . , . 1
(. 3.10-3.13).
>plots[animate3d](U(rho,t,5),rho=0..1,phi=0..2*Pi,t=0..1, cords=cylind,axes=FRAME,titlefont=[HELVETICA,BOLD,12]);
. ().
. .
. ϒ .
. .
. . , . (3.143.16) , .
>plots[animate3d](U(rho,t,5),rho=0..1,phi=0..2*Pi,t=0..5, coords=cylind,axes=FRAME,titlefont=[HELVETICA,BOLD,12]);
. .
. .
. .
1. .
2. ?
3. ?
4. ?
5. -.
6. .
7. .
8. .
9. . .
10. .
11. ij .
12. ?
13. ? .
14. -.
|
|
3.1
,
, , t>0 0≤ ≤ L
, .
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
3.2
U(x,t) [ 0,L ], U(x,0)=φ(x). .
,
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30