
книги из ГПНТБ / Опыт оценки устойчивости склонов сложного геологического строения методом конечных элементов и экспериментами на моделях
..pdf
|
в и д е |
п р о и з в е д е н и я |
|
м а т р и ц |
|||||||||||||
|
|
|
|
|
№*}=[*} |
|
> |
|
|
|
|
|
|
|
(12) |
||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||
г д е |
|
а н |
а й |
а „ . . . |
а,„ |
|
|
OC j |
|
|
|
|
|
|
|||
[А] = |
й г і |
&п |
Q.n... |
й г п |
|
|
|
|
|
|
|
|
|||||
|
|
|
|
|
|
|
|
|
|
|
|||||||
|
|
Q-mi Q.R14 |
--Q-mi |
|
|
|
|
|
|
|
|
m |
|
||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||
|
Запись системы линейных уравнений в матричном |
||||||||||||||||
виде ( 12) широко используется в |
м е т о д е |
конечных |
|||||||||||||||
элементов . |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||
|
3. |
Т р а н с п о н и р о в а н н а я |
|
|
|
||||||||||||
|
|
|
м а т р и ц а |
|
|
|
|
|
|
|
|
|
|
||||
|
Если в |
матрице |
tt,, |
а , а |
|
а „ . |
|
|
|
|
|
||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||
|
|
|
|
|
W |
i |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
_ Q . m l Q . m 2 Û . m j . . . u m n |
|
|
|
|||||||
р а з м е р а |
Ш х П |
заменить |
строки |
столбцами, |
то |
полу |
|||||||||||
чим |
так |
называемую |
т р |
а |
н с |
|
п |
о |
н |
и р |
о |
в |
а н |
||||
н у ю |
матрицу |
|
|
|
|
0-2, |
|
Û.J, |
. . . |
(Х т 1 |
|
|
|||||
|
|
|
|
|
|
|
|
|
|
|
|
||||||
|
|
|
|
|
|
|
|
Q.,2 О-П |
|
Q.J2• . • |
Û m 2 |
|
|
||||
|
|
|
|
|
|
|
|
Q-in 0-2П |
Q i n |
• - - Q-mnj |
|
|
|||||
р а з м е р а |
П x m |
|
. В частности, |
д л я |
матрицы - столбца |
||||||||||||
транспонированной является матрица - строка . |
Часто |
||||||||||||||||
встречающееся |
в |
м е т о д е конечных |
элементов |
в ы р а ж е |
|||||||||||||
ние |
энергии |
W |
|
м о ж е т |
быть |
т о г д а |
записано |
в в и д е : |
|||||||||
|
W = (F, I V |
F 2 u 2 + . . |
> F n u n ) = t F } T { u } = ( U ] T { F } |
( 1 3 ) |
|||||||||||||
|
Транспонированные |
матрицы |
|
обладают |
с л е д у ю щ и |
||||||||||||
ми |
свойствами: |
|
, |
|
|
|
, |
|
|
г „ , т |
|
|
|
|
|||
|
( w |
*т) |
|
|
- |
|
[ А ] ' |
* |
|
[ |
в ] |
т |
|
|
|
( t A l [ 6 ] ) T . [ B ] T [ A ] T .
260
Симметричная матрица совпадает со своей тран спонированной матрицей. Произведение симметричной матрицы [Д] на свою транспонированную [А] т а к ж е является симметричной матрицей :
|
|
[В] |
- [А] |
[Л] т |
= [В] т . |
|
|
|
|
|
||
|
4. И н в е р с и я |
м а т р и ц |
|
|
|
|
||||||
|
О б р а т н о й |
м а т р и ц е й |
по о т н о ш е |
|||||||||
нию |
к данной называется |
матрица, |
которая |
будучи |
у м |
|||||||
ноженной справа или слева на данную |
матрицу, |
д а е т |
||||||||||
единичную |
матрицу, |
например: |
|
|
|
|
(и) |
|||||
матрице [А] |
. Н а[АИАГ'ЧАГ'САЗ^Е . |
|
|
|||||||||
З д е с ь матрица |
[А] является |
обратной |
но отношению к |
|||||||||
|
|
|
х о ж д е н и е |
обратной |
матрицы |
д л я |
д а н |
|||||
ной |
называется |
и н в е р |
с и |
е |
й |
(обращением) |
|
д а н |
||||
ной матрицы. Поэтому, и н о г д а матрицу [А] |
н а з ы в а |
|||||||||||
ют |
инверсией |
матрицы [А] . |
[А] |
|
|
|
|
|
||||
|
Если |
в в ы р а ж е н и и |
(12) |
есть |
квадратная |
м а |
||||||
трица, т . е . |
m = И |
, то |
можно |
за п ис ать : |
|
|
|
[А]{Х}-М ,
( Х Н А Г ' М ,
Таким образом решение системы линейных у р а в нений может быть сведено к инверсии матрицы к о э ф фициентов.
Следует отметить некоторые свойства обратных матриц. Обратная матрица произведения квадратных матриц равна произведению обратных матриц сомножи телей, взятому в обратном порядке:
( [ A ] [ B ] ) - 4 B ] " W .
Транспонированная обратная матрица равна обратной от транспонированной данной матрицы:
( [ А Г ' Н Ш У .
261
П Р И Л О Ж Е Н И Е 2
П Р О Г Р А М М А РАСЧЕТА П Е Р Е М Е Щ Е Н И Й И Н А П Р Я Ж Е Н И Й В М А С С И В Е Т Р Е Щ И Н О В А Т Ы Х П О Р О Д М Е Т О Д О М К О Н Е Ч Н Ы Х Э Л Е М Е Н Т О В
Программа составлена на языке Алгол-бО |
и ори |
ентирована на использование Э Ц В М с большим |
о б ъ е |
мом оперативной памяти. Объем оперативной памяти |
|
машин типа Б Э С М - 6, М и н с к - 3 2 (32768 слов) |
п о з в о |
ляет при комбинированной системе разбивки расчетной
области |
на треугольные |
и |
прямоугольные |
|
элементы |
||||
рассматривать схемы, |
с о д е р ж а щ и е д о 400 |
узлов |
|||||||
(порядка |
700 э л е м е н т о в ) , |
без обращения |
к |
внешним |
|||||
запоминающим устройствам . При использовании |
т р е у |
||||||||
гольной |
сетки |
разбивки |
максимальное |
количество у з |
|||||
лов увеличивается д о |
500 |
( п о р я д к а 9 |
0 0 |
э л е м е н т о в ) . |
|||||
Программа |
является |
|
универсальной |
в |
том |
смысле, |
что позволяет производить расчет перемещений и нап
ряжений в массивах, |
имеющих блоковое |
строение,при |
|||||||||
любом |
характере |
неоднородности, |
произвольных |
грани |
|||||||
чных |
условиях и |
видах |
нагрузок. |
По |
этой |
ж е |
п р о г р а м |
||||
ме могут |
о с у щ е с т в л я т ь с я |
расчеты |
н а п р я ж е н н о - д е ф о р |
||||||||
мированного состояния |
в |
системах |
типа |
" с о о р у ж е н и е - |
|||||||
основание" . |
|
|
|
|
|
|
|
|
|
||
Некоторые |
непринципиальные |
изменения, |
которые |
||||||||
вводились |
в приведенную |
программу, |
позволяли |
в о т |
|||||||
дельных |
случаях |
обеспечить е щ е |
большую |
экономию |
машинной памяти. Например, при расчете напряженно -
деформированного |
состояния |
совместно с основанием - |
||||||
сооружений одного из гидроузлов на |
Э Ц В М Минск - 32 |
|||||||
(программа на Я С К ) |
сетка |
разбивки с о д е р ж а т а |
598 |
|||||
узлов |
(1100 |
треугольных э л е м е н т о в ) |
и использовалась |
|||||
только |
оперативная |
|
память |
машины . |
|
|
|
|
В настоящее |
время автором р а з р а б а т ы в а е т с я |
б о |
||||||
лее компактная форма записи обобщенной матрицы |
ж е с |
|||||||
ткости,позволяющая |
реализовать на машинах Б Э С М - 6 , |
|||||||
Минск-32 расчеты |
с и с т е м , с о д е р ж ащих |
д о 850 |
узлов |
|||||
(около |
1600 |
треугольных элементов) |
б е з использова |
|||||
ния внешних |
запоминающих |
устройств |
Э Ц В М . |
|
|
|||
262 |
|
|
|
|
|
|
|
|
BEGIN INTEGER NM , NM, NP, NP2, NJ, MR., MUMF,U£ > NIT, NITER, NUMC ;
R.EAU REUAX, K S ; INPUT(NN,NN,N?,NR,NUMF,TJ2,N1TER(REUAX, KS,NUMC))
NP'«NM*NNj
NP2*NP«2; NU« NP2-U»-,
«>DTPUT(ЫМ,МЫ,ЫР^Р2, NJ, NR.UZ, NU,NUMF,NITER, REbAX , KS, NU MC )•,
BEGIN INTEGER, I.JjK.U.M^H.A, B,A4,A2,Aa,IA,JA,KA,IC;rC, КСДТ, Bô^B-t^TJ, K^K2,K3,K4 ,E,NC j
REAb X4,X&,XS, M,^y3,S1,SMl SN,E4S,E2S,E3S,E4S,MX,R:ES,
AR.RAV X ,У C4--NP3, ХГУ'^РгТ, OEPU'NR,4:23, KT,KNtV.NT3 ; INTEGER ARRAV NJEC^NJ,V.23, NRE
INPUT ( X, У , "DEF, KT, KN, NJ E ) ; АИЗ« 1 i
J:=NJE [4,23;
FOR Mfs4 STEP Л UNTlb NM-4 P(P FgR, NislSTEP \ UNTIb NN D0 BEGIN I-.в NN«(M-4) + ti)
I F I» 7 THEN BEGIN A'-sA+T)
I F Aa NJ THEN A:= -1 ; J==NJEtA,23,
GO Ml END)
NR.E CB3 :s I J
Mil END",
NC'« \ ; |
|
OUTPUT |
DEF,KT,K,N , NTE, NRE)-, |
M3-. B E S I N AaRAV FtA'NP2J , CCA = NP2,1M8];
BEGIM ARR-Ay P F M - ' N O M F J , GAMMA U : N R ] ;
I N T E & E R ARRA^j N F U : M Ü M F J -
I N P U T ( P F , N F , G A M M A ) ;
F O R M « Л S T E P i U N T I L N P 2 D 0 F C M ] t = 0 ;
F O R . M-.s 4 STEP 1 UNTIL, |
W M F ОФ |
|
B E G - X N Wi5 |
NFtM]; |
|
F L N 3 : = PFLMJ |
|
|
E N D ; |
|
|
Fg>R М«Д S T E P 1 U N T I L |
N R O© |
|
FOR. H:= 0,\ |
DO |
|
B E G I N r-= N R E L M ] ; |
|
|
J:=I+NN-x(^-H)-4; |
|
|
K-.sX+NM-H ; |
|
|
X4--S X C J ] - X C I J ; |
|
|
X2'-= X CI3- X[K3; |
|
|
У |
tt]-4ü]; |
|
У М |
- У I I ] ; |
|
S1--= A6S(Xl«y2.- Х2-У1)/6;
SM:= G A M M A { M 3 „
Fg>R. А : * І Д К Dg FCA+NPJ:= FCA+NPJ + S M END-,
O U T P U T ( P F , N F , G A M M A , F )
264
BEG-IN ARRAV &СѴ.ІИд63, 0CVV-SJ,GDM'6,1!M, RU<6H:«; INTEGER ARRAy KU[OM,VHg];
INPUT(KU);
OUTPUT(KU);
TOR M:=4 STEP A UNTIL NP2. Dg
F0R. |
STEP 1 UNTIL |
48 DÇ> С Г М . ^ - О ; |
|
FgR |
M := 4,2,3 O0 |
|
|
F0R, M<H STEP Л UNTIU |
6 D0 G [ M , N 3 - 0 ; |
||
DL< '- 33 '•= D13,-0 '= t> W,S3 >= D15,23 '= ° ; |
|||
|
M-H STEP -I UNTIL |
NR. 0Ф |
|
Fg>R, H-=Oj4 |
|
|
|
BEGIN I:s NR.E CM3) |
|
||
J-:sH-KINx(-|-H)--t; |
|
||
QUM •= G- t3,4] •= У С«ГJ - У CK] ; |
|||
Gt1,a].= G[3,5j'= |
У СЮ - У LI3 j |
||
G t W = G U,6J.= |
У [ I ] - У &ГЗ > |
||
GBHJ» © tVÜ™ |
Х1Ю - XU3 ; |
||
GC2,5]-=G 13,23-.= |
Ш З - ХЕК]; |
||
GL2,61'.=& 13,31 < = |
X U 3 - X U 3 ) |
||
Si» |
2»ABS (Gt2,GJ*GlH,2J-GC2<53*Gi:<l,3])j |
||
S4-= 4/S1> |
|
|
Dt3,33:s ОЕРСМИЗ/(4+Г>Е-РІМ,23); DC^23==DL2/3 •«ОСЗ.ЗЗОЕРСм^З/М-г* DEPtM,2J)>
Dt3,33-=t>t3,î3/2-,
1>И,4].-д 1>[2,23 -s D[4,23 + 2* ГЯЗ.ЗЗ}
A1:=4 STEP 1 UNTIL |
G £>ÇS |
FOR. А2:=ЧД,3 D0 |
|
BEGIN &Х>СА1,А2Д:=0) |
|
17-1655 |
265 |
F O R , А-.*\г2,ѣ D ®
G-DLM,A2II-= GD[A-»,A23 + G-CVI]* DtA,A23
END-, |
|
|
|
|
FOR. A1 |
1 S T E P |
1 |
UMTIU б |
Ов |
FOR. А2:*Л S T E P |
\ |
U N T I L , 6 |
DO |
|
BEG-IN |
R,[A<,A2]!*0; |
|
||
FOR. A'.« 4,2,3 |
DO |
|
||
R.CA4,A2]:= ИСАН,А23 + 6\DCA1,A] x G СА,А2Э; |
||||
«.[A1,A2]i= |
x R.CA1,A2T |
|
||
END;, |
|
|
|
|
FOR. A:=q,A 00 |
|
|
|
|
BEGIN A1:'s 3*A-M) |
|
|||
A2'= A1+4; |
|
|
|
|
A3=A1+1; |
|
|
|
|
ІА; = І+ХРлА; |
|
|
||
JA- = J + N P * A - , |
|
|
||
KA:=K+HP* A) |
|
|
||
FOR B>M STEP |
Л UNIT l b |
6 DO |
BEGXM B6-=B+6; 84.2.:= &t 42; 1С!« KULH,B3; JC-= KU CH,B63; KC'-=KUl>,B42J}
С LIAДСj •= С [IA,IC] * Jt ГА-1, B3 ;
ССТА,ТСЗ: = С[ТАДСЗ* R.CA2.,83; C-tKA, KC3-' = С СКА, КСЗ *• 1UAÎ,8]
END
E N D
E N D
END-,
266
B E G I N АЙЛАУ J B . СV.вИ! 83; |
|
|||
I N T E G E R . |
АЯЯАЦ |
PZ*'4,4--4l,£Hl4i*3,3KO№4}, |
NSC^eD; |
|
I N P U T ( P , J K U , N S ) ; |
|
|
||
O U T P T 3 T C P , J < U , N S ) ) |
|
|
||
F O R . M-.«1 |
S T E P |
1 TJNTlu N J D O |
|
|
B E G I N 1rs |
N J E C M , 2 3 , |
|
||
KssI.i-NM-/»; |
|
|
|
|
TJ:= MJELM.1]; |
|
|
||
X4:= XCIJ - X tAMj |
|
|
||
У Ш - У С М З ; |
|
|
||
Xa:=SaRT(x-»1«2+ У4*2), |
|
|||
У2' = X1/X2; |
|
|
|
|
ХЗ==У2*УЗ; |
|
|
|
|
У2»= У2т2> |
|
|
|
|
УѴ=УЗт2і |
|
|
|
|
E>»S-= К Т Е М Д » |
У2 + |
У З ; |
|
|
E2S== (ктсмз- KN £ M])K Х З ; |
|
|||
EÎS:= K T [ M ] и уз + |
K N Ü M 1 « У2; |
|
||
Х2:=Х2/б; |
|
|
|
|
FOR. M'M STEP 1 TWTIl. 4 De |
|
|||
FOR K2'.= 4 STEP |
A UNTIL ^ D ® |
|
||
BEGIN |
КЗ'»к2+4; |
|
||
JR[K1,K23:- E4S-E1S; |
|
|||
JR.[K4,K3]:= |
E4S»E3Sj |
|
267
З Я І К ^ К М - . » Ж И К ^ М Э ^ E 4 S * E I S
E N D ; |
|
|
|
|
|
|
|
FOR, |
A : = < V D<2> |
|
|
|
|
||
BEGTNl |
EM t1]'-= EWC53l=I"TJ* L*(* - TJ) + NP».A'> |
||||||
ENtSU:=ENCej!= J x T J + I x O - T J ) * |
ЫрхА- |
||||||
ENCWl s EM[7]i = K>cTJ + J K ( A - T J ) + |
NPX-A;, |
||||||
E N [4]:= ENt8]: = L.xTCr+ Kx(-t-7J)+ |
MP* A ; |
||||||
Kn: = 4 * A ) |
|
|
|
|
|
||
FOR. M:=4 |
S T E P 4 |
TJMTlb -4 |
DO |
||||
BEÇXN K 2 : - N-t- К Л ) |
|
|
|||||
|
li:- |
JKUtNr, |
|
|
|
||
|
K3-= E N C K - Z ] ; |
|
|
||||
|
F O R . E:=4 |
S T E P |
4 U N T I L , 8 |
tx, |
|||
|
B E G I N K 4 - H + N S I E J ) |
|
|||||
|
|
C [ K S , K 4 j ! = |
ССКГ$,К4] * 7 R . C K 2 . E J |
||||
|
EMD |
|
|
|
|
|
|
EMD |
|
|
|
|
|
|
|
END |
|
|
|
|
|
|
|
END |
|
|
|
|
|
|
|
END; |
|
|
|
|
|
|
|
B E G I M I M T E G E R . A R R A S |
NZM:ÜiJ,NPüC1:NU3,K3tiM83; |
||||||
X W P T J T С N i ) ; |
|
|
|
|
|
||
A-.= &•.= -!; |
|
|
|
|
|
|
|
FOR, I»s |
A |
S T E P |
1 |
UMTXU |
NP2. DO |
|
|
B E G I N |
U t I J i = 0 ; |
|
|
|
|
||
I F 1= N21BJ |
ТйЕЫ |
|
|
|
|||
8 E G X M |
I F 8 = TJi |
THEM |
B>«4 E U S E |
B - - B + 4 - , |
go TO M 2.
M > )
N P U САЗ : * Г ,
END;
OUTPUT (NPU.NE)i
F0R.IT:=4 STEP 1 UNTIL, NITER DÇ» BE&IN FOR M:=1 STEP Л UNTIL NU DÇ>
BEGIN r-= J== NPULM]; JA:=5j
I f I>NP THEN SESIN JA-M4,l!=1-»4P END; FOR. К>Ь=0,<|,2 РФ
pea кг--о,\,г |
pe |
||
BEGIN |
A - K1*3> + ^2+45 |
||
K J |
£A3,:=I+(K2-1)*NN * Л - к 4 } |
||
I F |
WIA]<4 THEN K7LA3:»4; |
||
I f |
КЛА] |
>NP THEN KJCA}:=NP; |
|
K3CA+9ÛK0[A3+ NP |
|||
END; |
|
|
|
FOR. |
|
N:=4 |
STEP 4 UNTIL. Kb DO |
BE6T.N |
A.= |
tCJtN^ |
R E S - - R E S + C [ J , N 3 * U [ A 3
END",
COR.:= RELAX* RES/cCT,TA];
•ÜCJJ'«UC33COR.; I F E « 5 0 THEN
BEGIN |
CR. := ABS (COR./RELAX); |
I F |
CR > MX THENl NVX'.sCR |
END |
|