Metoda Elementów Skończonych
Zagadnienia Jednowymiarowe
Metoda Elementów Skończonych
d2 f df
a + = x2 - 2a2
dx2 dx
x " 0,1
f(0) = 0
1
f(1) =
3
" Rozwiązanie ścisłe:
f(x)
f(x)
-1
-1
1 a
1 a
0,45
f(x) = x3 - ax2 + (1 - e-xa )
( ) ( )
-1
0,4
3
1 - e-a
0,35
0,3
0,25
0,2
0,15
0,1
0,05
x
0
0 0,1 0,2 0,3 0,4 0,5 0,6 0,7 0,8 0,9 1
Metoda Elementów Skończonych
d2 f df
a + = x2 - 2a2
dx2 dx
x " 0,1
f(0) = 0
1
f(1) =
3
" RozwiÄ…zanie MES
he = xi - xi-1
x = xi-1 x = xi
¾ = 0 ¾ = 1
xi
Èk(x) - funkcje wagowe
Å‚Å‚
d2 f df
Èk(x)îÅ‚a + + 2a2 - x2śłdx = 0
+" ïÅ‚
k = 1,2
dx2 dx
ðÅ‚ ûÅ‚
xi-1
Metoda Elementów Skończonych
xi xi
d df
ëÅ‚a + f öÅ‚È
(x)dx + (x)(2a2 - x2)dx = 0
ìÅ‚ ÷Å‚
k k
+" +"È
dx dx
íÅ‚ Å‚Å‚
xi-1 xi-1
xi xi
dÈk
ëÅ‚a df + f öÅ‚È ëÅ‚a df + f öÅ‚È ëÅ‚a df + f öÅ‚
(x) - (x) - dx + (x)(2a2 - x2)dx = 0
ìÅ‚ ÷Å‚ ìÅ‚ ÷Å‚ ìÅ‚ ÷Å‚
k k k
+" +"È
dx dx dx dx
íÅ‚ Å‚Å‚ íÅ‚ Å‚Å‚ íÅ‚ Å‚Å‚
xi xi-1 xi-1 xi-1
" Aproksymacja liniowa
L1(¾)=1-¾
L2(¾ )= ¾
¾
¾
Metoda Elementów Skończonych
F(x) = F1L1(¾)+ F2L2(¾)
e e e e e e e e
x = xi-1L1(¾)+ xiL2(¾)= x1 L1(¾)+ x2L2(¾)= x1 (1-¾)+ x2¾ = x1 + ¾(x2 - x1 )= x1 + he¾
dx d¾ 1 Ostatecznie przyjmujemy:
J = = he =
d¾ dx he
È1(¾ )= L1(¾ )=1-¾
È (¾ )= L2(¾ )= ¾
È (¾ )= L2(¾ )= ¾
f = f1 L1(¾)+ f2 L2(¾ )
f = f1eL1(¾)+ f2eL2(¾ )
2
2
df df d¾ îÅ‚ dL1(¾ ) dL2(¾)Å‚Å‚ d¾
dL1(¾) dL2(¾)
= = f1e + f2e
= -1 = 1
ïÅ‚ śł
dx d¾ dx d¾ d¾ dx
d¾ d¾
ðÅ‚ ûÅ‚
f = f1e(1-¾ )+ f2e¾ = f1e +¾(f2e - f1e)
df
= f2e - f1e
d¾
xi
2
Å‚Å‚
d f df
e
È (x)îÅ‚a + + 2a2 - x2 śłdx = 0 x = x1 + he¾
k ïÅ‚
+"
dx2 dx
ðÅ‚ ûÅ‚
xi-1
1
Å„Å‚ üÅ‚
îÅ‚ df d¾ 2
e
+ f (¾)Å‚Å‚ d¾ +È (¾ )[2a2 -(x1 + he¾) ] = 0 k =1,2
żłJd¾
k k
ïÅ‚a śł
+"òÅ‚È (¾ )dd
¾ d¾ dx dx
ðÅ‚ ûÅ‚
0 ół þÅ‚
1
îÅ‚ df d¾ îÅ‚ df d¾ îÅ‚ df d¾
k
+ f (¾ )Å‚Å‚ È (1)- + f (¾)Å‚Å‚ È (0)- + f (¾ )Å‚Å‚ dÈ d¾ Jd¾ +
k k
ïÅ‚a śł ïÅ‚a śł ïÅ‚ śł
+"ðÅ‚a
d¾ dx d¾ dx d¾ dx d¾ dx
ðÅ‚ ûÅ‚ ðÅ‚ ûÅ‚ ûÅ‚
0
¾ =1 ¾ =0
1
2
e
+ (¾ )[2a2 -(x1 + he¾) ]Jd¾ = 0
k
+"È
0
k = 1
1
1
a
a
Å‚Å‚
Å‚Å‚d¾ +
e' e e e e e e
- - + ( -
- af1e' - f1e + (f2e - )+ +( - )¾ ¾ +
+"îÅ‚
+"îÅ‚
ïÅ‚he - f1e)+ f1e +(f2e f1e)¾ śł
ðÅ‚ ûÅ‚
0
1
2 2
e e 2
+ he -¾ )[2a2 -(x1 ) - 2x1he¾ +(he) ¾ ]d¾ = 0
+"(1
0
k = 2
1
a
Å‚Å‚d¾ +
af2e' + f2e - (f2e -
+"îÅ‚
ïÅ‚he - f1e)+ f1e +(f2e f1e)¾ śł
ðÅ‚ ûÅ‚
0
1
2 2
e e 2
+ he [2a2 -(x1 ) - 2x1he¾ -(he) ¾ ]d¾ = 0
+"¾
0
1 a a 1 1 2 1 1 2
Å„Å‚
öÅ‚ öÅ‚ e e Å‚Å‚
f1eëÅ‚- - + f2eëÅ‚ + - af1e' + he îÅ‚a2 - (x1 ) - x1he - (he) = 0
ìÅ‚ ÷Å‚ ìÅ‚ ÷Å‚
ôÅ‚
ïÅ‚ śł
2 he he 2 2 3 12
ôÅ‚ íÅ‚ Å‚Å‚ íÅ‚ Å‚Å‚ ðÅ‚ ûÅ‚
òÅ‚
a 1 1 a 1 2 2 1 2
öÅ‚ öÅ‚ e e Å‚Å‚
ôÅ‚
f1eëÅ‚ - + f2eëÅ‚ - + af2e' + he îÅ‚a2 - (x1 ) - x1he - (he) = 0
ìÅ‚ ÷Å‚ ìÅ‚ ÷Å‚
ïÅ‚ śł
ôÅ‚
he 2 2 he 2 3 4
íÅ‚ Å‚Å‚ íÅ‚ Å‚Å‚ ðÅ‚ ûÅ‚
ół
1 a 1 a
îÅ‚ Å‚Å‚ îÅ‚a - 1 2 1 x1he 1 2Å‚Å‚
2 e e
+ (x1 ) - - (he)
ïÅ‚- - îÅ‚-1 śł îÅ‚0Å‚Å‚
2 he 2 he śłîÅ‚ f1eÅ‚Å‚ aïÅ‚ 0Å‚Å‚îÅ‚ f1e'Å‚Å‚ he ïÅ‚ 2 3 12
+ =
ïÅ‚ śłïÅ‚ f2eśł + śł ïÅ‚0śł
1 a 1 a 2 2 1 2
0 1śłïÅ‚ ûÅ‚ ïÅ‚ 1 e e
ðÅ‚ ûÅ‚
- a2 - (x1 ) - x1he - (he)
ïÅ‚- + śłðÅ‚ ûÅ‚ ðÅ‚ ûÅ‚ðÅ‚ f2e'śł ïÅ‚ śł
ðÅ‚ 2 he 2 he ûÅ‚ ðÅ‚ 2 3 4 ûÅ‚
Dla dowolnego i-tego oraz i+1 elementu:
Dla dowolnego i-tego oraz i+1 elementu:
1 a 1 a
îÅ‚ Å‚Å‚ îÅ‚a - 1 2 1 xiehe 1 2Å‚Å‚
2
+ (xie) - - (he)
ïÅ‚- - îÅ‚-1 śł îÅ‚0Å‚Å‚
2 he 2 he śłîÅ‚ fie Å‚Å‚ aïÅ‚ 0Å‚Å‚îÅ‚ fie' Å‚Å‚ he ïÅ‚ 2 3 12
+ =
ïÅ‚ śłïÅ‚ fie śł +
1 a 1 a
0 1śłïÅ‚ śł ïÅ‚ 1 2 2 xiehe 1 2 śł ïÅ‚0śł
fie'
ûÅ‚ ðÅ‚ ûÅ‚
ðÅ‚ +1ûÅ‚
- a2 - (xie) - - (he)
ïÅ‚- + śłðÅ‚ +1ûÅ‚ ðÅ‚ ïÅ‚ śł
ðÅ‚ 2 he 2 he ûÅ‚ ðÅ‚ 2 3 4 ûÅ‚
1 a 1 a
îÅ‚ Å‚Å‚ îÅ‚a - 1 2 1 xie he 1 2Å‚Å‚
2
+ (xie ) - - (he)
+1 +1
ïÅ‚- - îÅ‚-1 śł îÅ‚0Å‚Å‚
+1 +1
2 he 2 he śłîÅ‚ fie Å‚Å‚ aïÅ‚ 0Å‚Å‚îÅ‚ fie' Å‚Å‚ he ïÅ‚ 2 3 12
+ =
ïÅ‚ śłïÅ‚ fie śł +
1 a 1 a
0 1śłïÅ‚ śł ïÅ‚ 1 2 2 xie he 1 2 śł ïÅ‚0śł
fie'
ûÅ‚ ðÅ‚ ûÅ‚
ðÅ‚ +2ûÅ‚
- a2 - (xie ) - - (he)
ïÅ‚- + śłðÅ‚ +2ûÅ‚ ðÅ‚ ïÅ‚ śł
+1 +1
ðÅ‚ 2 he 2 he ûÅ‚ ðÅ‚ 2 3 4 ûÅ‚
Agregacja macierzy
Agregacja macierzy
1 2 1 1 2
îÅ‚ e e Å‚Å‚
1 a 1 a
îÅ‚ Å‚Å‚
a2 - (x1 ) - x1he - (he)
+ 0 0 0 0 0
ïÅ‚ śł
ïÅ‚- - śł
2 he 2 he 2 3 12
îÅ‚ Å‚Å‚
f1e
ïÅ‚ śł
ïÅ‚ śł
1 a a 1 a
1 2 2 1 2 1 2
2 e e e e
+
ïÅ‚ śł
ïÅ‚- + - 2 śł
[(x1 ) +(x2) ]- x2he - x1he - (he)
ïÅ‚2a - śł
f2e
2 he he 2 he
ïÅ‚ śł
ïÅ‚ śł
2 3 3 3
1 a a 1 a ïÅ‚ śł
ïÅ‚ śł
ïÅ‚ śł f3e
- + - 2 + '
ïÅ‚ śł
îÅ‚-1 0Å‚Å‚îÅ‚ Å‚Å‚
f1e
2 he he 2 he ïÅ‚ śł
ïÅ‚ śł
+ aïÅ‚ + he ïÅ‚
ïÅ‚ śł śł
ïÅ‚ śł
0 1śłïÅ‚ fne' śł
ðÅ‚ ûÅ‚ïÅ‚ śł
ðÅ‚ +1ûÅ‚
ïÅ‚ śł
ïÅ‚ śł
fne ïÅ‚ śł
-1
ïÅ‚ śł
ïÅ‚ śł
ïÅ‚ śł
1 a a 1 a fne
ïÅ‚ śł
ïÅ‚ śł
- + - 2 +
ïÅ‚ śł
ïÅ‚ śł
ïÅ‚ 2 he he 2 he fne
śłðÅ‚ +1ûÅ‚
ïÅ‚ śł
1 a 1 a
ïÅ‚ śł 1 2 2 1 2
e e
- + -
a2 - (xn) - xnhe - (he)
ïÅ‚ śł
ïÅ‚
ðÅ‚ 2 he 2 he śł
ûÅ‚
ðÅ‚ 2 3 4 ûÅ‚
' '
e e e e
Niewiadome n+3: f1e , f ,..., f , f oraz (f1e ), (f )
2 n n + 1 n + 1
f1e = 0
Równania n+1 + dwa warunki brzegowe:
1
fne =
+1
3
Spełnienie warunków brzegowych
f1e = 0
' 2 2
1 a a 1 1 1 1
ëÅ‚ öÅ‚0 + ëÅ‚ öÅ‚ e e Å‚Å‚
+ f2e - a(f1e) + he îÅ‚a2 - (x1 ) - x1he - (he) = 0
ìÅ‚- - ÷Å‚ ìÅ‚ ÷Å‚
ïÅ‚ śł
2 he he 2 2 3 12
íÅ‚ Å‚Å‚ íÅ‚ Å‚Å‚ ðÅ‚ ûÅ‚
a 1 a 1 1 2 2 1 2 1 2
ëÅ‚ öÅ‚0 a ëÅ‚ öÅ‚ e e e e Å‚Å‚
- - 2 f2e + + f3e + he îÅ‚2a2 - [(x1 ) +(x2) ]- x2he - x1he - (he) = 0
ìÅ‚ ÷Å‚ ìÅ‚ ÷Å‚
ïÅ‚ śł
he 2 he he 2 2 3 3 3
íÅ‚ Å‚Å‚ íÅ‚ Å‚Å‚ ðÅ‚ ûÅ‚
1
fne =
+1
3
a 1 a a 1 1 2 2 1 2 1 2
ëÅ‚ öÅ‚ ëÅ‚ öÅ‚1 e e e e Å‚Å‚
- fne - 2 fne + + + he îÅ‚2a2 - [(xn-1) +(xn) ]- xnhe - xn-1he - (he) = 0
ìÅ‚ ÷Å‚ ìÅ‚ ÷Å‚
-1
ïÅ‚ śł
he 2 he he 2 3 2 3 3 3
íÅ‚ Å‚Å‚ íÅ‚ Å‚Å‚ ðÅ‚ ûÅ‚
a 1
ëÅ‚ öÅ‚ ëÅ‚1 a öÅ‚1 + a(fne ' he îÅ‚a - 1 2 2 xnhe 1 2Å‚Å‚
2 e e
- fne + - ) + (xn) - - (he) = 0
ìÅ‚ ÷Å‚ ìÅ‚ ÷Å‚
+1
ïÅ‚ śł
he 2 2 he 3 2 3 4
íÅ‚ Å‚Å‚ íÅ‚ Å‚Å‚ ðÅ‚ ûÅ‚
Ostateczna postać układu równań
2
1 1 1 2
îÅ‚ e e Å‚Å‚
a2 - (x1 ) - x1he - (he)
ïÅ‚ śł
' 2 3 12
îÅ‚ Å‚Å‚
(f1e)
ïÅ‚ śł
1 2 2 1 2 1 2
a 1 e e e e
îÅ‚
śł
2a2 - [(x1 ) +(x2) ]- x2he - x1he - (he)
ïÅ‚ śł
f2e
ïÅ‚- a he + 0 0 0 0 0 0 0 0Å‚Å‚ïÅ‚ śł
śłïÅ‚
2 3 3 3
2
ïÅ‚ śł
ïÅ‚ śłïÅ‚ śł
a a 1
ïÅ‚ śł
0 - 2 + 0 0 0 0 0 0 0śłïÅ‚ f3e
ïÅ‚
śł
ïÅ‚ śł
he he 2
f4e
ïÅ‚ śłïÅ‚ śł
a 1 a a 1 ïÅ‚ śł
ïÅ‚
0 - - 2 + 0 0 0 0 0 0śłïÅ‚ śł
ïÅ‚ śł
he 2 he he 2
ïÅ‚ śłïÅ‚ śł
ïÅ‚ śł
ïÅ‚ śłïÅ‚ śł
ïÅ‚ śł
ïÅ‚ śłïÅ‚ śł
śł
ïÅ‚ śłïÅ‚ śł + he ïÅ‚
= 0
ïÅ‚ śł
ïÅ‚ śłïÅ‚ śł
ïÅ‚ śł
ïÅ‚ śł
ïÅ‚ śłïÅ‚ śł
ïÅ‚ śłïÅ‚ śł
ïÅ‚ śł
ïÅ‚ śł
ïÅ‚ śłïÅ‚ śł
a 1 a a 1 ïÅ‚ śł
ïÅ‚
0 0 0 0 0 0 - - 2 + 0śłïÅ‚ śł
ïÅ‚ śł
ïÅ‚ he 2 he he 2 śłïÅ‚ śł
ïÅ‚ śł
a 1 a
ïÅ‚
0 0 0 0 0 0 0 - - 2 0śłïÅ‚ śł ïÅ‚ śł
ïÅ‚
he 2 he śłïÅ‚ fne śł
ïÅ‚ śł
ïÅ‚ śłïÅ‚ -1 śł
a 1
e e
ïÅ‚2a2 1 e 2 e 2 1 xnhe 2 xn-1he 1 2 1 ëÅ‚ a + 1 öłśł
- [(xn-1) +(xn) ]- - - (he) +
0 0 0 0 0 0 0 0 - a
ïÅ‚ śłïÅ‚ fne ìÅ‚ ÷Å‚
' ïÅ‚ 2 3 3 3 3he he 2 śł
ðÅ‚ he 2 ûÅ‚ïÅ‚ śł íÅ‚ Å‚Å‚
śł
(fne )ûÅ‚
ðÅ‚ +1
ïÅ‚ śł
2 2
1 2 1 1 a 1
e e ëÅ‚ öÅ‚
a2 - (xn) - xnhe - (he) +
ìÅ‚- + ÷Å‚
ïÅ‚ śł
2 3 4 3he he 2
íÅ‚ Å‚Å‚
ðÅ‚ ûÅ‚
with(LinearAlgebra):
with(plots):
interface(rtablesize=60):
RR := proc(n,a)
local A,Ainv,i,j,W,he,x1,XX1,XX2,f:
A:=Matrix(1..n+1, 1..n+1):
Ainv:=Matrix(1..n+1, 1..n+1):
W:=Vector(1..n+1):
f:=Vector(1..n+1): he:=1.0/n: x1:=0.0:
A[1,1]:=-a: A[1,2]:=0.5+a/he:
for i from 3 by 1 to n+1 do
A[1,i]:=0.0:
end do:
A[2,1]:=0.0: A[2,2]:=-2*a/he: A[2,3]:=0.5+a/he:
for i from 4 by 1 to n+1 do
A[2,i]:=0.0:
end do:
for i from 3 by 1 to n-1 do
for j from 1 by 1 to n+1 do
if i=j+1 then
A[i,j]:=-0.5+a/he:
end if:
if i=j then
A[i,j]:=-2*a/he:
end if:
if i=j-1 then
A[i,j]:=0.5+a/he:
end if:
end do: end do:
for i from 1 by 1 to n+1 do
A[n,i]:=0: A[n+1,i]:=0:
end do:
A[n,n-1]:=-0.5+a/he: A[n,n]:=-2*a/he: A[n+1,n]:=-0.5+a/he: A[n+1,n+1]:=a:
Ainv:=MatrixInverse(A):
print(A);
XX1:=x1:
W[1]:=a*a-XX1*XX1/2.0-XX1*he/3.0-he*he/12.0:
W[1]:=he*W[1]:
XX1:=(n-2)*he:
XX2:=(n-1)*he:
XX2:=(n-1)*he:
W[n]:=2*a*a-(XX1*XX1+XX2*XX2)/2.0-XX2*he/3.0-2*XX1*he/3-he*he/3+(a/he+0.5)/(3*he):
W[n+1]:=a*a-XX2*XX2/2.0-2.0*XX2*he/3-he*he/4.0+(-a/he+0.5)/(3*he):
W[n]:=he*W[n]:
W[n+1]:=he*W[n+1]:
for i from 2 by 1 to n-1 do
XX1:=x1+(i-2)*he:
XX2:=x1+(i-1)*he:
W[i]:=2*a*a-(XX1*XX1+XX2*XX2)/2.0-XX2*he/3.0-2*XX1*he/3-he*he/3:
W[i]:=W[i]*he:
end do:
for i from 1 by 1 to n+1 do
f[i]:=0:
end do:
for i from 1 by 1 to n+1 do
for j from 1 by 1 to n+1 do
for j from 1 by 1 to n+1 do
f[i]:=f[i]+Ainv[i,j]*W[j]:
end do:
f[i]:=-f[i]:
end do:
print(W);
print(f);
end:
RR(10,1);
" Vector[column]([[1.580511034], [.1410089874], [.2496520394], [.3292973405],
[.3831827717], [.4144283205], [.4260473092], [.4209565527], [.4019855510],
[.3718848033], [-.419488966]])
f(x)
0,45
0,4
0,35
0,3
0,25
0,2
0,15
0,1
0,05
x
0
0 0,1 0,2 0,3 0,4 0,5 0,6 0,7 0,8 0,9 1
Projekty
Projekt 2
Projekt 1
2
d f f
2
d f f + = x2 + 2ax
+ = x + 2a
dx2 a2
dx2 a2
df
= 0
f (0)= a2
dx
x=0
f (1)= a2
f (0)= a2
Projekt 3
Projekt 4
2
2
d f f
d f df
+ = x2 - 2a2
a2 - 5a + 4 f = 2ex
dx2 a2
dx2 dx
df
df
= 0
= 0
dx
x=0 dx
x=0
f (1) = 2
f (0)= 0
Projekty
Projekt 6
Projekt 5
2
2
d f df
d f df
a2 - 2a = ex
a2 - 4a + 4 f = x2
dx2 dx
dx2 dx
f (0)= -1
f (0)= 1
f (3)= 3
f (2)=1
Projekt 8
Projekt 7
2
2 d f f
d f f
+ = ax
+ = ae-x
dx2 a2
dx2 a2
df
f (0)= 1
= 2
dx
x=0
f (1)= 0
f (1)= a2
Projekty
Projekt 9 Projekt 10
2
2
d f df
d f f
a2 - 5a + 4 f = x - a
+ = ax
dx2 dx
dx2 a2
df
df
= 0
= 0
dx
x=0
dx
x=0
f (0)= 0
f (1) = 2
f (1) = 2
Projekt 11
Projekt 12
2
d f df 2
d f df
a2 - 4a + 4 f = ex
a2 - 4a + 4 f = ax
dx2 dx
dx2 dx
f (0)= 1
f (0)=1
f (2)= 1
f (2)= 1
Projekty
Projekt 14
Projekt 13
2
2
d f
d f
= x2 - 2x + ln(x)
= x2 - 2x + ex
dx2
dx2
f (1)=1
f (0)= 1
f (2)=1
f (2)= 1
Projekt 15 Projekt 16
2 2
d f d f 1
= x ln(x) = x -
dx2 dx2 x
f (1)= 1 f (1)=1
f (2)=1 f (2)=1
Projekty
Projekt 17
Projekt 18
2
2
d f
d f
= x2 - 2x + ex
= x2 - 2x + ln(x)
dx2
dx2
df
df
= 1
= 1
dx
x=0
dx
x=2
f (2)=1
f (3)= 2
Projekt 20
Projekt 19
2
2
d f 1
d f
= x -
= x ln(x)
dx2 x
dx2
df
df
= 1
= 1
dx
dx
x=1
x=2
f (2)= 1
f (3)= 2
Projekty
Projekt 22
Projekt 21
2
2
d f
d f
= x2 - 2x + ln(x)
= x2 - 2x + ex
dx2
dx2
df
df
= 1
= 1
= 1
dx
dx
x=2
dx
dx
x=0
f (3) = 4
f (1) = 2
Wyszukiwarka
Podobne podstrony:
Wykład 07 Metody Elementów Skończonych 2DWykład 05 Metody Elementów Skończonych 1DWykład 05 Metody Elementów Skończonych 1DCATIA Wykorzystanie metody elementow skonczonych w obliczeniach inzynierskichwyklad 04Wyklad 7 Nieparametryczne metody statystyczne PL [tryb zgodności]wyklad 04Podstawy Systemów Okrętowych wykład 04 Przeciw PożarniczeNEGOCJACJE WYKLAD 04 2011Wykład 04 Rachunek wariacyjnyF II wyklad 04Mechanika Budowli Sem[1][1] VI Wyklad 04wyklad 042010 11 WIL Wyklad 04Przykłady postaci larwalnych wykład 04 Tyl ko do odczytu tryb zgodności04 Wytwarzanie elementów maszynwięcej podobnych podstron