Une Presentation de La MEF
Une Presentation de La MEF
Une Presentation de La MEF
une prsentation
de la mthode
des
lments finis
GOURI DHATT
GILBERT TOUZOT
une prsentation
de la mthode
des
lments finis
LES PRESSES DE L'UNIVERSIT LAVAL QUBEC
MALOINE S.A. DITEUR PARIS
La publication de cet ouvrage a t encourage par une
subvention accorde au titre de la coopration franco-
qubcoise.
Cet ouvr8ge a t publi en Fr8nce dans /8
Collection Universit de Compigne
Meloine S,A. Editeur Pan. et les Prosses de l'Universit level Qubec 1981
La loi du " mers 1957 n'eIlIOT/unt. aux tOfmtlS des 31inkJs 2 Il' 3 de /'lJrticls 41, d'UM piJr1.
Que lu If copiu ()U fllJNoductions slr/cf9lTHmf rl1serv6es j l'us,gtl prlv' du copist. er non
UM u,;Iisarion collective Il et. d'ilurre part que les {JrHJIySf!s et les courtes ciffltions dams un hut
d'''Jfllmple fit d'illustrarions, N toute reprsentation bu reproduction intgrale, ou ptutlelle. '/Ji,,, S8I1S le
consentement de l'auteur ou d. ses avants d,o/U DU ayants CBUla, ast illicite Jt (elin6lJ premIer do
l'lift/cH 40),
CeNtt ,eprtJstmf"tion ou fsproduct;on. PlU qutllqu(I procd quit Ctl soit, corrs/llu,u"it d(H1c une
rontrefaon unet/allnthl fHI' les tlrtCms 426 et suiv6nts du CrxJ6 PtlMI.
ISBN. 2.224-00700-0 (Melaine)
ISBN 2-7637-6912-8 (Presses de l'Universit bvel)
Imprim en Frence
nos amis Jeanne.
Remerciements
Ce travail est le fruit d'une troite collaboration entre l'Universit Laval
et l'Universit de Technologie de Compigne dans le domaine des lments
finis. Ces deux Universits ont favoris pendant quatre ans les nombreux
changes ncessits par la rdaction de cet ouvrage. Un support financier
rgulier a t fourni par l'Office France-Qubec ainsi que par le Conseil
National de la Recherche du Canada.
Monsieur Guy Denielou, Prsident de l'UTC nous a prodigu des encou-
ragements personnels trs utiles dans les priodes de doute.
De nombreuses suggestions ont t faites par nos collgues et tudiants
de troisime cycle de Compigne et de Qubec, en particulier par Made-
moiselle Knopf-Lenoir et par Messieurs J.-L. Batoz, B. Buff, J.-F. Cochet,
G. Cantin, R. Kamga-Fomo et D. Parenti.
Monsieur C. Tahiani a consacr beaucoup de temps l'amlioration
du manuscrit et la correction des preuves.
Madame H. Michel et Monsieur J. Parent ont effectu un travail d'une
rare qualit l'occasion de la prparation du manuscrit.
Chaque phrase de cet ouvrage a t littralement crite deux : ceci
a constitu une exprience exceptionnelle pour les deux auteurs, malgr
et peut-tre cause de leurs diffrences de formation et de culture.
A tous les amis qui nous ont aids sans compter nous adressons nos
sincres remerciements.
Enfin nous rendons un hommage particulier l'esprit sportif dont
ont fait preuve Karine et Michle face la catastrophe qu'a t pour
elles la dcision d'crire ce livre.
G. DHATI, G. TOUZOT
Table des matires
O. INTRODUCTION ... . . ....... .. . . . ... ........... ..... 1
0.1 Mthode des lments finis ... . . . . . .. .. .. . . . . . .. . . . . .. .. . . . . . 1
O. 1. 1 Gnralits .............................................. 1
O. 1. 2 Evolution de la mthode .. .. .. .... .. .. .. .. .. .. .. .. .. .... 2
0.1.3 Etat actuel ............................................. 3
0 .2 But et,organisation du livre .... . . .. . . ... .......... .. .. ... .... . . 3
0 .2. 1 Enseignement de la mthode des lments finis . . . . . . . . . . . . . 3
0.2.2 Objectif du livre.............................. .. ........ 4
0 . 2.3 Structure du livre ......... , ....... ,., ............ ,.,. . . 4
CHAPITRE 1. APPROXIMATION PAR LMENTS FINIS.. .... . . . . 11
1.0 Introduction ................. ... ....................... ..... 11
1. 1 Gnralits . .. . . . . . . . . .. . . . . . . . . . . . . . . . .. . .. . .. . .. .. . . . . . . . . 11
1 . 1 . 1 Approximation nodale . ........ . . . . . ....... , . . . . . . . . . . . . 11
1 . 1 .2 Approximation par lments finis , .. ... .. ........ . , , . . . . . . 17
1.2 Dfinition de la gomtrie des lments. . . . . . . . . . . . . .... . . . . . .. . 22
1 .2. 1 Nuds gomtriques ........ ........ .... ........ .. ..... 22
1 .2 , 2 Rgles de partition du domaine en lments . .... . . ... . . . . . , . 22
1.2.3 Formes d'lments classiques. .. . . . . . . . . . . . . . . . . . . . . . . . . . 24
1. 2. 4 Elments de rfrence .. . . .. . .. .. .. .. .. .. .. .. . .. .. .. .. .. . 26
1. 2.5 Formes d' lments de rfrence classiques ..... . , ..... . . ,.. 30
1.2.6 Tables de dfinition des nuds et lments ..... . . ....... 33
1.3 Approximation sur un lment de rfrence. , . . . . . . . . . . . . . .. . . 36
1.3 . 1 Expression de la fonction approche u{x)... ... ... ... . .. . ... 36
1.3. 2 Proprits de la fonct ion approche u{x) ..... .. .. . .. . . .... . 39
1. 4 Construction des fonctions N ) et N ( . . . . . . . . . . .. . . . . . . . . . . 44
1 . 4.1 Mthode gnrale de construction .................. . , .. . . 44
1.4 .2 Proprits des fonctions N et N ..................... ,..... 49
1.5 Transformation des oprateurs de drivation . . . . . ....... ...... . 51
1.5. 1 Gnralits .............. . ...................... ,. .... 51
1 . 5. 2 Drives premires . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 51
1. 5.3 Drives secondes .. .. . .. .. .. .. .. .. .. . .. .. .. .. .. .. .. .. .. 54
1 .5.4 Singularit de la matrice jacobienne ... , , , , , , . , ...... , . , 57
x
Table des matires
1.6 Programmes de calcul des fonctions N, de leurs drives et de la
matrice jacobienne . , .... , , ......... ............ ...... , . . . . . . . 59
1 .6.1 Gnralits . ...... ............. . ................... .. .. 59
1 .6.2 Formes explicites de N ........... , . , ......... , . , ..... , . . . 60
1.6. 3 Programmes de construction automatique des fonctions N . . . . 61
1.6.4 Programmes de calcul de la matrice jacobienne et des drives
des fonctions N par rapport x .. .. , . . . . . . . . . . . . . . . . . . . . . . 75
1.7 Erreurs.d'approximation sur un lment. . . . .. . . . . . . . . . . . . . . . . . . . 77
1.7 . 1 Notion d'erreur d'approximation . , . . . . . . . . . . . . . . . . . . . . .. . . 77
1.7.2 Technique d'valuation de l'erreur. .. . ... . .. . . . ..... . . . .. . . 82
1.7,3 Amlioration de la prcision d'approximation. . .. .... . . .. .. . . 84
1 .8 Exemple d'application: problme de prcipitation ......... . .. , . . . 85
CHAPITRE 2. DIVERS TYPES D'LMENTS . . .. , . . . . .. .... . . . .. . . . . 93
2 . 0 Introduction .. .. ...... .... . .... .. . .... ..... . .... .. ... . .... 93
2. l Liste des lments prsents dans ce chapitre. . . . . . . . . . . . . . . . . . . . 93
2.2 Elments une dimension..................................... 95
2.2.1 Elmp.nt linaire (2 nuds, CO) .. . . .. .. .. . .. . . . . . . . . . . . . . . . 95
2.2.2 Elments de haute prcision de type Lagrange (continuit
. .... ...............................
2 .2.2 . 1 Elment quadratique nuds quidistants 13 nuds.
CO) ..................... ... ................. .. . 97
2.2.2.2 Elment cubique nuds quidistants 14 nuds.
............................ ...... .......... 99
2.2.2.3 El ment gnral n nuds ln nuds, ...... ..... 99
2.2.3 Elments de haute prcision de type Hermite... . .. .. .. ...... 100
2.2.3.1 Elment cubique 12 nuds, C'I ................ ,... 101
2.2.3.2 Elmenl du 5' ordre 12 nuds, C') .................. 103
2.2.4 Elments gnraux...................................... 104
2.2.4.1 Elment LagrangeHermite du 4' ordre 13 nuds,
C') ......... .. ...... . .......................... 105
2.2.4.2 Elmenl d'Hermite a 1 degr de libert non nodal
12 nuds, C') . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .. 105
2.3 Elments triangulaires (deux dimensions) ... , .,.................. 106
2.3.1 Systmes de coordonnes............................... 106
2.3.2 Elment linaire Itriangle, 3 nuds, .. . ... .. . .. . . .. .. . .. 108
2.3.3 Elments de haute prcision de type Lagrange Icontinuit
..................................... l
2.3.3.1 Elment quadratique Itriangle, 6 nuds, . . ....... 110
2.3.3.2 Elment polynme complet d'ordre r Itriangle,
nnuds,CO) ....... . .. . ... .... . . ................ 111
2. 3.3.3 Elment cubique complet Itriangle, 10 nuds. .... 113
2.3.3.4 Elment cubique incomplet Itriangle, 9 nuds, . ... 114
2.3.3.5 Elments curvilignes............................. 114
2.3.3.6 Elment non conforme (triangle, 3 nuds, ... 116
Table des mocires XI
2.3.4 Elments de haute prcision de type Hermite... ........ . . ... 116
2.3.4 . 1 Elment cubique complet !triangle, 4 nuds, semi-
CIl ............... . .. . ............... . ... .. .... 116
2.3.4 . 2 Elment cubique incomplet (triangle, 3 nuds,
semi-CII ...... .. .. ... . ...... ......... . .... .... .. 118
2 .3.4.3 El ment du 5' ordre (triangle, 3 nuds, CIl.. . . . . . .. . 118
2.4 Elments quadrilatraux (deux dimensions) .. , . . . . . . . . . . . . . . . . . . . 120
2 . 4.1 Systmes de coordonnes ... . . . . . . . , . .. . . .. . . .. . .. ", .. , 120
2 . 4.2 Elment bi-linaire (quadrilatre, 4 nuds, COI ... . . . . . . . . . . . 121
2.4.3 Elments de haute prcision de type 'Lagrange (continuit
COI . .. . . .............. .. .................... .. ......... 121
2.4.3.1 Elment quadratique complet !quadrilatre, 9 nuds,
COI .............. .. .. .. ................. . . . .... ln
2.4.3. 2 Elment quadratique incomplet (quadrilatre, 8 nuds,
COI . .... . .. . . ................ ... . . .. . . . ........ ln
2 . 4. 3. 3 Elment cubique complet (quadrilatre, 16 nuds,
COI ..... .. ....... . ............. . ........ .. .. . .. 124
2 . 4.3.4 Elment cubique incomplet (quadrilatre, 12 nuds,
COI .. . . ........ ..... . .. . .. . . .... . . ....... . . . .. . 125
2.4.3 . 5 Elments curvilignes .. . .. . .. ......... .. . .. .. .. . . . 126
2.4.4 Elments de haute prcision de type Hermite......... . ...... 126
2.4.4.1 Elment cubique (quadrilatre, 4 nuds, semi-CII .... 126
2.4.4 . 2 Elment rectangulaire (rectangle, 4 nuds, Cl) ,.. .... 128
2.5 Elments ttradriques !trais dimensions) . .. . .... . . ...... , . . ... , 130
2. 5.1 Systmes de coordonnes . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 130
2.5.2 Elment linaire (ttradre, 4 nuds, CO) . .. . .... . . . . . . . . . .. 130
2 . 5.3 Elments de haute prciSion de type Lagrange (continuit
COI . . ....... . ... .. ....... . ..... ......... .. . ........... 131
2.5.3 . 1 Elment quadratique complet (ttradre, 10 nuds,
C') ................ .. . . ............... .. ....... 131
2.5.3.2 Elment cubique complet {ttradre, 20 nuds, COI... 132
2.5.3 .3 Elments curvilignes ..... ................... .. ... 133
2.5.4 Elments de haute prcision de type Hermite..... . . ........ . 133
2 . 6 Elments hexadriques (trois dimensions) .. . ... . . . .. . . . .. . . ... .. 133
2.6.1 Elment tri-linaire (hexadre, 8 nuds, CO) . . .. . . . . . . . . . . . . . 133
2.6.2 Elments de haute prcision de type Lagrange (continuit
C') ... . .. . . ... . .. . ... .............. ....... . ... . . . ..... lM
2.6.2. 1 Elment quadratique complet (hexadre, 27 nuds,
COI ................. . ............. . . .. ... lM
2.6.2.2 Elment quadratique incomplet (hexadre, 20 nuds,
COI .............. . .............. . . .. .... 135
2.6 .2.3 El ment cubique incomplet (hexadre, 32 nuds,
COI .. ... .. .. ....... . . ..... . . . ~
2 . 6. 2 . 4 Elments curvilignes .... . ....... . . . . . .. . . . . ... .. . 139
2.6. 3 Elments de haute prcision de type Hermite . . . . . . . . . . . . . . . . 140
2 . 7 Elments prismatiques Itrais dimensions) . . . . . . .. . . . . . . .. .. ... . .. 141
2.7.1 Elment 6 nuds (prisme, 6 nuds, COI..... .. .. . .. 141
2.7.2 Elment 15 nuds (prisme, 15 nuds, CO) ........ .. . .. ... 142
XII
Table des matires
2.8 El ments divers .......... ... .......... . ,.".. . ............. . 142
2.8. 1 Approximation de grandeurs vectorielles ........... . ,.. 142
2.8.2 Modifications des lments ........................ ... ... 144
2 .8 .3 El ments nombre de nuds variable........ ..... .. ...... 146
2.8.4 El ments superparamtriques .............. , .... . '. . . .. 148
2.8.5 Elments infinis ....................... , ... . . , .... . . ,.. . 149
CHAPITRE 3. FORMULATION INTGRALE ...... . ..... . . , ..... , . . . 153
3.0 Introduction ................................................ 153
3.1 Classification des systmes physiques .............. ,........... 155
3. 1 . 1 Systmes discrets et systmes continus . . . . . . . . . . . . . . . . . . .. 155
3.1.2 Problmes d'quilibre, de valeurs propres et de propagation ... 156
3 . 2 Mthode des rsidus pondrs. . . .. .. . .. . .. .. . .. .. . .. . .. . . . . . .. 163
3.2 .1 Rsi dus.. ............ .... ............... .... .......... 163
3.2.2 Formes intgrales .. .. .. .. .. .. .. .. .. .. .. .. .. .. . .. .. . .. ... 164
3.3 Transformation des formes intgral es ..... ... .. .... , "".",. 165
3, 3. 1 Intgration par parties.,., ...... , ...... . ... , ....... , . .... 165
3 . 3 . 2 Forme intgrale faible.. .. .. ..... . . .... .. ... ... ........ .. 167
3. 3.3 Construction de formes intgrales additiollnellij:) ...... .. ... , 169
3.4 Foncti onnelles , .... , ... , ... , ........... , .... " ... ,......... . 171
3.4.1 Premire variation ... ,." ........................... , 171
3.4. 2 Fonctionnelle associe une forme intgrale ,....... ...... .. 172
3 . 4.3 Principe de stationnarit ............. , . . , . . . . . . . . . . . . . . .. 175
3 . 4. 4 Multiplicateurs de Lagrange et fonctionnelles additionnelles . . . 176
3 .5 Discrti sation des formes intgrales ........ . .................. , 182
3.5.1 Discrtisation de W . . . . . .. .. .. . . . . .. . . .. .. .. . .... . ...... 182
3.5.2 Approximation des fonctions u ........... ,..... ..... . . . .. 185
3.5 . 3 Choix des fonctions de pondration if; ................ ,. .. 186
3 . 5 . 3 . 1 Collocation par points ..... ....... ... . ......... ... 186
3 .5.3.2 Collocation par sous-domaines ....... .. .... .. . . 189
3 .5. 3 .3 Mthode de Galerkine ...... .. .............. ... ... 190
3.5 .3 ,4 M6thodo des moindres carrs ... , .. . ... , . . . . . . . . .. '92
3.5.4 Discrtisation d'une fonctionnelle (mthode de Ritzl ..... , ... 193
3.5.5 Proprits des systmes d'quations ............ .' ...... ' . .. 195
CHAPITRE 4. PRSENTATION MATRICIELLE DE LA MTHODE
DES LMENTS FINIS. .. .. . . .. . . . . . .. . .. .. .. . . . . . . . 199
4.0 Introduction ................................................ 199
4 . 1 Mth9de des lments finis . .. .. . .. .. . . ... .. . .. .. .. .. .. . . . .. .. 199
4 . 1.1 Dfinition ......... ..... ........ ......... .... .......... 199
4.1 .2 Conditions de convergence de la solution. , . . . . . . . . . . . . . .. 203
4.1.3 Patch test.... .... ........ ...... ...... ........ ......... 204
Table des matires XIII
4 . 2 Formes intgrales lmentaires discrtises W' . . . . . . . . . . . . . . . . . .. 208
4 . 2 . 1 Expression matricielle de W' . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 208
4.2 .2 Cas d'un oprateur r non linaire. .... ... .... .. . .......... 210
4 . 2 . 3 Forme intgrale W' sur l'lment de rfr,ence . . . . . . . . . . . . . .. 212
4 .2. 3 . 1 Transformation des drivations en)( .. . .......... . .. 212
4.2.3.2 Transformation des variables nodales ............... 213
4 .2.3.3 Transformation du domaine d'intgration . . . . . . . . . . .. 213
4 .2.3.4 Transformation de ,l'lment diffrentiel dS des
intgrales de contour . ........... , . . . . . . . . . . . . . . .. 214
4.2.3.5 Expression de [k] et(f}surl'lment de rfrence .... 216
4 . 2 . 4 Quelques formes classiques de W' et de matrices lmen-
taires ",.""""""""",.'" ............. ,., .... ,.. 217
4.3 Techniques de calcul des matrices lmentaires , ....... , . , . , . . . .. 217
4 . 3.1 Calcul explicite pour un lment triangulaire (Equation de Pois-
sonl ................................... . .............. 217
4 . 3.2 Organisation du calcul des matrices lmentaires par intgra-
tion numrique . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .. 222
4 . 3 . 3 Sous-programmes gnraux de calcul des matrices lmen-
taires ............................... . , ... .. , ........ ,. 224
4 . 3 . 4 Sous-programme ELEM01 (problmes Quasi-harmoniques) . . . . 225
4. 3 . 5 Sous-programme ELEM02 llasticit planel . . . . . . . . . . . . . . . . . 231
4.4 Assemblage de la forme ~ o b a l e discrtise W . . . . . . . . . . . . . . . . .. .. 240
4 . 4 . 1 Assemblage par expansion des ma1rices lmentaires . . . . . . .. 240
4. 4 . 2 Assemblage en mcanique des structures . , , . .. , . , .. , , . , , .. 245
4 .5 Technique d'assemblage . . . . . . . . . . . . . . . . . . . . . . . . . . . ..... . . . . .. 247
4 .5 . 1 Etapes de l'assemblage ............. .... ................. 247
4.5 . 2 Rgle d'assemblage .......... .................. .. ..... .. 247
4.5 .3 Exemple de sous-programme d'assemblage . ....... , , .. , . . .. 250
4. 5 .4 Construction de la table de localisation LOCE ....... . ..... 251
4.6 Proprits des matrices globales .. . . . . . . . . . . . . . . . . . . .. .. . . . . . .. 253
4.6 . 1 Structure de bande.................. .. . .. . ...... ....... 253
4.6 .2 Symtrie.............................................. 257
4.6.3 Mthodes de stockage .............. . ....... .. .......... 257
4.7 Systme d'quations global. .. . .. . .. ... .. .. .... . ...... .. ... .. 263
4.7 . 1 Expression du systme d't!lquations ........ , ...... .. .... , .. 263
4 . 7 .2 Introduction des conditions aux limites . . . . . , . , . . . . . . . . . . . .. 263
4.7 .3 Ractions .. . ... . . . . . ..... . ... .... ... . . . .. ... . ... . .. ... 265
4 . 7 . 4 Transformation des variables .... ..... . . , . . .. ... . .. . . ... .. 266
4 . 7 . 5 Relations linaires entre les variables. . . . . . . . . . . . . . . . . . . . . . . 268
4.8 Exemple d'application : quation de Poisson . . . .. . . ... . .......... 271
CHAPITRE 5. MTHODES NUMRIQUES .. .. . ... ...... . ..... .... . 277
5.0 Introduction ................................... .. ..... .. .... 277
5 . 1 Intgration numrique.. ..... . ... ...... .. . . . . .. .. ..... ..... 278
5. 1. 1 Introduction ................ . ....... .. ................. 278
XIV
Table des matires
5.1.2 Intgration numrique une dimension.... .. .... ... ....... 280
5. 1. 2. 1 Mthode de Gauss. . . . . . . . . . . . . . . . . . . . . . . . . . . . .. 280
5.1.2.2 Mthode de Newton-Cotes............ . . . .... . .... 286
5.1.3 Intgration numrique deux dimensions.......... . ....... 290
5. 1 .3. 1 Elment de rfrence carr .............. . . . ... , . .. 291
5.1.3.2 Elment de rfrence triangulaire, . . . . . ... . .. . ... . .. 294
5.1 .4 Intgration numrique trois dimensions ... , ......... , . . . .. 298
5.1.4.1 Elment de rfrence cubique........... . ..... . ... 298
5. 1 .4,2 Elment de rfrence ttradrique .. ....... .... , . .. 300
5. 1 .5 Prcision de l'intgration . ................ , ........... , . .. 301
5.1.6 Choix du nombre de points d'intgration................... 304
5.1.7 Programmes d'intgration numrique . ................... ,. 305
5.2 Rsolution de systmes d'quations linaires. , ., .. " " . . .... , . . .. 309
5.2.1 Introduction.... . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .. 309
5.2.2 Mthode d'limination de Gauss ...................... ,... 310
5.2.2.1 Triangularisation ................................ 311
5.2.2,2 Rsolution du systme triangulaire suprieur ..... ,... 315
5.2.2.3 Programme..................................... 316
5.2.3 Dcomposition......................................... 316
5.2.3.1 Introduction.................................... 316
5.2,3.2 Forme matricielle de l'limination de Gauss . . . . . . . . .. 318
5.2,3.3 Proprits des matrices triangulaires 1/'] .. , ...... ,... 319
5.2.3.4 Diverses formes de la dcomposition de IKl . . . . . . . . .. 320
5.2.3.5 Rsolution d'un systme par dcomposition ......... 321
5.2,3.6 Algorithmes de dcomposition. . . . . . . . . . . . . . . . . . . .. 322
5.2.4 Adaptation de l'algorithme (5.43) au cas d'une matrice
stocke par ligne de ciel . ..... , , ..... , ........... , . , , ... " 325
5.2.4.1 Matrice ligne de ciel rsidant en mmoire centrale. , , .. 325
5.2.4,2 Matrice ligne de ciel segmente sur disque . . , , , , . , , ,. 327
5.3 Rsolution de systmes non linaires ......... .. ....... .. ...... , 334
5.3.1 Introduction.. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .. 334
5.3.2 Mthode de substitution . . . . . . . . . . . . . . . . . . . . . . . . . . . . .. 336
5.3.3 Mthode de Newton-Raphson. . . . . . .. . .. . ... ... . . . . ... 341
5.3.4 Mthode incrmentale lou pas pasl ............. . . ...... 345
5,3.5 Changement des variables indpendantes .. ... , , .. . , . . . . . .. 347
5.3.6 Stratgie de rsolution ............ . . . . . . . . . . . . . . . . . . . .. 349
5.4 Rsolution de systmes non stationnaires. , ........ , .. ,. , .. , .. .. 351
5.4.1 Introduction........................................... 351
5.4.2 Mthodes d'intgration directe des systmes du premier ordre. 353
5.4.2.1 Mthode d'Euler explicite......................... 353
5.4.2.2 Mthode d'Euler implicite. . . .. .. . .. . ... .. .. . ... . .. 358
5.4.2.3 Mthode d'Euler se mi-implicite ............. ..... 362
5.4.2.4 Mthodes de type prdiction-correction............. 364
5.4'.2.5 Mthodes explicites de type Runge-Kutta .. , ..... , ,. 368
5.4.3 Mthode de superposition modale pour les systmes du pre-
mier ordre ., .......... ,., .............. , . . . . . . . . . . . . . .. 369
Table des matires xv
5.4 .4 Mthodes d'intgration directe des systmes du second
ordre ... ....... .... ...... ............. . ........ ....... 372
5.4 . 4 . 1 Mthode des diffrences finies centrales . . . . . . . . . . .. 372
5.4. 4. 2 Mthode de Houbolt ......................... .. .. 374
5.4.4.3 Mthodes de Newmark et Wilson.. . ........ .. . ... . 375
5.4.5 Mthode de superposition modale pour les systmes du
second ordre . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .. 380
5.5 Mthodes de calcul des valeurs et vecteurs propres . . . . . . . . . . . . . .. 384
5 . 5 . 1 Introduction .................. . .. ........ ..... ......... 384
5.5 .2 Rappel des proprits des problmes de valeurs propres . . . . . . 385
5.5.2.1 Formulation simplifie ... . . . . . . . . . . . . . . . . . . . . . . . .. 385
5 .5.2.2 Valeurs propres.. .. ............ .. ........... .. .. 386
5.5.2.3 Vecteurs propres ...... ....... .... ........... .... 386
5.5. 2.4 Dcomposition spectrale....... . . . .... . .... ....... 387
5 .. 5. 2.5 Transformation de (Kl et [M] . ..... . ........... . ... 388
5 .5. 2. 6 Quotient de Rayleigh ... .. . .. . . . . . .. . . . .. . . . ... . .. 390
5 .6.2.7 Sparation des valeurs propres.. .... . . ... ... .. .... 391
5.5.2.8 Dcalage des valeurs propres (( shifting )........... 392
5.5.3 Mthodes de calcul des valeurs propres .............. .. ,. 393
5.5.3. 1 Mthode de l'itration inverse ..................... 393
5.5.3 .2 Mthode de Jacobi..................... . ........ 395
5 .5.3.3 Mthode de Ritz .... .. . .... . .. .. ... ... .. . .. ..... . 401
5 . 5 . 3.4 Mthode du sous-espace . . . . . . . . . . . . . . . . . . . . . . . .. 402
CHAPITRE 6. TECHNIQUE DE PROGRAMMATION ..... . .......... 411
6.0 Introduction .............. .. ......................... ,. .. ... 411
6.1 Etapes caractristiques d'un programme d'lments finis. .. . . .. ... 412
6.2 Programme d'initiation BBMEF . . . . . ... .. . . ... ... .. .. .. .. .... .. 413
6.3 Programmes gnraux . .......... ... ... .... . .... . . . ..... . . ... 419
6.3. 1 Possibilits des programmes gnraux .. . .. .. ....... .. . .. .. 419
6 .3.1.1 Varits des problmes........ . .. ... .......... ... 419
6.3.1.2 Taille des problmes........ .... . ...... . . . .. . .... 420
6.3.2 Modularit............. ...... ..................... .. ... 421
6.4 Description gnrale du programme MEF . . . . . . . . . . . . . . . . . . . . . . . . 423
6.4. 1 Introduction ........... ...... .. ... . ..... . ......... .. .. . 423
6 .4.2 Organisation gnrale . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .. 423
6.4.2.1 Enchanement des blocs fonctionnels. . . . . . . . . . . . . .. 423
6.4.2.2 Allocation pseudodynamique des tables . . . . . . . . . . .. 424
6.4.2.3 Normes de programmation ....... ................. 425
6 .4.3 Organisation des donnes. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .. 428
6.4.3.1 Blocs de lecture des donnes et blocs d'excution .... 428
6.4. 3. 2 Tables en mmoire centrale et tables sur disque . . . . .. 428
6.4.3.3 Description des tables principales et variables des
" COMMON . ... .. . ....... ..... .......... .. ... 429
XVI
- Table des matlres
6.5 Description et liste des blocs fonctionnels ........ .... .. , .. , . . . . . 429
6 . 5 . 1 Programme principal... ...................... .. . ........ 429
6 . 5 . 2 Blocs fonctonnels de lecture des donnes . . . . . . . . . . . . . . . . .. 441
6 . 5. 2. 1 Bloc' IMAG ' ....................... ... .. . . .... 441
6.5. 2.2 Bloc' COMT' ........................... .. ..... 442
6 . 5. 2.3 Bloc' COOR' .................... .... ..... .. ... 443
6 .5. 2.4 Bloc' DLPN' .. .............. .. .... .... ........ 446
6 . 5. 2.5 Bloc' COND' ...... . ..... .. .................... 44B
6 . 5.2.6 Bloc' PRND' ....... .. ......................... 451
6 . 5.2.7 Bloc' PREL' ................... ........ ........ 452
6.5.2.8 Bloc' ELEM' ................ .. . ...... ......... 454
6.5.2.9 Bloc' SOLe' ........................ . ......... 460
6.5.3 Blocs fonctionnels d'excution........................... 462
6 . 5.3.1 Organisation des blocs d'excution., .. ,............ 463
6.5.3.2 Bloc' SOLR' ............ .... .. .. .. ......... ... 464
6.5.3.3 Bloc' L1NM ' .............. . . . ... . .... .... ..... 467
6.5.3. 4 Bloc' L1ND' ............ ..... .................. 479
6 . 5.3.5 Bloc' NLlN' ......... .. .. ...................... 486
6 . 5.3. 6 Bloc' TEMP' .......... .. . .. ..... . ...... .... ... 491
6 .5 .3.7 Bloc' VALP' ............ .. .. ... ... .... .... .... 496
6.6 Description des donnes de MEF . . , . . . ... .. . . . . ... ... ... .. . .. .. 501
6. 6. 1 Conventions . .. .... . .. , . . .. . . .... ....... .... . . .. .... ... 501
6 .6 . 2 Donnes correspondant chaque bloc . . . . . . . . . . . . . . . . . . . . . 502
6 .7 Exemples d'utilisation de MEF .... . , . . .................... , . .. 509
6 .7 . 1 Transfert de chaleur.. . . . . .. .. . . . .. . .. .. .. .... . .. . ... . . .. 609
6. 7. 2 Elasticit plane . .................. . . ..... ....... ....... . 524
CHAPITRE 0
1 ntrod uction
0.1 Mthode des lments finis
0.1.1 GN RALlTS
L'volution actuelle de la technologie amne l'ingnieur raliser des
projets de plus en plus complexes, coteux, et soumis des contraintes de
scurit de plus en plus svres. Nous pensons bien sOr aux projets
spatiaux, aronautiques et nuclaires dans lesquels la scurit est vitale.
D'autres types de projets d'envergure 50n1 lis notre environnement:
contrle de la pollution thermique, acoustique ou chimique, amnagement
des cours d'eau, gestion des nappes souterraines, prvision mtorolo
gique. Pour dominer ces projets, l'ingnieur a besoin de modles qui lui
permettent de simuler le comportement de systmes physiques complexes ..
Il peut ainsi prvoir l'influence de ses dcisions au moment de la concep
tion du systme.
Les sciences de l'ingnieur (mcanique des solides et des fluides, ther
mique ... ) permettent de dcrire le comportement de systmes physiques
grce des quations aux drives partielles. La mthode des lments
finis est l'une des mthodes les plus utilises aujourd'hui pour rsoudre
effectivement ces quations. Elle ncessite l'utilisation intensive de l'ordi
nateur. C'est une mthode trs gnrale qui s'applique la majorit des
problmes rencontrs dans la pratique : problmes stationnaires ou non
stationnaires, linaires ou non linaires, dfinis dans un domaine gom
trique quelconque une, deux ou trois dimensions. De plus elle s'adapte
trs bien aux milieux htrognes souvent rencontrs dans la pratique
par l'ingnieur.
La mthode des lments finis consiste utiliser une approximation
simple des variables inconnues pour transformer les quations aux drives
partielles en quations algbriques. Elle fait appel aux trois domaines
suivants:
- Sciences de l'ingnieur pour construire les quations aux drives
partielles.
- Mthodes numriques pour construire et rsoudre les quations
algbriques.
2
Mthode des lments finis
- Programmation et informatique pour excuter efficacement les
calculs sur l'ordinateur.
0,1,2 VOLUTION DE LA MTHODE
Depuis une cinquantaine d'annes la mcanique des structures permet
l'analyse des assemblages de barres et poutres [1 J, Le comportement de
chaque lment de barre ou de poutre est reprsent par une matrice de
rigidit lmentaire construite grce aux hypothses de la rsistance
des matriaux. A partir des matrices lmentaires, nous construisons un
systme d'quations algbriques en utilisant des conditions de continuit
des dplacements et d'quilibr des forces aux points de jonction des
lments ou nds, La rsolution du systme d'quations correspondant
des sollicitations donnes conduit aux dplacements de tous les nuds
de la structure, L'apparition des ordinateurs et les besoins de l'industrie
aronautique ont provoqu un dveloppement rapide de la mcanique des
structures entre 1950 et 1960, Turner, Clough, Martin et Topp [2J intro-
duisent en 1956 le concept d'lment fini : ils reprsentent un milieu
continu lastique deux dimensions par un assemblage de panneaux
triangulaires sur lesquels les dplacements sont supposs varier linaire-
ment. Le comportement de chaque panneau est caractris par une
matrice de rigidit lmentaire, A partir de ces matrices, la technique
classique de la mcanique des structures conduit la solution, c'est--
dire aux dplacements en tout point du milieu continu,
Soulignons galement le travail de Argyris et Kelsey [3J qui systmatise
l'utilisation de la notion d'nergie dans l'analyse des structures, En fait
les ides de base de la mthode des lments finis apparaissent dj
dans Courant [4], Hrennikoff [5J et Mc Henry [6J,
Ds 1960 la mthode des lments finis subit un dveloppement rapide
dans plusieurs directions:
- La mthode est reformule, partir de considrations nergtiques
et variationnelles, sous la forme gnrale des rsidus pondrs [7 -10],
- De nombreux auteurs crent des lments de haute prcision [11 J
et des lments cts curvilignes ou isoparamtriques [12-13J,
- La mthode des lments finis est reconnue comme un outil gnral
de rsolution d'quations aux drives partielles, Elle est donc utilise
pour rsoudre des problmes non linaires et non stationnaires dans le
domaine des structures ainsi que dans d'autres domaines: mcanique des
sols et des roches, mcanique des fluides, thermique, etc, [14-26],
- Une base mathmatique de la mthode des lments finis est
construite partir de l'analyse fonctionnelle [27 -28],
A partir de 1967, de nombreux livres sont publis, en langue anglaise,
sur la mthode des lments finis [29-56], Signalons en particulier les trois
ditions trs. rpandues du livre de Zienkiewicz [30], A l'heure actuelle
seules sont disponibles en franais des traductions des ouvrages de
Introduction 3
Zienkiewicz, seconde dition [53), de Gallagher [54J, de Rockey et 01. [55),
ainsi que les ouvrages de Absi [56J et d'Imbert [56aJ. D'autre part plusieurs
revues sont consacres principalement la mthode des lments
finis (57 -62].
0.1.3 TAT ACTUel
La mthode des lments finis est maintenant trs rpandue dans les
industries, en particulier en construction aronautique, arospatiale,
navale et nuclaire. Elle se dveloppe en ce moment dans les applications
de la mcanique des fluides: tude de la mare, des transports de sdi-
ments, tude des phnomnes de pollution thermique ou chimique, des
interactions fluide-structure. De nombreux programmes gnraux de
calcul sont disponibles pour utiliser industriellement la mthode des
lments f inis, principalement dans le domaine de la 'mcanique des
solides. Citons par exemple NASTRAN, ASKA, SAP, MARC, ANSYS,
TITUS, ADINA [21, 65, 66, 67]. Ces programmes gnraux sont conus
pour tre excuts sur de gros ordinateurs. Une nouvelle gnration de
programmes, plus modulaires et adapts aux mini-ordinateurs, va per-
mettre l'utilisation de la mthode des lments finis par des entreprises
et bureaux d' tude de taille rduite. Il existe dj quelques programmes qui
permettent de rsoudre des problmes de dimension moyenne sur des
micro-ordinateurs (voir Rammant [25]).
Pour que la mthode des lments finis soit efficace dans les applica-
tions industrielles, il faut utiliser des programmes d'assistance la prpa-
ration des donnes et l'interprtation des rsultats. Ces pr- et post-
processeurs se dveloppent rapidement en ce moment; ils ut ilisent
Ies techniques de l'informatique graphique et interactive.
0,2 But et organisation du livre
0.2.1 ENSEIGNEMENT DE LA METHODE DES t:LMENTS
FINIS
Bien que l'utilisation de la mthode des lments finis soit courante,
son enseignement n'est pas encore trs rpandu. Ceci s'explique sans
doute par la difficult de cet enseignement trs multi-disciplinaire. La
comprhension de la mthode exige en effet des connaissances dans des
domaines varis :
- comprhension du problme physique tudi et connaissance
intuitive de la nature de la solution cherche
- approximation des fonctions inconnues par sous-domaines et
construction de fonctions d'interpolation
4 Mthode des lments finis
- construction des quations du systme tudi sous forme varia-
tionnelle, soit il partir de mthodes nergtiques, soit partir d'quations
aux drives partielles
- technique d' organisation matricielle des donnes
- mthodes numriques d'intgration, de rsolution de systmes
d'quations algbriques et diffrentielles, linaires et non linaires
- techniques informatiques adaptes il des programmes complexes
et des volumes d'information importants.
II est difficile de concevoir un enseignement qui assure une formation
quilibre dans tous ces domaines. De plus il est ncessaire d' utiliser des
logiciels adapts renseignement, mais qui prsentent la majorit des
caractristiques des programmes gnraux. Enfin de nombreux dtails
pratiques manquent il l'tudiant lorsqu'il passe de la formulation de la
mthode prsente dans les livres li la programmation effectiv de celle-ci.
l'enseignement de la mthode des lments finis est encore donn prin-
cipalement au niveau du 3' cycle; par contre il va se dvelopper rapide-
ment au niveau du 2' cycle des coles d'ingnieur.
0.2,2 OBJECTIF DU LIVRE
le prsent ouvrage est conu pour aplanir les difficults d'enseignement
de la mthode des lments finis. Celle-ci a t dveloppe et est utilise
principalement par des ingnieurs. La prsentation est donc oriente vers
l'ingnieur. Les connaissances mathmatiques requises sont limites au
calcul matriciel et diffrentiel.
Le livre s' adresse aux lecteurs qui dsirent comprendre la mthode et la
mettre en uvre effectivement sur l'ordinateur. Il est donc utile li la fois
aux tudiants et chercheurs en sciences appliques, et aux ingnieurs
praticiens qui dsirent aller plus loin que la simple utilisation des pro-
grammes disponibles comme des boites noires .
0.2,3 STRUCTURE DU LIVRE
Ce volume est organis en 6 chapitres qui prsentent de manire assez
indpendante les divers concepts de la mthode des lments finis ainsi
que les techniques numriques et informatiques correspondantes.
Chapitre 1
Expos de la technique d'approximation nodale d'une fonction par
sous-domaines et introduction des notions de fonction d' interpolation,
d'lment de rfrence, de transformation gomtrique et d'erreur
d'approximation.
Introduction 5
Chapitre 2
Prsentation des fonctions d'interpolation des lments classiques
une, deux et trois dimensions.
Chapitre 3
Description de la mthode des rsidus pondrs qui permet de construire
une formulation intgrale partir d'quations aux drives partielles.
Chapitre 4
Formulation matricielle de la mthode des lments finis qui consiste
discrtiser la formulation intgrale du chapitre 3, en utilisant les approxi-
mations des chapitres 1 et 2. Nous introduisons en partlculier les notions
de matrices et vecteurs lmentaires, d'assemblage et de matrices et
vecteurs globaux.
Chapitre 5
Description des mthodes numriques ncessaires pour construire et
rsoudre les systmes d'quations forms au chapitre 4 : mthodes
d'intgration numrique, de rsolution de systmes algbriques linaires
et non linaires, mthodes d'intgration en temps de systmes non sta-
tionnaires du premier et second ordre, et mthodes de calcul des valeurs
et vecteurs propres.
Chapitre 6
Expos des techniques informatiques caractristiques de la mthode
en nous appuyant sur deux programmes: l'un trs simple (BBMEF),
l'autre de complexit moyenne (MEF).
La figure 0.1 rsume l'enchalnement logique des chapitres. Remar-
quons que les chapitres l , 3 et 4 expliquent les concepts fondamentaux
de la mthode des lments finis, alors que les chapitres 2 et 5 sont plutt
des chapitres de rfrence; le chapitre 6 s'adresse aux lecteurs amens .
programmer la mthode, ou utiliser les programmes fournis dans ce livre.
Dans les chapitres l, 3, 4, 5, nous prsentons des sous-programmes qui
sont utiliss par les programmes du chapitre 6.
Pour la bibliographie, nous nous limitons aux rfrences directement
lies notre prsentation. Des bibliographies trs compltes sont pro-
poses dans Zienkiewicz [30J, Gallagher [54J, Norrie et de Vries [63J et
Whiteman [64J.
6 Mthode des lments finis
Chapitres 1 el 2 Chapitre 3
Tf ansf8rmal on
Approximalion des
des quatons
inconnues
(Formulat ion intgrale)
/
Chapitre 4 Chapitre 5
Discrtisation
Mthodes
1-
numriques
(Formulation matricielle)
1
------
;Chapitre 6
Mise en u .... re
sur l'ordinateur
1
(Solution)
Figure 0.1. Enchainement logique des chapitres.
REFERENCES
(1J N. J. HOFF, Anlllysis of Structres, Wiley, New York. 1956.
[2) M. J. TURNER. R. W. CLOUGH. H. C. MARTIN. and L. J . TOPP. Stillne" and Defiee-
lion Analysis of Complex Structures , Journ8/ of Aeron8utiCBf Science. Vol. 23,
pp. 805-823. '956.
13) J . H. ARGYRIS and S. KElSEY, Energy Theorems and Structural An8/ysis, Butterworth.
London, 1960.
(4) R. COURANT, fi Variationsl Methods for the Solution of Problems of Equilibrium and
Vibrations lt, Bull. Am. Msth. Soc., Vol. 49, pp. 1 -23. 1943.
(51 A. HRENNIKOFF, u Solution of Pwblems in Elasticity by the F,amework Method ,
J . Appt. Mech., Vol. 8. 1941,A169-A175.
(6l D, McHENRY, Il A lanice Analogy of the Solut ion of Plane Stress Problems _, J. Inst.
Civil Eng., 21, pp. 59-82, 1943.
[71 O. C. ZIENKIEWICZ and G. S. HOLISTER, SUess Ans/ysis, Wiley, New York, 1965.
(81 R. E. GREENE, R. E. JONES, A. W. MeLAY and D. R. STROME, Generalized Variational
Prlnclples in the Finite-Element Method, AIAA J., 7. No. 7, July, pp. 12541260.
'969.
(9J B. A. FINLAYSON. Weighted Residual Methods and their relation to Finite Element
Methods in Fl ow Problems >J, Finite Elements in Fluids, Vol. 2, pp. ' 31. Wiley. 1975.
Introduction 7
[10) E. A. DE ARANTES E OLIVEIRA, Theoretical Foundations of the Finile Element
Melhod Il, Internetional JoU/nal of SoJids and Strucwrss, Vol. 4. p. 929, 1968.
Ill) C. A. FELlPPA, Relined Fnite Element Analysis of linear and Non-linear Two- Oimen-
sionsl structures lt, Report UC SESM 66-22, Oepartment of Civil Engineering,
Universit" of California, Berkeley, Del. 1966.
[12] J. G. ERGATOUDIS, B. M. IRONS, and O. C. ZIENKIEWICZ, Three- Dimensional
Analysis of Arch Dams and Their Foundations, Symposium on Arch Dams, lostitute
of Civil Engineering, london, Mar. 1968.
(131 B. M. IRONS and O. C. ZIENKIEWICZ, le The Isoparametric Finite Element System-
a New Concept in Finita Element Analysis , Procesdings. Conference on Recen/
Advances in Stress Analysis, Royel Aeronauti eal Sociatv, London, 1968.
Compte rendus des confrences
(14) Proceedings of the 15t, 2nd, and 3rd Conferences on Matrix Methods in Structural
Mechanics, Wright- Patterson A.F .B" Ohio, 1965, 1968, 1971.
115) 1. HOUAND and K. BELL (eds.), FlnUe Element Melhods in Slress Analys;s, Tapir.
Trondheim, Norway, 1969.
(16) Proceedings of the 1 SI, 2nd, 3rd and 4th Conferences on Structural Mechanies in Reactor
Technology, 1971, 1973, 1975, 1977.
{17] Symposium on Applied Finlte Element Methods in Civil Engineering, Vanderbilt Univer-
sity, Nashville, ASCE, 1969.
(18J A. H. GAlLAGHER, Y. YAMADA, and J. T. ODEN (eds.), Recenl Advances in MatriJ(
Methods of SITUc/ural Analysis and Design, University 01 Alabama Press, Huntsville.
1971 .
{19] B. F. de VEUBEKE (ed.), High Speed Computing of Elastic Structures. University of
Lige, 1971.
(20] C. A. BREBBIA and H. TOTTENHAM (eds.), Variationsl Melhods in Engineering,
Southampton University, 1973.
[21] S. J. FENVES, N. PERRONE, J. ROBINSON, and W. C. SCHNOBRICH (eds.), Numerical
and Computational Methods in Slructural Mechanics. Academie Press. New York.
1973.
[22) R. H. GALLAGHER. J . T. ODEN, C. TAYLOR, and D. C. ZIENKIEWICZ (ed'.l, Intemn-
rionsl Symposium on Finira Element Methods in Flow Problems, Wiley, 1974.
(23J K. J. BATHE, J. T. ODEN, and W. WUNDERLICH (ads.). Formulstion andCompulst;onal
Algorithms in Finiee Element Analysis (U.S. - Germany Symposium). MIT Press,
1977.
124) W. G. GRAY. G. F. PINOER, and C. A. BREBBIA (eds.). Finite Elements in Welef
Resomces, Pentach Press. London, 1977.
125) J. ROBINSON (ed. ), Finite Element Methods in Commercial EnvironmBnt, Robinson
cnd AS50catas, Dorsel. England, 1978.
(26J R. GLOWINSKI, E. Y. RODIN, and O. C. ZIENKIEWICZ (eds.). Energy Methods in Finite
Element Analysis, Wiley, 1979.
(27) A. K. AZIZ (ed.), The Methematical Foundations of the Finita Element Method wilh
Applications to Parlial DifferentiaI Equations. Academic Press, New York, 1972.
(281 J. R. WHITEMAN (ad.), The Malhem9lics of Finite Elements and Applications, Acade-
mic Press, London, 1973.
Livres
1291 J . S. PRZEMIENIECKI, Theoryof Mattix SlruclUral Analysis. McGraw-Hill, New York,
1968.
130J O. C. ZIENKIEWICZ, The Finite Element Method in Engineering Science, McGraw-Hill,
Now York, 1st edition, 1967, 3rd odition, 1977.
8
Mthode des lments finis
(31] C. S. DESAI and J. F. ABEL, Introduction to the Finite Element Method, Van Nostrand
Reinhold, New York, 1972.
132] J, T. ODEN, Finile Elements of Non-Unes, Continua, McGrew-Hill, New York, 1972.
[33) H. C. MARTIN and G. F. CAREY, Introduction to Finite Element Ana/ysis, McGraw-Hili.
New York. 1973.
(34) D. H. NORRIE and G. de VRIES. The Finite Element Method, Academie Press, New
York, 1973,
(35] J. ROBINSON, Integrated Theory of Finite Element Methods, Wiley, London, 1973.
[36) G. STRANG and O. J. FIX, Analysis of the Finite Element Melh'ods, Prentic8- Hall,
New Jersey, 1973.
(37] O. UAAL, Finile Element Method, Basic Concepts and Applications, Intext Educationa!
Publishers, 1973.
(38) A. D. COOK, Concepts and Applications of Finite Element Analysis, Wiley, 1974.
[39] A. H. GALLAGHER, Finite Element Analysis Fundamentals, PrenticeHalt, 1975.
[40] K. H. HUEBN ER, The Finite Element Method for Engineers, Wiley, 1975.
[41] K. WASHIZU, Variational Methods in Elasticity and Plasticity, Perga mon Press, 2nd Edi
tion, 1975.
[42J K. J. BATHE and E. L. WILSON, Numerical Methods in Finite Element Analysis, Pren
tiee Hall, 1976.
[43] Y. K. CHEUNG, Finite Strip Method in Structural Analysis, Pergamon Press, 1976.
(44] J, J, CONNOR and C. A. BREBBIA, Finite Element Technique lor Fluid Flow, Butter
worth Co" 1976.
[451 L. J, SEGERLIN D, Applied Finite Element Analysis, Wiley, 1976.
(46) A. R. MITCH EL and R. WAIT, The Finite Element Methods in Pertial DifferentiaI Equa
tions, Wiley, 1977.
[47] G. F. PINDER and W, G. GRAY, Finite Element Simulation in Surface end SubSurface
Hydrology, Academie Press, 1977,
(48) P. TONG and J, ROSSETOS, Finite Element Method; 8asic Techniques and Implemen
tation, MIT Press, 1977.
[49] T, J. CH UNG, Finite Element Analysis in Fluid Dynamics, McGraw Hill, 1978.
(50] p, G. CIARLET, The Finite Element Method for Elliptie Problems, North Holland, 1978.
[51] B, M,IRONS and S. AHMAD, Techniques of Finite Elements, Ellis Horwood, Chichester,
England, 1978.
(52] C, S. OESAI, Elementary Finite Element Method, PrentieeHall. 1979.
[53) 0, C, ZIENKIEWICZ, La Mthode des Elments Finis (traduit de l'anglais), Pluralis,
France, 1976.
(54) A. H. GALLAGHER, Introduction aux Elments Finis (traduit de l'anglais par J. L.
Claudon), Pluralis, France, 1976.
[55] K. C. ROCKEY, H. R. EVANS, D. W. GRIFFITHS and
Elments Finis (traduit de l'anglais par C. Gomez), Eyrolles, 1979,
[56] E. ABS!. Mthode de calcul numrique en lasticit, Eyrolles, France, 1978.
[56a] J. F. 1 MB ERT, Analyse des structures par lments finis, CEPADU ES Ed., France, 1979,
Revues
[57)
[58)
[59)
[60)
[61)
[62)
[63)
[64)
International Journal for Numerical Methods in Engineering (eds, O. C, Zienkiewicz and
R. H. Gallagher), Wiley.
International Journal of Computers and Structures (ed, H. Liebowitz). Perga mon
Press,
Computer Methods in Applied Mechanics and Engineering (ed. J. H. Argyris), North
Holland.
International Journal of Computers and Fluids (ad. C. Taylor), Pergamon Press.
International Journal of Numerical Methods in Geotechnics (ed. C. S. Desai), Wiley,
Finite Element News, Robinson and Associates, Dorset. England,
O. H. NOR RIE and G. de VRIES, Finite Element 8ibliography, IFII PLENUM, University
of Calglll'Y, 1976.
J. A. WHITEMAN, A 8ibliography for Finite Elements, Academie Press, 1975,
Introduction 9
Comparaison de programmes
[65] W. P1LKEY, K. SCZALSKI el H. SCHAEFFER (eds.), Structural Mechanics Computer
Programs, Univ. Press of Virginia, Charlotteville, 1974.
[66) FRED ERIKSSON, MAC KER LE (ads.)
Structural Mechanics Finite Elements Computer Programs
Structural Mechanics Pre and Post Processor Programs
Finite Element Review
Stress Analysis Programs for Fracture Mechanics
Advanced Engineering Corp., Unkoping, Sweden, 1978.
[67) Grands codes de calcul de structures, Prsentation et critre de choix, CTICM, Puteaux,
1978.
CHAPITRE 1
Approximation par lments finis
1.0 Introduction
Ce chapitre est consacr aux techniques d'approximation grce u x ~
quelles nous pouvons remplacer un systme continu par un systme
discrtis quivalent.
Nous commenons par dcrire l'approximation nodale d'une fonc-
tion sur un domaine V, pour introduire ensuite la notion d'approximation
nodale par sous-domaines dite approximation par lments finis.
Pour cela nous prsentons la technique de partition d'un domaine en
lments.
Les concepts de transformation gomtrique et d'lment de
rfrence simplifient la construction des fonctions d'interpolation pour
des lments de formes compliques.
Nous dveloppons ensuite la technique gnrale de construction
des fonctions dnterpolation sur un lment de rfrence. La transforma
tion d'un lment de rfrence en lment rel est caractrise par la
matrice jacobienne.
Quelques pages sont consacres l'tude des erreurs dapproximation.
Enfin le dernier paragraphe propose un exemple complet d'utilisation
de I"approximation par lments finis pour valuer la quantit de pluie
tombe sur une rgion partir de mesures ponctuelles.
1.1 Gnralits
1.1.1 APPROXIMATION NODALE
Un modle mathmatique d'un systme physique fait intervenir plu
sieurs variables ou fonctions dites exactes u
ex
(x) : tempratures, vitesses,
paisseurs, etc. Celles-ci sont reprsentes par des fonctions appro
ches u(x) telles que la diffrence:
e(x) ~ u(x) - u,,(x) (1.1)
soit assez petite pour l'objectif vis.
12 Mthode des lments finis
Pour construire une fonction approche)l, nous pouvons:
choisir un ensemble fini de fonctions dpendant de n paramtres a, :
u(x, 8\. 8
2
.... , 8/1) ,
dterminer les paramtres 8
1
. 8
2
. '''' 8. pour satsfare la condi-
t ion (1,1). par exemple en faisant concider u .. (x) et u(x) en n points
XI' Xl .. " XII' c'est-A-dire en annulant e(x) en ces n points.
Les fonctions u(x, 8
1
, 8
2
''' , Bn} sont souvent choisies de manire
tre faciles valuer sur ordinateur, intgrer ou driver explicitement,
Ainsi l'approximation peut fournir :
- une expression approche en tout point x d'une fonction difficile
valuer ou connue seulement en certains points;
- une solution approche d'une quation diffrentielle ou aux drives
partielles,
Ces deux possibilits sont illustres par les exemples suivants,
EXEMPLE 1,1, Approximation d'une grandeur physique u(x) ,
Supposons qu'une temprature u(x) n. puisse tre mesure qu'en
trois points :
x u,,(x)
0
20 oC
0,5 25 oC
1
22 oC
Nous pouvons cependant avoir besoin d'une valeur approche
de U
ex
en des points qui ne concident pas avec les points de mesure,
Nous dsirons que l'approximation concide, en chaque point de
mesure, avec les valeurs mesures,
Choisissons une approximation sous la forme d'un polyn6me du
second degr :
u,,(x) '" u(x, ." ." .,) = " + ., x + ., x'
u,,(x = 0) = u(x = 0) = a, = 20
u,,(x = 0,5) = u(x = 0,5) = ., + 0,5 a, + 0,25 a
3
= 25
uu (x = 1) = u(x = 1) =., + " + a
3
= 22
D 'o:
a, = 20; ., = 18; .3 = - 16 ,
u,,(x) '" u(x) = 20 + 18 x - 16 x',
Alors au point x = 0,7 par exemple :
u(x = 0,7) = 20 + 12,6 - 7,84 = 24,76,
Approximation par lments finis
13
EXEMPLE 1. 2. Approximation de la solution d' une quation diffren-
tielle.
Cherchons une fonction un qui satisfasse :
l' quation diffrentielle :
d ~ ~ x ) = f(x) o 0 .;; x .;; 1
les conditions aux limites:
u" (x) = pour x = et x = 1
f(x) est une fonction connue telle que
f(x = 0,25) = 1
f(x = 0,75) = 0,25 .
Choisissons l'approximation de un qui satis/ait les conditions aux
limites :
u .. (x) "" u(xl = a, sin (" xl + a, sin (2 "xl .
Ecrivons que u vrifie l'quation diffrentielle aux points x, = 0,25
et x, = 0,75
d'ui
dx2 x,
=
d'ui
dx2 x,
~
D'o:
- a, '" sin (0,25 ,,) - 4 a, ,,' sin (0,5 ,,) = f (x,) = 1
- a, ,,' sin (0,75 ,,) - 4 a, ,,' sin (1,5 ,,) = f (x,) = 0,25.
5 1
- 4J '2. ,,'
3 1
32 ,,'
u,,(x) "" u(xl = - j 2.. sin (1t xl ~ 2.. 2.. sin (2" xl .
4 2 ,,' 32 ,,'
Alors au point x = 0,25 par exemple :
. 23 1
u(x = 0,25) = - 32 ? = - 0,072 8.
Dans cet exemple, l'approximation nous a permis de discrtiser
l'quation diffrentielle, c'est--dire de la remplacer par deux qua-
tions algbriques dont les inconnues sont les paramtres a, et a,.
14
Mthode des lments finis
Comme dans les deux exemples prcdents, la fonction approche u est
le plus souvent linaire en a, :
u(x) = PI (x) al + P,(x)., + ... + p.(x) (1 .2)
soit:
u(x) = < Pdx) P,(x) p.(x) > = < P> {a}. (1.3)
o : PI' P" "', p. sont des fonctions connues linairement indpendantes,
telles que des polynmes ou des fonctions trigonom-
triques. (Chaque fonction ne peut pas tre construite
par combinaison linaire des autres fonctions.) Ces
fonctions sont indpendantes des a" .
al. 8
2
... , an sont les paramtres de l'a'pproximtion.
Les paramtres al' ." .. " a. n'ont pas en gnral de sens physique.
Cependant nous pouvons choisir comme paramtres a, les valeurs de la
fonction Uu en n points appels nuds de coordonnes XI. X
2
'''' XI'!'
Imposons de plus que la fonction approche u concide avec la fonction
exacte U
ex
en ces nuds:
u(xd = u,,(x
l
) = u
l
u(x,) = u,,(x,) = u,
u(x.) = U.,(x.) = u .
La fonction approche (1 .2) s'crit alors:
u(x) = NI (x) u
l
+ N, (x) u, + ... + N.(x) u.
u(x) = < Ndx) N, (x) N.(x) >
u,
Dfinitions
(1 .4)
(1 . 5)
= < N> (u, ) .
- Les paramtres a, sont les paramtres gnraux de l'approximation.
- Les paramtres u, sont les paramtres nodaux ou variables
nodales de l'approximation.
La relatio'n (1.3) dfinit une approximation non nodale (exm-
. pies 1.1 et 1.2).
Approximation par lments finis
15
Ln relation (1 .5) dfinit une approximation nodale (exemple 1.3).
Lfs fonctions P(x) sont les fonctions de base de l'approximation.
L'lS fonctions N(x) sont les fonctions d'interpolation.
L'approximation nodale possde deux proprits
dcoulent des relations (1.4) et (1.5) :
fondamentales qui
a) Comme u(x,) = u" les fonctions N, vrifient
{
o si i",j
N/x,) = 1 . . .
SI 1 = 1 .
b) L'erreur d'approximation dfinie par:
e(x) = u(x) - un (x)
s'annule en tous les nuds XI ;
e(x,) = 0
(1 .6)
(1 .7)
(1 .8)
EXEMPLE 1.3. Approximation nod.le de type Lagrange 4 points.
Considrons une fonction u
cx
(x) quelconque mais connue seulement-
en 4 po;nts, que nous approchons pBr :
u(x) = N,(x) u, + N,(x) u, + N,(x) u, + N.(x) u.
o N, sont des polynmes de Lagrange du 3' degr de la forme
Ces polyn6mes satisfont la relation (1.6).
Par exemple NI s'crit:
N
(x - x,) (x - x,) (x - x.)
1 (x) = ( ) ( ) ( ) .
XI - x
1
x, - Xl XI - X
4
Si x, = 1,0 x, = 2,0 x, = 5,0 et x. = 7,0 le graphe de la fonction
N, (x) est le suivant:
1
- 24 (x - 2) (x - 5) (x - 7)
x 1 1,5 2 3 4 5 6 7
N, 1
77
a
1 1
a
1
a
192
-3 -4
6
16 Mthode des lments finis
N,
1 - ---
a. )(2
1.0 2.0
-,
' ,0
-,
7,0
-
Les fonctions u .. (x), u(x) et l'erreur e(x) se prsentent schmati-
Quement ainsi :
u,u ..
- u .. (It)
--- u bl
!Z"lllZ ~ l
-, -, -,
'.
-
La mthode d'approximation nodale d'une fonction d'une variable
u .. (x) s'tend directement l'approximation d'une fonction de plusieurs
variable.; par exemple dans le cas d'une fonction de 3 variables:
u .. (x, V,z) = u,,(x)
o:x=<x V z>
x appartient un domaine V,
La fonction approche u(x) s'crit sous la forme (1 ,5)
u(x, y, z) = u(x) = <N, (x) NI (x) .. , N.(x) >.
= <N> (u.l
u.
(1 ,9)
et doit vrifier la relation du type (1 ,4) :
u(x,) = u .. (x,) = u,
o x, = < x, y, z, >, ; i = 1, 2, .. " n sont les coordonnes des nuds,
Approximation par lments finis 17
1,1,2 APPROXIMATION PAR LMENTS FINIS [1, 2, 3J
La construction d'une fonction approche u(x) est difficile lorsque le
nombre n de nuds et donc de paramtres u, devient important. Le
problme se complique encore si le domaine V a une forme complexe
et si la fonction u(x) doit satisfaire des conditions aux limites sur la fron-
tire de V, comme dans l'exemple 1 ,2,
La mthode d'approximation nodale par sous-domaines sim-
plifie la on.struction de u(x) et s'adapte trs bien au calcul sur ordinateur.
Elle consiste :
- identifier un ensemble de sous-domaines V' du domaine V;
- dfinir une fonction approche u'(x) diffrente sur chaque sous-
domaine V' par la mthode d'approximation nodale, Chaque fonction
u"(x) peut dpendre des variables nodales d'autres sous-domaines comme
c'est le cas dans l'approximation de type Spline [3J,
La mthode d'approximation par lments finis est une mthode
particulire d'approximation par sous-domaines qui prsente les particu-
larits suivantes :
- L'approximation nodale sur chaque sous-domaine V
e
ne fait inter-
venir que les variables nodales attaches des nuds situs sur V' et sur sa
frontire,
- Les fonctions approches u'(x) sur chaque sous-domaine V' sont
construites de manire tre continues sur V' et elles satisfont des condi-
tions de continuit entre les diffrents sous-domaines,
Dfinitions
- Les sous-domaines V' sont appels des lments,
- Les points en lesquels la fonction approche u'(x) coincide avec la
fonction exacte u,,(x) sont les nuds d'interpolation ou points nodaux,
- Les coordonnes x, de ces nuds sont les coordonnes nodales,
- Les valeurs u, = u"(x,) = u,,(x,) sont les variables nodales,
L'approximation par lments finis prsente deux aspects distincts ;
- Il faut tout d'abord dfinir analytiquement la gomtrie de tous les
lments, ce qui est plus ou moins compliqu selon leurs formes,
- Il faut ensuite construire les fonctions d'interpolation N,(x) corres-
pondant chaque lment.
18 Mthode des lments finis
EXEMPLE 1 . 4. Approximation li une dimension par lments finis.
\I, U ..
"' 1 __
u
l
!. } :
,
, ,
,
,
,
,
,
"
,
,
,
,
"
'.
l ( ) ....... 1
---!...!'__ \Il _- 1
- ,
,
, ,
- lontilOIl ')loti. v..la) QIHIkonQllt 1
,
--- 16f1e1lOflt oppooch ... "'h} .,lllll ...
, ,
') 14
v'
v
Dfinition de 18 gomtrie des lments :
Nuds: l, 2, 3, 4.
CoordonnlJes nodales : Xt. Xl ' Xl ' x .
Domaine complet V : XI X x .
1 .
Elments V : XI X Xl
V
2
: X
2
X Xl
V
3
: Xl X x
4
.
Construction des fonctions approches u' (x):
Variables nodales: u . u
z
. u). U
4
Fonctions approches u' (x) sur chaque lment
1 :
u
'
(x) = N, u, + N, u,'
o N, et N, sont des fonctions linaires en x qui satisfont (1 .6)
N,(x,) = 1 N, (x,) - 0
N,(x,) = 0 N,(x,) - 1
Il' (al
------ . -----.. .
" "
"
"
Approximation par lments finis
X:) :
o :
"
o:
"
"
U
2
(X) = NI U2 + N
2
U,
"
N
_ x - X
2
2 -
X
3
X
2
"
u'(x) = NI U, + N
2
U.
"
19
'.
'.
Les fonctions u"(x) et NI(x) sont diffrentes pour chaque lment
V'; ces fonctions sont nulles en dehors de l'lment La somme
des fonctions ul(x), u
2
(x) el u'(x) donne la fonction approche u(x)
sur /' ensemble du domaine V :
'.
" \IL ........ ,..---_ _-
r-- - - _____ \1;, ... ..--
"
" "
'.
20
Mthode des lments finis
Dans l'exemple 1.4 prcdent nous avons pu facilement dfinir les
lments et construire les fonctions approches u'(x) et les fonctions
d'interpolation N,(x) pour chaque lment. Par contre dans l'exemple
simple deux dimensions suivant, la dfinition analytique des lments et
la construction de ces fonctions sont dj plus compliques.
EXEMPLE 1.5. Approximation linaire deux dimensions par lments
finis.
U lU
"
Dfinition de la gomtrie des lments
Nuds: 1, 2, 3, 4.
Coordonnes nodales: XI' X
2
, x" x .
Domaine complet V: quadrilatre 1-2-3-4.
E/ments VI : triangle 1-2-4
V
2
: triangle 2-3-4.
Construction des fonctions approches u' (x) :
Variables nodales: u
l
, u
2
' u" u .
,
'" <x y>
Fonctions approches tI'(x) linaires en X sur chaque lment
Approximation par lments finis
21
X :
u'(x) = N,(x) u, + N,(x) u, + N,(x) U
4
u
l
(x) est une fonction lineaire en x et y qui prend les valeurs u
i
u
2
, u
4
aux points XI' x
2
x
4
" Cette fonction est nulle en dehors du
domaine V',
La fonction NI est une fonction linaire en J( et y qui prend la
valeur 1 en x, et la valeur 0 en x, et x., N, esl nulle en dehors de V',
:
u'(x) = N.(x) u, + N,(x) u, + N,(x) u
4
'
La figure 1 ,1 rsume les diffrentes mthodes d'approximation voques
jusqu'ici.
Les deux paragraphes suivants proposent des mthodes systmatiques
de dfinition analytique d'lments de formes complexes et de construc-
tion des fonctions approches correspondantes,
-
r' x
Approximation
appart ient V
sur le
domaine entier V
L..
Partition
en sous
domaines
,..
Approximation
x
appartient VW
p"
sous-domaines
-
Approximation
nan nodale
Approximation
nodale
Approximation
gnrale par
sous-domaines
(non nod81e
et/ou nodale).
f?ar exemple: du
type Spline [31
Approximation
pa,
lments finis
Expression
typique de u :
u(x) - < P(x) > t 8 )
u(x) "" < N(x) > ( )
"'(x) < P'(x) > ( )
"'(x) < N'(x) > ( u, )
u'(x) - < N'(x) > { if.}
Figure 1 ,1, Mthodes d'approximation,
22 Mthode des lments finis
1 .2 Dfinition de la gomtrie des lments
1.2.1 NOEUDS GOMTRIQUES
Nous choisissons un ensemble de fi points. sur le domaine V. qui
servira dfinir la gomtrie des lments. Ces points. appels nuds
gomtriques. peuvent ventuellement concider avec les nuds
dinterpolation. Puis nous remplaons le domaine V par un ensemble
d'lments V' de formes relativement simples. Chaque lment V' doit
tre dfini analytiquement de manire unique en fonction des coor-
donnes des nuds gomtriques qui appartiennent cet lment.
c'est--dire qui sont situs sur V' et sur sa frontire.
EXEMPLE 1.6. Domaine une dimension.
Dans l'exemple 1 .4 les nuds 1, 2. 3, 4 sont des nuds gom-
triques choisis sur le domaine V. Chaque lment V' est dfini
partir des coordonnes des 2 nuds gomtriques situs ses
extrmits; par exemple l'lment 2 est dfini par :
EXEMPLE 1 .7. Domaine triangulaire deux dimensions.
Dans l'exemple 1 .5 les nuds 1. 2. 3. 4 sont des nuds gom-
triques. Chaque lment est dfini partir des coordonnes des
3 nuds gomtriques situs en ses sommets; par exemple l'l-
ment 1 est dfini par la condition : x appartient au triangle dont
les sommets sont XI. X
21
)4 .
. L'expression analytique exprimant cette condition est complexe;
nous en donnerons une forme explicite simple dans l'exemple 1 .9
en utilisant une transformation gomtrique.
1.2.2 RGLES DE PARTITION DU DOMAINE EN LMENTS
La partition du domaine V en lments V' doit respecter les deux rgles
suivantes:
a) Deux lments distincts ne peuvent avoir en commun que des
points situs sur leur frontire commune, si elle existe. Cette condition
Approximation par lments finis 23
exclut le recouvrement de deux lments. Les frontires entre lments
peuvent tre des points, des courbes ou des surfaces :
. l .
VI VI
Ir6nlllr.
1 dlm,n.IO<I
v'
Ironttir.
2 dilTllntlolU
recouyremtnl InQdmi u lbl.
ItOl'lllir.
:5 dim.nslon.
hl L'ensemble de tous les lments V' doit constituer un domaine
aussi proche que possible du domaine donn V, Nous excluons en parti-
culier les troUS entre lments :
If OU inodmlnible .nlr. tn ilim.ntl
Lorsque la frontire du domaine V est constitue par des courbes ou
des surfaces plus complexes que celles qui dfinissent les frontires des
lments, une erreur est invitable. Cette erreur est appele erreur de
discrtisation gomtrique, Elle peut tre rduite en diminuant la
taille des lments, ou en utilisant des lments frontires plus complexes :
"'t,,,r lkI 6i\Crills.olfon
!Ju!;jm.nlollon du nombre
d'e'lemll<111
ulltlMllion d'Jm.nli (. Ironti""
(ourbi ..
24 Mthode des lments finis
Les deux rgles prcdentes sont respectes si les lments sont
construits de la manire suivante :
- Chaque lment est dfini de manire unique partir des coordon-
nes des nuds gomtriques situs sur cet lment. Le plus souvent
ces nuds gomtriques sont situs sur les frontires de l'lment et
sont communs plusieurs lments.
- La frontire d'un lment deux ou trois dimensions est forme
par un ensemble de courbes ou de surfaces. Chaque portion de frontire
doit tre dfinie de manire unique partir des coordonnes des seuls
nuds gomtriques situs sur cette portion de frontire. Ainsi les por-
tions de frontire communes deux lments sont dfinies de manire
identique pour l'un ou l'autre lment.
EXEMPLE 1 .8. Frontire entre deux lmenl1l.
L'quation de la frontire 1-2-3 doit tre dfinie de manire unique
par les coordonnes des nuds " 2 et 3. On peut choisir la parabole
passant par ces 3 nuds.
1,2,3 FORMES D'ELEMENTS CLASSIQUES
Nous prsentons maintenant les formes de quelques lments clas-
siques correspondant des domaines une, deux ou trois dimensions.
Chaque lment est identifi par un nom prcisant sa forme ainsi que
par la type de courbe ou de surfaca qui en forme la frontire. De plus
nous donnons le nombre de nuds gomtriques ncessaires pour
dfinir l'lment.
8) Elments une dimension
'lneolre (21
Approximation par lments finis 25
b) Elments deux dimensions
Ce sont des triangles ou quadrilatres dont les cts sont des courbes
polynomiales du 1 er, 2
e
ou 3
e
degr.
Elments triangulaires:
quadratique (51 C l l b l ~ (9)
Elments quadrilatraux :
C]
CJ
quadfollqu. (81 cublqul(12)
c) Elments trois dimensions
Ce sont des ttradres. hexadres ou prismes dont les faces sont des
surfaces polynomiales du 1"'. 2" ou 3' degr.
Elments ttradriques:
!lnioJ't ''''
quodrollq\ll (tOI cublqll' 116)
Elments hexadriques
+
1
~
.-
1
~
-- ....
,'"
-
..
,
--
IIniolt. (B) QlJodrollqu. (20) cublqu. (32)
26
Mthode des lments finis
El ments prismatiques :
IInolre !6}
qo.Ioc!tol lqu.!I!I) cubique 1241
1.2.4 lMENTS DE RFRENCE
De manire simplifier la dfinition analytique des lments de forme
complexe, introduisons la notion d'lment de rfrence: un lment
de rfrence V' est un lment de forme trs Simple, repr dans un espace
de rfrence, qui peut tre transform en chaque lment rel V' par
une transformation gomtrique , ' . Par exemple dans le cas d' un triangle:
"
,
'.
0,'
T'
>
"
1- ~
v' 2- Xi
2
3_ xk
' J
0,0 r,o
<
(.
",
JI ,<_
"
tl4mlnl d, "Ibene. Ehimenl r,,'
la transformation t ' dfinit les coordonnes x' de chaque point de
l'lment rel partir des coordonnes ~ du point correspondant de
l'lment de rfrence
" : 1; -+ x' = x' (1;) . (1 .10)
la transformation t ' dpend de la forme et de la position de l'lment
rel, donc des coordonnes des nuds gomtriques qui le dfinissent.
Il y a donc une transformation t' diffrente pour chaque lment rel :
t ' : 1; -+ x' = x' (I;, x" x), x" .. . ) (1 .11)
O Xi' Xi' XI; ... sont les coordonnes des nuds gomtriques qU a ppar -
tiennent l'lment e.
Approximation par lments finis 27
Les transformations Tt' doivent gnrer des lments rels qui satis-
fassent les rgles du paragraphe 1 .2.2. Pour cela chaque transforma-
tion Tf' est choisie de manire prsenter les proprits suivuntes :
- Elle est bijective en tout point 1; situ sur l'lment de rfrence
ou sur S8 ' frontire : tout point de v
r
correspond donc un point de V
e
et un seul, et inversement.
- Les nuds gomtriques de l'lment de rfrence correspondent
aux nuds gomtriques de l'lment rel.
- Chaque portion de frontire da l'lment de rfrence, dfinie par
les nuds gomtriques de cette frontire, correspond la portion de
frontire de l'lment rel dfinie par les nuds correspondants.
Soulignons qu'un mme lment de rfrence V' (par exemple un
triangle 3 nuds) se transforme en tous les lments rels V' de mme
type (triangles 3 nuds) par des transformations r' diffrentes :
0,1
0,0
,
"
"
v'
,
"
v'
v'
,
1,0
{
npau 1{,1'J1 "PIlCt rHI (l,y)
limlnl dt r.,ireflel rem,"" ri.,.
Elment 1 r': 1; - x' x' (I;, x" x" x,)
Elment 2 r': 1; _ x' = x'(I;, x" x,. x,)
Elment 3 r': 1; - x' x' (S, x,. x., x,) ,
' .
"
"
,
A partir de maintenant, pour simplifier la notation, l'indice suprieur e,
caractristique d'un lment, sera supprim, Nous utiliserons une trans-
formation r linaire par rapport aux coordonnes { x, ) des nuds go-
mtriques de l'lment rel V' :
r: 1; - x(l;) [N(S)] {x,) ,
(1 .12)
28
Mthode des lments finis
De plus les fonctions de transformation sont choisies identiques pour
les trois coordonnes
X(s) <N(S{x,}
y(S) - < N (S) > {y,}
z(S) - < N(S) > { z,} .
Par exemple pour un triangle 3 nuds Xi X
j
X
k
X, + x
j
+ X, < N>
Y, + Yj + y, < N>
o appartient V'.
Les fonctions N, sont habituellement des polynmes en S appeles
fonctions de transformation gomtrique. Nous pouvons consi-
drer (1 .12) comme une approximation nodale par sous-domaines des
fonctions x(S) et Les fonctions N, doivent tre telles que la trans-
formation (1.12) satisfasse les trois proprits du paragraphe 1.2.4.
Elles sont construites de la mme manire que les fonctions d'interpo-
lation N(S), que nous tudierons aux paragraphes 1.3 et 1.4.
Grce la transformation gomtrique T nous remplaons la dfinition
analytique de chaque lment V' dans l'espace des x par la dfinition
analytique, plus simple, de son lment de rfrence V' dans l'espace
des S. Par la suite nous travaillerons systmatiquement dans l'espace
des S et nous utiliserons des fonctions la place des fonctions u(x), la
relation entre et x tant dfinie par (1.12). Les fonctions et u(x)
sont diffrentes, mais prennent la mme valeur en des points qui se
correspondent dans la transformation. Nous avons: u(x) ce
que nous noterons par simplicit u(x)
EXEMPLE 1 .9. Dfinition analytique d'un lment triangulaire trois
nuds.
0,'
,
v'
2
0,0
1,0 !
eSJ}<Ic, ('
Elm.nl de r/firenee
,
" 1 v'
eWllce x
!liment rel
, .
'i
h<X y>
,
r ;
Approximation par lments finis
L'lment de rfrence est dfini analytiquement par
+ 1
1;:;,0
Considrons la transformation r linaire en , IJ :
x(l;, - < 1 - - 1; .,
"> {;x:;}
y(l;, < 1 - 1; - > { }
Elle vrifie les trois proprits suivantes;
29
- Les nuds gomtriques de V' de coordonnes < 0 0 >,
< 1 0 > et < 0 1 > se transforment en les nuds gomtriques
de v
e
de coordonnes XI' x
j
, Xk' Par exemple .
x(1; 0, 0) < 1 0 0 > { :: } x; .
Chaque frontire de V' se transforme en la frontire corres-
pondante de V'. Par exemple la frontire passant par les nuds
< 1 0> et < 0 1 >, dont l'quation est 1 - - ry O,se trans-
forme en la frontire de V
e
passant par x
j
et x
k
dont l'quation
paramtrique est:
x < 0 1; 1 - > {::} x
j
+ (1 - ) x,
y < 0 1 - 1; > .; Yj + (1 - ) y,.
Nous remarquons que celle quation est linaire en 1; et et
ne dpend que des coordonnes Xl et X, des nuds situs sur
celle frontire.
30
Mthode des lments finis
- La transformation test b/ective si la matrice (JI n'est pas
singulire :
(JI =
det(J) =
ax
l;
y
al;
ax ay
a
t
l a" XI<. - Xi YIt - Yi
(X
j
- Xi) (y, - Yi) - (x, - Xi) (Yi - Yi) .
Ce dterminant est gal deux fois /' aire du triangle; donc il ne
s'annule que si les trois sommets de l'lment sont aligns. Plus
gnraloment les angles intrieurs de tous les triangles et quadri-
latres doivent rester infrieurs 180 degrs pour viter que det (J)
ne s'annule (3, 4].
Remarques
- Les lments de rfrence sont parfois appels lments parents,
- La transformation gomtrique t peut tre interprte comme un
simple changement de variables x - !'"
- !', peut galement tre considr comme un systme de coor-
donnes locales li chaque lment :
,0
,
r-{-'1 ~ O
2
1.2,5 FORMES D'LMENTS DE RFt:RENCE CLASSIQUES
Nous prsentons ci-dessous la forme et la dfinition analytique des
lments de rfrence correspondant aux lments classiques du para-
graphe 1 . 2.3.
a) Elments de rfrence une dimension
. ..
-,
o
, {
Ilneolt. (ZnoIUl:f')
Ir
-,
o
, ,
q\lodralique (:5 IlQi\lds)
v': ~ 1 5 51
. l'
-1 -'1,0
1
/
5
1 {
cubiQue (4r101l/M)
Approximation par lments finis
bl Elments de rfrence deux dimensions
El ments triangul aires
0,1 0 ,1
0, 1
o,t/"
0,'4
o' Ys
0,0 0 ,0
Ya,O
0, 0
1,0
{
1,0
{
II nlah. (3) quadrallque (6)
1 h S I
v': !
El ments carrs
." 0
-' , 1
1, 1
-', "
01 1, 1 ", t
- 1,0 1,0
-l,!!"
f---
{
,
{
,
-I.-:S
:
-l, "
" -,
-',"
0, "
, ," -l, ' 1
IIlIlolr. (4 ) q\ladrallqu. (81
v' , 1
-':5 "1:5
1
cl
Elments de rfrence trois dimensions
El ments ttradriques :
,
0,0,1
0, 0,0
o,r.o
quadroUqn (ID)
Ils ,'I"
;ris . Y"
Y".o
2/
s
,0 1, 0
cubl qut (9)
"
',,1 1, 1
\fa"
'/j," l ,"
cubiqui (121
cub/(lue It)
31
{
{
32
Mthode des lments finis
Elments cubiques:
t t
- ',"',' -1,1 , 1
-l, -1,-1
,t--+,--1r--"':::" ', l,'
, ,
,-'---+--
'.'
------..
-','," ...........
l,-l, " 1,1,-1 {
!llIto'" ! BI
Elments prismatiques:
0,0,1 j.o;:: ___ 0,1,'
1,0,1
1,0 , "
tlniol,. (6)
Remarques
0,',"
!
"
, ,
, ,
"'--1- --
'.
,
-- ...
'.
,
quadratique (20)
V' , 1
-,:S' (:5: t
-,
-,5'51
--
---
!
quodrollqui (I!))
e+7]:='
v' ,
e 2: 0
'IJ
!
,
1 ,
"d---
,
--
--...
'.
!
eublque (32)
"
cublqu. (24)
- Dans les lments de rfrence quadratiques les nuds situs sur
les cOts sont aux milieux de ceux-ci. Dans les lments cubiques, ils
sont situs au tiers et aux deux tiers des cOts .
. - Les fonctions de transformation gomtrique n'ont pas t
donnes explicitement pour les lments de rfrence ci-dessus. En effet
la consiruction de ces fonctions est identique Il celle des fonctions d'in-
terpolation qui sera dtaille au paragraphe 1 . 4.
Nous prsentons dans le paragraphe suivant l' organisation standard
des tables de donnes gomtriques, sous une forme qui se prte bien
la programmation.
Approximation par lments finis
33
1.2.6 TABLES DE DEFINITION DES NOEUDS ET ELEMENTS
Numrotons les nuds gomtriques squentiellement de 1 n, puis
dfinissons chaque nud par ses coordonnes dans un repre adapt
au problme. Ces coordonnes sont stockes dans la table des COoR-
donnes Globales CORG. Pour un problme deux dimensions, celle
table se prsente sous la forme :
1
x x,
Y
Y,
2
x,
y,
Nuds
3
x
3
Y3
...
...
Table CORG.
x-
"
y,
Numrotons les lments squentiellement de 1 n
el
puis dfinissons
chaque lment par la liste des numros de ses nuds gomtriques.
Celle liste est stocke dans la table de CONnECtivit CONEC
1
2
Nuds 3
1
Elments
2
Table CONEC.
e
n.
1
"
"
'3
.
'n-
o n'est le nombre maximum de nuds gomtriques par lment.
i .. i
2
i3 . . . Ir.. sont les numros des nuds de l'lment 8.
Les deux tables CORG et CONEC sont suffisantes pour dfinir compl-
t l ~ r r u n t la transformation r de tous les lments, c'est-- dire pour cons-
34 Mthode des lments finis
truire les fonctions et le vecleur des coordonnes des nuds de
chaque lment :
{ x, } =
X,
x,
EXEMPLE 1.10. Tables CORG et CONEC pour un problme deux
dimensions.
Considrons un domaine reprsent par deux lments
laires et un lment carr
'1
10,11":'-' ----"'-'-_'1'
,
,
(0,0) f 1, 0 1 (2,0 )
Les nuds sont numrots de 1 6.
Les lments sont numrots de 1 3.
Nuds
1 2 3 4 5 6
Table
CORG:
: 1 1 : 1 : 1 : 1 1 : 1
Table
CONEC:
Nuds
1
2
3
4
Elments
1 2 3
1 3 3
2 1 4
4 4 6
- - 5
Approximation par lments finis 35
Remarque il est important de choisir un sens de parcours pour
tablir la liste des nuds d'un lment, par exemple le sens trigono-
mtrique.
Le sous-programme de la figure 1,2 constitue un exemple trs simple
de cration des tables CORG et CONEC; il est utilis par le programme
88MEF prsent au chapitre 6. Des sous-programmes plus labors de
lecture des tables de coordonnes et de connectivit, et destins au pro-
gramme M H, sont prsents sur les figures 6.13 et 6.18.
C
C
COORDONNEES DES NOEUDS ET CONHECTIVITES
C
(TABLES CORG ET
C
C ENTREES
C NOIH DE DIHENSIONS DU (1,2,3)
C NHEL DE NOEUDS PAR
C
"'
NUHF:RO
"'
1.' UNTTF: I.OGIOUF: OF: L.F:CTURF: (H:!l DONNr.F:!l
C Kr NUHERO DE L'UNtTE LOGIOUE D' II\PRESSION
C
C SORTIES
C NNT NOHBRE DE NOEUDS TOTU
C NELT NOHBRE D'ELEHENTS TOTAL
C VCORG COORDONNEES DES NOEUDS
C KCONEC TABLE DE CONNECTIVITE
C
GRIL
GR 1 L
GRIL
GRIL
GRIL
GRIL
GRIL
GRIL
GRIl.
GRIL
GRIL
GRIL
GRIL
GRIL
GRIL
GRIL
GRIL
3
,
6
7
8
,
'" Il
" 13
--.-----.---.--.- -.-.-....... --.- - - ...... ____ .......... GRIL
14
18
16
17
18
l'
2D
21
IHPLICIT REAL-S(AH,OZ)
DIHENSIDN VCORC(NOIH.l).KCONEC(NNEL.I)
C LECTURE DES NOHBRES DE NOEUDS ET D'ELEMENTS
READ(HR,IOOO) NNT.NELT
1000 fORHAT(1615)
VRITE(MP.2000) NNT,NELT
2000 fORMAT(!'lNOMBRE DE NOEUDS_',IS,' NOHBRE 0 &L&H&NTS",I5!)
C LECTURE DES COORDONNEES
VRIT&(HP,2010)
2010 fORMAT(' NOEUDS COORDONNEES'!)
DO 10 IN_I,NNT
READ(HR,IOIO)(VCORG(I,IN),I_l,NDIH)
1010 fORHAT(8flO.0)
ID IfRITE(HP,2030) IN,(VCORG(I,IN),h.l,NOIH)
2030 fORHAT(IX,I8.8flo.S)
C LECTURE DES CONNECTIVITES
VRITE(MP,2030)
2030 fORHAT (/' ELEHENT CONNECT IV ITES' Il
DO 30 IE.I.NELT
1000)( KCONEC( l, lE) , 1 .. 1 ,MNEL)
20 IfRITE(MP,2040) IE,(KCONEC(I,IE),I_l,NNEL)
3040 fORHAT(IX,IS,SX,14IS)
RETURN
END
GRIL
GRIL
GRIL
GRIL
GRIL
"
"
Z4
CRIL 36
CR 1 L 26
GRIL 27
GRIL 26
GRIL 29
GRIL 30
GRIL 31
GRIL 32
GRIL 33
GRIL 34
GRIL 35
GRIL 36
GRIL 37
GRIL 38
GRIL 39
GRIL 40
GRIL 4l
GRIL 42
GRIL 43
Figure 1,2. Sous-programme G RI LLE de lecture du maillage du
programme BBMEF prsent au chapitre 6.
36 Mthode des lments finis
1 ,3 Approximation sur un lment de rfrence
1,3,1 EXPRESSION DE LA FONCTION APPROCHE u(x}
Nous choisissons Sur le domaine V un ensemble de n nuds d'nter
w
polation de coordonnes x" confondus ou non avec les nuds go-
mtriques. Sur choque lment v
r
nous utilisons une approximation
nodale de type (1 . 5) de la fonction exacte u .. (x)
u .. (x} "" u(x} < Ndx} N,(x} ,., N (x} > - < N(x} > { u. )
u.,
(1.13)
ou : x appartient V',
u
l
u
2
"' / U". SOf'It les valeurs de Uu aux n
r
nuds d'interpolation
de l'lment, ou variables nodales,
N(x) sont les fonctions d'interpolation sur l'lment rel.
Remplaons l'approximation sur l'lment rel par l'approximation
correspondante sur l' lment de rfrence :
Uu "" = < N > {u.)
(1 .14)
avec (1.12)
t: = {x.)
ou : {u. ) sont les variables nodales de l'lment,
< > sont les fonctions d'interpolation sur l'lment
de rfrence,
Remarques
- En gnral les fonctions N(x) ne sont utilises que pour des l-
ments simples. Elles sont le plus souvent remplaces par les fonctions
o x et sont lis par la transformation t dfinie par (1 . 12).
- Dans l'expression (1 . 13), les fonctions N(x} dpendent des coor-
donnes des nuds de l'lment et sont donc diffrentes pour chaque
lment. Par contre, dans l'expression (1 .14), les fonctions sont
indpendantes de la gomtrie de l'lmenl rel V'. Les mmes fonc-
Approximation par lments finis 37
tions N ~ ) peuvent donc tre utilises pour tous les lments possdant
le mme lment de rfrence caractris par :
sa forme ;
ses nuds gomtriques;
ses nuds d'interpolation.
EXEMPLE 1 .11. Fonctions d'interpolation d'un triangle trois nuds.
"
y
'.
0,1
,
'1
1
2
0,0
',0 (
Dans ce cas les 3 nuds sont la fois nuds d'interpolation el
nuds gomtriques, Les variables nodales sont
(u, 1 = El
L'interpolation linaire sur l'lment rel, de 1. forme (1.5), s'crit :
u(x, y) = < N, (x, y) N, (x, y) NJ(x, y) > { ~ J
o
1
N,(x, y) = 2A [(Y. - y)) (x) - x) - (x, - x,) (Yj - y)]
1
N, (x, y) = 2 A [(Y, - y,) (x, - x) - (x, - x,) (y, - y)]
1
N,(x, y) = 2 A [(y) - Y,) (x, - x) - (x) - x,) (YI - y))
2 A = (x, - x)) (YI - y) - (x, - x)) (y, - Yj) .
Nous observons que les fonctions N,(x, y) dpendent des coor
o donnes des nuds,
38 Mthode des lments finis
L'interpolation sur l'lment de rfrence s'crit simplement
u(I;, Il) = < N, N
2
(, Il) >
N, (l;, Il) = 1 - .; -
= 1;
N,(I;, Il) = 'I.
L'expression obtenue par interpolation sur Nlment de
rfrence est identique l'expression u(x, y) obtenue par interpo-
lation sur l'lment rel, li condition que les points (l;, Il) et (x, y)
se correspondent dans /a transformation T :
}
x(l;, = < N, N
2
N, >
r:
y(, = < N, N
2
N, >
{
o: N,;: N, N
2
;: N
2
N, = N, .
Dmontrons que u(o, ;: u(x
o
, Yo) si (1;0' correspond li
(x
o
, Yo) dans la transformation r. Choisissons par exemple
alors:
et :
1
';0 = li'
1
'10 =
1 1 1 { x, }
xo(';o, 110) = < 4 li '2 > ;:
1
= li (x, + xi + 2 x,)
1
yo(o, li (YI + Yi + 2 y,)
Approximation par lments finis 39
soit en reportant dans les expressions de N, (x, V). N, (x, V) et
N
3
(x, V) :
D'o:
1
N, (x
o
, Vol ~ li
1
N,(x
o
, Vol ~ li
1
N3 (x
O
, Vol ~ 2'
1 1 1 '
{
u }
u(xo, Vol ~ < li li 2 > ~ : '" u(o, ~ o ,
1.3.2 PROPRITS DE LA FONCTION APPROCHE u(x)
a) Proprit fondamentale de l'approximation nodale
Nous retrouvons les proprits de l'approximation' nodale du para-
graphe 1.1.1 : la fonction approche u(x) concide avec la fonction
exacte u .. (x) en tous l e ~ nuds d'interpolation de l'lment, de coor-
donnes X
j
:
D'o:
u .. (x,) ~ u(x,) ~ u, ~ < N, (x,) N,(x,) .. , >
{
0 si i", j
NJ(x.l ~ 1
si i ~ j.
u,
u,
u
De mme, en utilisant l'approximation sur l'lment de rfrence
D'o:
i",j
i ~ j.
u,
u,
u
(1.15)
(1.16)
40 Mthode des lments finis
EXEMPLE 1 .12. Proprit fondamentale des fonctions d'interpolation
d'un lment triangulaire trois nuds.
Dans l'exemple 1.11 nous vrifions par exemple que pour
N,(x = x,) = 0; N,(x = x,) = 0; N,(x = x,) - 1
et pour ~ = ~ , = < 0 1 >
N, ~ = ~ , ) = 0; N, ~ = ~ , ) = 0; N, ~ = ~ , ) = 1
b) Continuit sur l'lment
Si nous dsirons obtenir une fonction approche u(x) continue sur
l'lment, ainsi que ses drives jusqu' l'ordre s, nous devons utiliser
des fonctions N,(x) continues et drives continues jusqu' l'ordre s.
c) Continuit entre lments
Si nous dsirons que u(x) et ses drives jusqu' l'ordre s soient
continues sur une frontire commune deux lments, il faut que u(x) et
ses drives jusqu' l'ordre s dpendent de manire unique des seules
variables nodales associes aux nuds de cette frontire.
Considrons d'abord la continuit de u(x) sur une frontire (continuit
CO) :
u(x) - < N,(x) N,(x) ... >
u,
u,
u"
Les produits N,(x) u, doivent tre nuls si u, n'est pas une variable nodale
associe un nud de cette frontire.
D'o: N,(x) = 0 (1.17a)
lorsque x est situ sur une frontire et
u, n'est pas une variable nodale de cette frontire.
Approximation par lments finis
De mme sur l'lment de rfrence :
N , ~ ) ~ 0
lorsque ~ est situ sur une frontire et
U
i
n'est pas une variable nodale de cette frontire.
41
L d
. bu(x). . f ' '' d
a con ilIOn pour que ox SOIt continue sur une rontl re S Crlt e
manire similaire:
ou(x) iJN, (x)
---';ax'-'- ~ < ax
aN, (x)
ax > ...
U,.
O :
(1 . 17b)
lorsque x est situ sur une frontire et
li! n'est pas une variable nodale de cette frontire.
La condition prcdente s'crit sur l'lment de rfrence,. deux
dimensions:
lorsque ~ est situ sur la frontire et
U
j
n'est pas une variable nodale de cette frontire.
La notion de continuit sur les frontires entre les lments est une
notion cl de la mthode des lments finis. Elle est lie la notion d'l-
ment conforme ou non conforme. Le type de continuit qu'il faut assurer
dpend du problme trait et sera dtaill aux chapitres 3 et 4.
EXEMPLE 1 .13. Continuit sur la frontire d'un triangle trois nuds.
Considrons le ct x
J
- x, de l'lment de l'exemple 1 .11 dont
l'quation est :
(x, - Xi)
x - xJ ~ (y - YJ) ( ) .
y, - YJ
Nous pouvons vrifier que cette relation annule la fonction N, (x, y)
qui correspond au nud .
42 Mthode des lments finis
Le c6t correspondant (1, 0) ,- (0, 1) de l'lment de rfrence
a pour quation :
1-/;-,/=0.
Celle relation annule N.(/;, ~ ) . Par consquent la, fonction u'(x)
est continue sur le ct xI - x, puisqu'elle ne dpend, sur ce c6t,
que de u
J
et ul( et pas de U, :
u = u
j
+ (1 - {) u .
d) Fonctions d'interpolation polynomiales compltes
Nous pouvons diminuer l'erreur d'approximation (1 .7) en augmentant
le nombre d'lments et/ ou en diminuant la taille de chacun des lments.
Selon le problme tudi, nous voulons diminuer l'erreur u - u .. et
ventuellement les erreurs sur les drives. .
p'our que, sur chaque lment, l'erreur u - u .. tende vers zro avec la
dimension de l'lment, il faut que l'expression (1 . 13) de u contienne un
terme constant non nul (voir paragraphe 1 . 5) . L'approximation u peut
. alors reprsenter exactement la fonction u" = constante sur chaque l-
ment.
Pour que l'erreur u - JJ
u
" tende vers zro avec la dimension de l'l-
x x .
ment, il faut de plus que l'expression (1.13) de u contienne un terme
en x. Ainsi l'approximation a
JU
peut reprsenter exactement la fonction
, x
a:;, = constante sur chaque lment. Plus gnralement pour que les
erreurs sur u et sur toutes ses drives jusqu' l'ordre s tendent vers zro,
il faut que l'expression (1 . 13) cont ienne un polynme complet d'ordre s.
Si de plus u est continue sur les frontires entre lments, ainsi que ses
drives jusqu' l'ordre s - 1, les erreurs tendent vers zro en tout point
du domaine V, y compris sur les frontires. Si ces conditions de conti-
nuit ne sont pas satisfaites, il faut vrifier que les discontinuits sur les
frontires n'empchent pas les erreurs de tendre vers zro. Ceci peut
tre vrifi grce la technique du {( patch test [3, 5, 6] dcrite au
paragraphe 4 . 1 . 3.
Lorsque la transformat ion. t est linaire, les conclusions relatives
l'approximation u(x) sur l'lment rel se transposent directement
l'approximation u(!;) sur l'lment de rfrence : l'expression de u ~ )
doit inclure un polynme complet d'ordre s en , ~ , (. Lorsque la trans-
formation t n'est pas linaire, la condition de polynme complet en x, y, z
se transpose en une condition de polynme complet en , ~ , ( dans le
cas o < N > = < N > et s" 1 [7] .
EXEMPLE 1 . 14. Polynme complet pour un lment triangulaire ~
trois nuds.
Nous vrifions aisment que les expressions de u(x, y) et u(, ~ )
dans l'exemple 1 . Il incluent des polynmes complets d'ordre 1
Approximation par lments finis 43
er: x, y et , YJ. Ainsi les erreurs sur u et sur ses drives premires
tel ,dent vers zro lorsque la taille de chaque lment tend vers zro.
vrifions que les approximations u(x, V) et u(l;, peuvent repr-
senter exactement une fonction U
ex
(x, y) = constante = u
o
. Pour
cela reportons u
i
= u
j
= uII. = U
o
dans les expressions de u(x, y)
et u(l;, Nous obtenons:
u(x, V) = (NI (x, y) + N, (x, y) + N, (x, y)) U
o
= U
o
= (NI + + N,(I;, U
o
= U
o
puisque les fonctions N vrifient :
Dfinitions
Ndx, y) + N,(x, y) + N,(x, y) = 1
+ + = 1
- Si la fonction u(x) est seule continue sur les frontires' entre les
lments, l'approximation est de type Co (ou classe CO). Si u(x) et ses
drives premires sont continues, l'approximation est de type Cl.
Si u(x) et ses drives jusqu' l'ordre a sont continues, l'approximation est
de type C'.
- Un lment est dit isoparamtrique si les fonctions de transfor-
mation gomtrique N sont identiques aux fonctions d'interpola-
tion Ceci implique que les nuds gomtriques soient confondus
avec les nuds d'interpolation [2].
- Nous dirons qu'un lment est pseudo-isoparamtrique si ses
fonctions N et N sont des polynmes diffrents utilisant les mmes
monmes.
- Si l'ordre des polynmes est infrieur l'ordre des poly-
nmes l'lment est sub-paramtrique. Il est super-param-
trique dans le cas contraire. Ce dernier type d'lment n'est en gnral
pas recommand car il ne prsente pas la proprit (d) ci-dessus (voir
paragraphe 2.8.4).
- Le nombre de variables nodales u; associes l'ensemble des
nuds d'interpolation de l'lment est appel nombre de degrs de
libert de l'lment et not n,.
La description pratique des nuds d'interpolation est identique
celle des nuds gomtriques. Nous stockerons en fait leurs coor-
donnes dans la mme 'table CORG dcrite au paragraphe 1.2.6. De
mme la liste des numros des deux types de nuds de chaque lment
est place dans la mme table CONEC dcrite au paragraphe 1.2.6.
La distinction effective entre nuds gomtriques et nuds d'interpo-
lation sera faite, si ncessaire, dans les sous-programmes de calcul des
diverses fonctions N(I;) et N(I;).
44 Mthode des lments finis
1,4 Construction des fonctions N() et N()
Les fonctions de transformation gomtrique N(E,) et les fonctions
d'interpolation sur l'lment de rfrence N(E,) ont les mmes proprits.
Elles peuvent parfois tre construites directement partir de polynmes
qui possdent les proprits dcrites aux paragraphes 1.2.4 et 1 .3.2.
Ceux-ci sont souvent des polynmes classiques de type Lagrange
ou Hermite; cependant il n'existe pas de technique manuelle systma-
tique pour les construire. Seule l'exprience a permis de trouver les
fonctions N(E,) correspondant un certain nombre d'lments classiques.
Nous proposerons dans les paragraphes suivants une mthode num-
rique gnrale valable pour tous les types d'lments,
1 ,4,1 DE CONSTRUCTION
0) Choix de la base polynomiale
Exprimons u(E,) sur l'lment de rfrence sous la forme d'une combi-
naison linaire de fonctions connues indpendantes PI (E,), P,(E,), ....
qui sont le plus souvent des monmes indpendants. Le choix des fonc-
tions PI(E,) est l'une des oprations de base de la mthode des lments
finis:
u(E,) - < PI (E,) P,(I;) , .. >
1
"
.. ,
- < P(E,) > { }, (1.18)
L'ensemble des fonctions P(E,) constitue la base polynomiale de
l'approximation, Son nombre de termes doit tre gal au nombre de
variables nodales ou nombre de degrs de libert n
d
de l'lment. Nous
utilisons le plus souvent une base polynomiale complte; ceci n'est
possible que pour certaines valeurs de n
d
, Le tableau suivant prcise le
nombre de monmes ncessaires pour construire des polynmes complets.
Degr 1 dimension 2 dimensions 3 dimensions
du polynme
,
n
d
n
d
n
d
1 2 3 4
2 3 6 10
3 4 10 20
4 5 15 35
5 6 21 56
Approximation par lments finis 45
EXEMPLE 1.15. Bases polynomiales compltes et incompltes .
Nombre de Degr du
!
Base polynomiale < P >
1 n,
dimensions polynme 1
i
bases compltes
1 1 < 1 .; > (linaire) 2
1 2 < 1
,
>
(quadratique) 3
,
2 1 < 1
,
(linaire) 3
,
2 2 < 1
'1 fl
2
> 6
(quadratique)
3 1 < 1
.; >
(linaire) 4
3 2 < 1
,
,2
'1
(' \ >
10 ,
( quadratique)
bases non compltes
2
1
2 < 1
.; >
(bi-linaire) 4
3 3 < 1
\ :; >
8
(tri-linaire)
Pour construire les fonctions de transformation gomtrique N, choisis-
sons de la mme manire des expressions de x de la forme:
= < > (a, )
= < > {a, J (1 .19)
= < > (a, J .
Le nombre de fonctions et de coefficients (a,), (.,) et (a,)
est gal au nombre fi' de nuds gomtriques de l'lment.
Dfinitions
- Les coefficients {a J sont appels variables gnralises de
l'lment par opposition aux variables nodales (u. J.
- La relation = < > ( a J dfinit l'approximation gnra-
lise par opposition l'approximation nodale u() = < N() > {u. J.
- les coefficients { a. J, (a, ), {a, } sont appels parfois coordonnes
gnralises de l'lment par opposition aux coordonnes nodales
t x.). (Y.). (z. J des nuds gomtriques.
46 Mthode des lments finis
b) Relations entre variables gnralises et variables nodales
Exprimons qu'en chaque nud d'interpolation de coordonnes ( ;, ), la
lonction u() prend la valeur nodale u, = u,,(,) :
= ( u, ) =
u"
( u, } = [P,l ( a )
soit en inversant la matrice nodale [P,l d'ordre n,
( a) = [P ,r' ( u,J
p .. (;,) >
P,,(;,) >
( a }
(1 ,20)
(1 ,21)
Pour passer de (1 , 20) (1,21) il ne faut pas que [P,) soit singulire,
Si (P,l est singulire, cela implique qu'il n' est pas possible d'exprimer d'une
manire unique les paramtres ( a ) de la relation (1 ,18) en fonction des
variables nodales ( u, J. Ceci dpend du choix de la base polynomiale et
des coordonnes ( , ) des nuds de l'lment de rfrence. Puisque (P,)
est indpendante de la gomtrie de l'lment rel, la proprit de singu-
larit de [P,J est une caractristique de l'lment de rlrence et non de
l'lment rel.
De la mme manire, nous crivons les relations (1 , 19) aux nuds
gomtriques:
( x, J = [P.J ( a
x
J
( y, J = [P.J ( a, J
( z, J = [p,J ( a, J
soit aprs inversion de [,0,1 :
(a
x
) = [,or' (X,)
( a, ) = [P.J -, ( y, J
( a, ) = [P,J - , ( z, J
c) Expressions des fonctions N et N
Reportons (1 , 21) dans (1 ,18) :
soit:
d'o:
ut;} = < Pt;) > [P J -, ( u, J
ut;) = < N(;) > ( u, )
< N(;) > = < Pt;) > [P,r'.
(1 .22)
(1 , 23)
(1 ,24)
Approximation par lments finis
Nous obtenons de la mme manire dans le cas des fonctions N :
x(!;) = < > {x, }
= < > { y, }
= < > { z, }
o : < > = < > [p,r'.
dl Drivation de la fonction
Par drivation de (1 .24), nous obtenons:
{
u.,} [< P" >J [< N., >J
. u., = < p., > [p,r' { u, } = < N" >
u.(, < P,t. > < N .l, >
e) Rsum des oprations de construction de < N >
Choix de la base polynomiale < >
47
(1 .25)
(1 . 26)
Evaluation de la matrice nodale [P,] = i, j = 1, 2, ... , n,
1 nversion de la matrice nodale [P,]
Calcul de < N > aux points dsirs :
< N() > = < P() > [P,) -, .
Il est important de noter que ces oprations ne doivent tre effectues
qu'une seule fois pour l'ensemble des lments rels qui possdent le
mme lment de rfrence.
EXEMPLE 1 . 16. Construction des fonctions N() d'un lment qua-
drilatral isoparamtrique 4 nuds.
('1 ,
,) 4
,
(-, ,' 1
) ,
,
[1 .... lnr 61 ,4',rellCl
,
( l, 1 )
,
(1,,11
','.------, '.
,,-----J
')
11'<- r>
trimtnt ret
Puisque l'lment est isoparamtrique, les nuds sont la fois
nuds gomtriques et nuds d'interpolation.
48
Mthode des lments finis
a) Choix de la base polynomiale :
Nous avons n
d
= 4 variables nodales, et ne pouvons donc pas
utiliser un polyn6me complet. Le meil/eur choix, qui respecte la
symtrie et la continuit de u entre les lments, est une base bili-
naire en et
< P > = < 1 > .
Notons que = < P> ( a) devient linaire sur chaque ct
b) Evaluation de [P,J :
Evaluons < > en chacun des 4 nuds de coordonnes li, :
- 1
( , ) =
1
1 - 1 - 1 1 1
(P,] =
1 1 - 1 - 1 - 1
1 1 1 1
- 1
1
- 1 1 - 1
- 1
( ) =
1
1
c) Inversion de (P,J :
Dans ce cas, la matrice (P"l est orthogonale puisque les produits
scalaires de ses diffrentes colonnes sont nuls. Chaque vecteur
colonne a pour norme 4. Donc:
1 1 1 1
(P,J - 1 = (P"lT =
- 1 1 1 - 1
- 1 - 1 1 1
1 - 1 1 - 1
d) Expression de < N > :
< N > = < NI N
2
N, N. >
= <P>(P"l-1
<N>
1 - - +
=< .
1 + - - 1 + + +
4 '
<N>
1
= 4 < (1 - ) (1 -
4 4
1 - + - e"
4 >
(1 + 0 (1 - (1 + ) (1 + ;
(1 - ) (1 + > .
Approximation par lments firiis
L'lment est isoparamtrique :
<N>=<N>
= < N, N, N, N. >
= < N, N, N, N. >
X,
X,
X,
x.
Y,
y,
y,
Y4
1,4,2 PROPRITS DES FONCTIONS N ET N
49
a) Chaque fonction d' interpolation N,(!;) est constitue par le produit
scalaire de la base polynomiale < Pl!;) > et de la colonne i de la matrice
[P,l - I :
N,(!;) = < Pl!;) > { C, }
o: [P ,r 1 = [{ C,} {C,} .. , {C,} ... ].
(1 .27)
(1 .28)
La fonction N,(!;) est donc une combinaison linaire des fonctions
< PI!;) >, les coefficients tant les termes de la colonne ( C, ) de [P,l-I.
La matrice [P ,r 1 peut tre considre comme un moyen de stocker les
coefficients de l'ensemble des fonctions N"
b) La relation (1.24)
< N(!;) > = < Pl!;) > [P,}-I
s'crit en multipliant droite les deux membres par [p,l
< N(!;) > (p,l = < > .
En utilisant la dfinition (1 .20) de [p,l :
l N,(!;) Pj(!;,) = Pj(!;) j = 1, 2, ... , n, .
1-1
(1 . 29)
(1.30)
Cette relation est caractristique de la structure algbrique des fonctions
N" Elle prouve que les termes Pi!;) font partie de la base polynomiale
utilise pour construire les fonctions N"
50 Mthode des lments finis
Supposons qu'un ensemble de fonctions N, ait t construit empirique-
ment. Nous pouvons nous assurer que l'approximation = < N > { u, }
inclut un polynme quelconque en vrifiant si la relation 3uivante est
vrifie:
"
L .. ,
(1,31)
' -1
Dans les tudes de convergence il est en effet ncessaire de savoir quels
monmes sont inclus dans la fonction Par exemple, pour vrifier
que les monmes l, .:, sont prsents dans nous nous assurons
que:
"
L = 1
,- 1
"
L .:, =
'-1
"
L = ,
'-1
EXEMPLE 1.17. Proprits des fonctions N d'un quadrilatre linaire.
Nous pouvons vrifier que les fonctions N, de l'exemple 1. 16
. satisfont les relations (1 . 30) correspondant aux mon6mes 1, , q, q :
L = NI + N, + N, + N. = 1
,-,
L N,(I;, , = - NI + N, + N, - N. =
,-,
L N,(, q) '/, = - N, - N, + N, + N. = '/
,_ 1
L N.(t" '/) = N, - N, + N, - N. =
,-,
c) Par drivation de (1.30) nous trouvons des relations entre les
drives des fonct ions Nf du type:
oN,(I;,) P (" ) = (1 . 32)
oe l '0' - al: .
De telles relations, associes (1.15). (1.16). (1.17). (1.30) sont
utiles pour vrifier l'exactitude de formes explicites des fonctions N, et de
leurs drives.
Approximation par lments finis 51
1 .5 Transformation des oprateurs de drivation [2]
1.5.1 GNRAlITS
Les quations du problme physique tudi sont crites sur le domaine
rel. donc sur les lments rels; elles font intervenir des fonctions
inconnues un et leurs drives en x : 0%;1 . etc. Comme l'approxima-
tion (1 .13) sur l'lment rel est souvent complique nous utilisons syst-
matiquement l'approximation (1 .14) sur l'lment de rfrence:
U" ,., < > ( U, )
associe la transformation (1 .12) :
,: x xl!;) [N(m {x, )
x= -<x y z >
,>.
La transformation, tant bijective:
, - 1: x = .
(1.33)
(1 . 34)
(1 .35)
Bien que t - L existe toujours, elle n'est facile construire explicitement
que si , est linaire, par exemple dans le cas de l' lment triangulaire
3 nuds de l'exemple 1 . 11 . Dj pour l'lment quadrilatral 4 nuds de
l'exemple 1 .16, la construction de ,-1 est complique. Si nous disposons
explicitement de (1 .35) , nous pouvons reporter dans (1 .33) pour
obtenir l'approximation sur l'lment rel :
= < N(!;(x > (u,) = < N(x) > {u,} u(x).
En fait cette expression n'est pas utilise pour les lments compliqus, car
nous travaillons sur l'lment de rfrence. Toutes les expressions qui
impliquent des drives de U en x, y, z sont transformes en drives en ,
, grace la matrice de transformation dite matrice jacobienne [J].
1.5,2 DRIVES PREMIRES
Utilisons la drivation en chane pour calculer les drives en d'Une
fonction partir de ses drives en x :
x y z il
ae
a,:
a ax ay az a
(1 . 368)
a"
-
a"
ay
a ax ay i!z il
a,
a, a, i!, az
52 Mthode des lments finis
ce que nous noterons :
{ a, } = [J] { a, } (1 .36b)
o [J] est la matrice jacobienne de lB transformation gomtrique. Les
termes de [J] s'obtiennent aisment par drivation de (1 . 34). De la mme
manire, les drives en x d'une fonction s'obtiennent partir des drives
en :
0 a
a(
ox ax ox ax a
a
ac:
.
oy
=
ay ay
ay
0 o
ac
oz az az oz
ac
(1.37a)
soit : { a, } = [/] { a, } , (l , 37b)
En portant (1 .37b) dans (1 ,36b) nous obtenons :
U] = [J]-I,
(1 .38)
C' est la matrice [/] qui est utilise en pratique puisque nous devons
exprimer les drives de u en x, y, z partir des drives de u en , 'l, (,
Comme les termes de [/] sont des drives de la relation (1 ,35) qui n'est
pas connue explicitement, nous utilisons donc l'expression (1.38) pour
calculer [Il partir des termes de [J) . Nous avons suppos la transformation
t biject ive, par consquent l'inverse de [J) existe en tout pOint de l'lment
de rfrence.
Expression de fil = [J)-1
Nous prsentons les formes explicites de l'inverse de [J) une, deux et
trois dimensions : .
Une dimension:
[J)=J,,: [/]=[J)-I=_J
1
,
"
'" Deux dimensions:
[J) = [J"
J
2l
[J)-1 = det\J) [_
det (J) = J
ll
J" - J
12
J
2l
'
- J
12
]
JI!
(1,39)
(1 .40)
Approximation par lments finis
53
* Trois dimensi ons
J"j
J"
J"
JI) J)2 - J I2 J33 : JI2 J23 - Jil J22 ]
J'lJ]3 -J
1J
J
31
JZ,J
I
) - JnJ'1
J
il
J J I - JJ2 J
I1
; J
I1
J
2I
- J
11
J
21
(1 ,41 )
det (J) = J (J" J" - J" J
23
) + J'
2
(J
3I
J
23
- J
2I
J,,) +
+ J,,(J
2
J" - J
3I
J
22
) ,
Calcul des termes de [J]
Les termes de [J] sont obtenus d' aprs (1 , 36a) par drivation par
rapport de la relation (1,12) que nous rcrivons sous la forme :
< x y l > = < > [{ x,} {Y,} (l, J) (1 ,42)
{ x, } { y, } (l, ) tant les coordonnes x, y et 1 des nuds gomtriques
de l'lment, La matrice jacobienne s'crit:
[J] =
a
al;
a
a'l
a
a
< N" >
< x y z > - < N,,! > { x,} {Y,} {l,} (1 ,43)
(n" x 3) ,
Elle est donc le produit de deux matrices, l'une contenant les drives en
des fonctions de transformation gomtrique, et l'autre les coordonnes
des n' nuds gomtriques de l'lment.
Transformation d'une
Le changement de variables (1,34) permet de passer de l'intgration
d'une fonction f sur l'lment rel V' une intgration plus simple sur
l'lment de rfrence V' :
L. f (x) dx dy dl = L. det(J) dl; d( (1 , 44)
det (J) tant le dterminant de la matrice jacobienne [J], En effet l'lment
de volume dV est le produit mixte:
dV=(dxxdn,dz
54
Mthode des lments finis
En repre cartsien orthonorm :
' if u
,u, = al;'
Divers types d'lments 101
Les nuds gomtriques, les fonctions N et la matrice jacobienne [J]
restent identiques ceux de l'lment linaire du paragraphe 2.2,1.
2.2.3,1 Elment cubique (2 nuds, Cl)
lOi':'}
V-{
v
,}
Il" .U2
,
2
,
2
-,
,
,
" "
-1 se
x1SxSXz
v'
[P.]
",2
nd' 4
v'
Nombre de variables par nud: 2
< P > = < 1 2 J >
< P(I;') >
ap
< P(I;,) >
ap
<al; (1;,
2
1 -1 1-1
o 1 -2 3
1 1 1 1
o 1 2 3
1 2 -1
[p,r
'
-3 -1
o -1
3
o
-1
1
1 1 1 -1
u(l;) < N> { u,}( ou u(l;) < N> { u. }
(2.5a)
(2.5b)
(2.5c)
o chaque fonction N, ne diffre, dans les deux cas, que par un facteur
multiplicatif (voir 2. 5d).
1
2
3
4
! { N}
c
(1 - 1;)' (2 + )
(1 - 1;') (1 - 1;)
(1 + 1;)' (2 - 1;)
(-1 +1;')(1 + 1;)
! { aN/aI; }
c
_ 3(1 _ 1;')
(- 1 + ) (1 + 3 1;)
3(1 - ')
(- 1 - ) (1 - 3 1;)
c c
pour { u. )( pour ( u, )
1/4
1/4
1/8
1/4
1/8
Remarquons que ces fonctions, qui sont des polynmes d'Hermite,
ne satisfont pas la relation (1 .30) cause de la prsence des drives
102
Mthode des lments finis
< a:; > dans [P.J. Cependant il est possible de construire des relations du
mme type. Nous avons par exemple
NI + N, = 1 et - NI + N, + N, + N, = .
Les variables nodales sur l'lment de rfrence et sur l'lment rel
sont diffrentes cause des drivations en et x :
U
I
u
l
{ U, =
{ u, }
{ }
)CUI
= -
u, u,
xu
z
1 0 0 0
0
1
0 0
2
{ u, =
0 0 1 0
( u, 1 ;
1 = x
2
- XI (2.5d)
0 0 0
1
'2
En fait ce sont les variables nodales ( u, 1 contenant les drives en x
qui sont conserves comme variables finales du problme.
Les graphes des fonctions N sont les suivants
N
.,
N
,
"
r-- - - - --,
, ,
1 Nf 1
-'JI III Il
1 N4 1
- - - -
"27
En utilisant la mthode du paragraphe 1 .7.2, nous obtenons:
e() '" _1 (1 _ ')' Max a<u"
24 a4 y,
l' a
4
u
M "
384 ax ax' V'
1 e Il ,;; Max I_a<_u_" 1
7'i. )3 ax' V'
(2.5e)
(2. 5f)
Dive,s types d'lments 103
Remarquons que l'ordre de l'erreur pour cet lment est le mme que
celui de l'lment de Lagrange 4 nuds. Cependant le coefficient
de 1 e 10 est plus grand que dans l'lment de Lagrange (1
alors que le coefficient fi de 1 e l, est plus petit que pour l'lment
72 3
de Lagrange (168) '
L'lment prsent est un lment continuit C'
tinues sur l'lment et la frontire de l'lment.
au
: u et OX sont con-
2.2.3.2 Elment du 5' ordre (2 nuds, C')
Il Y a maintenant 3 variables nodales par nud: U
j
, )lU
f
, a;u
i
!
b("u
1
! b;:. (
o( ".
l "
Uj- ;u
,
b.1I
1
,f: !
alll
z
,
-,
0
(
"
'.
,
v' v'
",.2
1'16'6
< P > _ < 1 !; {' e' !;4 !;' > (2.6a)
< P(!;,) > 8 5 1 8 -5 1
ap
<iJ('
-15 -7 -1 15 -7 1
a'p
0 -6 -2 0 6 -2
< al;' (,
[P.J =
[P.J -,
1
--<--p(;Y-;' =16
10 10 2 -10 10 -2
ilP
< al; (!;,) >
0 1 1 0 -1 1
a'p
< al;' (1;,) >
3 -3 -1 3 -3 1
(2.6b)
u()
-
< N > { u. J,
1
2
3
4
5
6
104 Mthode des lments finis
:"(N)
:.. ( aN/of, )
c pour c pour
c c ( u. }{ ( u. )
(l-f,)' (8+9 .f,+3 f,') -15(1-f,')'
1/16
(l-f,)' (1 +f,) (5+3 f,) - (l-f,)' (1 +3 f,) (7+50 1/32
(1 - 0' (1 +1;)' - (1-0' (1+0 (1+5 f,)
1/16
1'/64
(1 +f,)' (8-9 f,+3 f,') 15(1 -f,')' 1/ 16
(1 +f,)' (-1 +0 (5-3 f,) - (1+ 0' (1 - 3 f,) (7 - 5 0 1/32
(1 +1;)' (1 - )' (1 +1;)' (1-0 (1-5 f,)
1'/64
(
') 1 (1 _ ")' Max 1 .. Y'
e, " 720' u,.
(2 . 6e)
1 e l,
1 l'
" - Fi Max
7208,,3
(2.6d)
a"u" 1 .
ox" v.
Cet lment a une continuit de type C' : u et ses deux premires drives
sont continues l'intrieur et la frontire de l'lment.
2.2.4 t:lt:MENTS Gt:Nt:RAUX
Nous pouvons construire des lments gnraux en combinant les
techniques suivantes :
- Augmentation du nombre de nuds d'interpolation et utilisation d'un
nombre variable de degrs de libert en chaque nud. L'lment peut
ainsi appartenir la fois la famille de Lagrange et la famille d'Hermite.
- Addition d'une approximation non nodale l'approximation nodale
prcdente. Ceci ajoute des degrs de libert qui ne sont pas lis aux
nuds, mais qui sont lis l'lment. .
Les nuds gomtriques, < N > et [J] sont encore ceux du para,
graphe 2 . 2 . 1 .
Divers types d'lments 105
2.2.4.1 Elment lagrange-Hermite du 4' ordre (3 nuds. C')
"
{ b';,,}
"
, , ,
-,
,
!
"
v' v'
,,'
l'Id'
<P> < 1
-,
"
: 4 >
-
,
[P,]
1
2
3
4
5
< P( ,) >
oP
<0.; (1;,
._-.---
< P(,) >
-------
< P(,) >
IlP
<00; (1;,
{ N}
C
-1; (1-)' (3+21;)
-w -) (1-,;')
4(1-1;')'
W +W (3-21;)
-e(1+I;) (1-.;')
0 0 4
-3 -1 0
[P,] -,
4 1 -8
1 1 0
-2 -1 4
{ aNll; }
C
(1-.;') (-3+81;)
(1-) (-1H+4I;')
-161;(1-1;')
(1_1;') (3+81;)
(1 H) (-1-1;+4 ')
,
"
,
(2.7a)
0 0
3 - 1
4 - 1
-1 1
-2 1
(2.7 b)
c pour c pour
{ u, )(
{ u, }
1/4
118
1/4 1/4
1/4
118
2.2.4.2 Elment d'Hermite 1 degr de libert non nodal
(2 nuds. C')
Aux variables nodales de l'lment du paragraphe 2.2.2.1. nous
ajoutons une variable gnralise a,
{ b;',,}
0,
u, '{6
u
:uJ
0,
',' h::,}
-,
,
!
"
'.
,
v' v'
n=2 t'Id'
<P>
< 1 1; ' '
4 >
(2.88)
106 Mthode des lments finis
2 1 2 -1 4
OP
< (e,l>
-3
-1 3 -1 0
, ... .........
[P,) =
< P( !; , )
>
1
[P,j - '
= 4
0
-1 0 1 -8
(!;,) >
1 1 -1 1 0
-----------.- .. - -
--- --- ------ -- -------T--- -
,
< 0 0 0 0 1
>
0 0 0 0
,
4
,
(2.8b)
ut !;) = < N, N, N, N. P, > ( u, }, .
Les fonctions N, N. correspondent aux fonctions N" N" N" N. du
paragraphe 2 . 2 . 3 . 1. De plus :
P, = (1 - e)'
ap
P, et ae' s'annulent aux 2 nuds. P, est identique la fonction N, du
paragraphe prcdent.
o 0 1
000
o 0
1 0
2:
00001
2,3 Elments triangulaires (deux dimensions)
2.3.1 SYSTMES DE
( u, }
(2.8c)
Nous utilisons pour tous les lments triangulaires l'lment de rfrence
suivant :
0,13 (>0
0,0
'1.
0
1-{-'1i!=O
,
1,0 (
Divers types d'lments 107
Les coordonnes (, Il) peuvent tre interprtes comme des coordonnes
curviligllBs sur l'lment rel:
,
,
Les coordonnes barycentriques LI L
2
L3 sont souvent utilises pour
reprer un point 0 d'un triangle cts rectilignes
L,
Al
="A
L,
A,
="A
L,
A,
="A
,
A,
'"
o
A = Al + A, + A,
L, + L, + L, = 1
Al' A" A, sont les aires des triangles 0-2-3, 0-3-1,0-1-2
A est l'aire du triangle 1-2-3.
Les coordonnes L, L, L, sont lies aux coordonnes , ~ par
L,
-
1
- -
~
L,
"
L,
= ~
L'lment de rfrence peut reprsenter l'espace LI' L" L,
e,LZ
(2.9a)
(2.9b)
108
Mthode des lments finis
Par convention, nous numrotons les nuds de l'lment de rfrence
et de l'lment rel dans le sens trigonomtrique.
2.3,2 LMENT LlNAIRE (triangle, 3 nuds, CO)
,
,
". v'
Il. 3 ... , "do,
",
",
f;,:----,,..... ".
v'
Les nuds gomtriques et les nuds d'interpolation sont confondus:
[JI =
< P>= < 1 '1>
(2.10a)
[
< P(SI) >]
[PJ = < P(S,) > ;
< P(S,) >
1
2
3
1
~
{ N 1
- e - ~
[PJ-I = [ ~
-1
o
1
o
{ N/ 1 { N / ~ }
-1 -1
1 0
0 1
(2.10b)
y, - YI]
; det (J) = 2 A = (x, - XI) (y, - y.) -
y, - YI
- (x, - x.) (y, - y.) . (2.1 Oc)
Le graphe des fonctions N est le suivant:
N, N.
N,
'1
1,0 (
1,0 (
Divers types d'lments 109
L'erreur d'approximation est obtenue en gnralisant deux dimensions
la relation (1.68).
e(l;,
1
-2:<
1;(1 - 1;); - - >
( iJ
2
u
ex
-a2
2
2
uex
iJ
2
u
ex
sur V'
1 e 10 .; Co l' Max 1 D; U" Iy (2.10d)
o
Max 1 D; U" Iy. = ( l '
On peut montrer que [4 et 5 page 130)
2 a'u" 1
ax ay ,
1
a'u," ).
ay
1 e Il .; CI -l-e Max 1 D; u" Iy.
Sin
(2.10e)
o : 1 est la plus grande dimension de l'lment
e est le plus grand angle intrieur de l'lment triangulaire.
Le terme -.!-O apparat lors de la transformation
Sin
intervenir l'inverse de la matrice jacobienne.
au au .
de al; en ax qUI
fait
La fonction u(x, y) et ses drives premires sont continues sur l'l-
ment. La fonction u(x) est continue sur la frontire de l'lment, mais ses
premires drives ne le sont pas: la drive tangentielle est continue
et seule la drive normale est discontinue (voir paragraphe 2.3.3.1).
2,3.3 LMENTS DE HAUTE PRCISION DE TYPE
LAGRANGE (continuit CO)
Ces lments sont obtenus en ajoutant des nuds d'interpolation sur
la frontire etfou l'intrieur de l'lment du paragraphe prcdent.
Nous conservons les nuds gomtriques, les fonctions N et la matrice
jacobienne [J] du paragraphe prcdent. Ces lments sont donc sub-
paramtriques. Nous introduirons des lments curvilignes au para-
graphe 2.3.3.5.
110
2.3.3.1
< >
o:
Mthode des lments finis
Elment quadratique (triangle. 6 nuds.
,
" 2
"
" "
,
n '6 Ild' 6
< p> =
< 1 .;
';2
1
= <00; 2' 0; 1
1
X
4
= 2' (x, + x,)
1
X. = 2' (x, + x,)
1
-3
[P,r'
-3
-
2
1
2
3
4
5
6
4
2
{ N }
- (1 - 2 )
4
- W - 2 )
4
- - 2
4
0 0 0
4 -1 0
0 0 0
-4 2 0
-4 0 4
0 0 0
{ aN/'; }
1 - 4
4( - .;)
- 1 + 4
4
0
- 4
"
"
>
o 1 ;
0 0
0 0
-1 4
0 0
0 -4
2 -4
{ }
1 - 4
- 4
0
4
- 1 + 4
4(,\ -
CO)
(2.118)
(2.11b)
Oive,s types d'lments 111
, 1 -
A= - ';: -'1
1 e 10 .; Co l' Max 101 u .. 1 (2. Il c)
1 e l, .; C, e Max 101 u .. 1 (voir (5 page 134)) . (2 . 11 d)
La continuit de l'lment est de type CO
chaque ct, mais est discontinue.
au .
: u et a; sont contmues sur
Par exemple sur le ct 3-5, 1 - :
u, _, < 0; 0 ; -W-2);4(1-);( - 1+) (-1+21');0> lu,).
Cette expression ne dpend que des variables u" u., u, lies au ct 3-5.
La fonction u est donc continue sur ce ct. L.e paramtre est li la
coordonne locale t :
1
o 1 est la longueur du ct 3-5. Drivons u, _, :
1
t
_ 1 < 0;0; -1 +4 1';4-8 ; -3+4 1';0> {u,}.
Cette expression ne dpend galement que de u" u., u,; est donc
continue sur le ct 3-5. Par contre est une combinaison linaire de
( et qui font intervenir toutes les variables nodales u,.
... J-$ v '13-5
n'est donc pas continue sur le ct 3-5.
2,3.3.2 Elment polynme complet d'ordre r (triangle,
n nuds, CO)
, (r+1)(,+2)
Le polynme complet d ordre, comporte n 2 termes,
il faut donc n nuds 1 degr de libert. Nous plaons 3, nuds rgulire-
112
Mthode des lments finis
ment espacs sur la frontire et les nuds restants l'intrieur. Par exemple
pour r = 4 :
,. 4
i' o . __
1: 1 1:2 1.3 "4 !
Un nud peut tre identifi par 3 nombres entiers /, j, k relis aux
coordonnes des nuds , par les relations:
et
/
1:, =-
r
= L 0.;; i + j .;; r
r
k=r-/-j.
Ceci permet de construire explicitement les fonctions d'interpolation
correspondant chaque nud (i, j, k) sous la forme du produit des
quations des droites passant en tous les nuds sauf (i, j) :
'-1/ r' j-I m rn '-In r(1 ' ")
N(i, j, k) = f1 - : f1 - .,' f1 - - , -., . (2.128)
1=0 1 - 1 III =0 m - 1 "-0 n - k
Remarquons que nous pouvons aussi construire ces fonctions par la
mthode du paragraphe 1.4.1. L'erreur a une forme semblable (2.10d) :
(2.10d) :
(2.12b)
C
I' M 10'+'
ax x
Sin
(2.12c)
Divers types d'lments 113
2.3.3.3 Elment cubique complet (triangle, 10 nuds, CO)
1
, .
2 3 4
(
n-IO Ad: 10
Les fonctions N de cet lment sont construites par application directe
de la mthode du paragraphe prcdent. dans le cas o r = 3 :
<p > -
<
1
e e'
e' e' '1
> (2.130)
1 0 0 0 0 0 0 0 0 0
- 5,5 9 -4,5 1 0 0 0 0 0 0
-5,5 0 0 0 0 O. 1 -4,5 9 0
- 22,5 la -4,5 0 0 0 0 0 0
27 la -22,5 4,5 0 -4,5 -4,5 0 4,5 -22,5
(PJ-' -
9 0 0 0 0 0 -4,5 la - 22,5 0
1
2
3
4
5
6
7
a
9
10
- 4,5 13,5
- 13,5 27
- 13,5
13,5
-4,5 0
! (N 1
c
A(-1 +3 A) ( - 2+31)
91((-1+..31)
9 A{(-l +3 ( )
(-1+3{) ( - 2+3{)
9(.(-1+3{)
9 (.( - 1 +3. )
.(-1 +3.) (-2+3.)
91.(-1 +3. )
9 A.( - 1+3 A)
54 (.A
-13,5 4,5 0 0
-13,5 0 13,5 0
0 0 0 13,5
0 0 0 0
! ( N/{ )
c
- 2 + la A - 27 l'
9A(-1+3 A-6()+9(
9{(1+6A-3()-9A
2 -:- 18 ( + 27
9.(-1+6)
9.(-1+3.)
0
-9.(-1+3.)
-9.(-1+6A)
54 .(A- e)
0 0 0 0
0 0 13,5 -27
0
-13,5 27
-27
4,5 -13,5 13,5 0
(2.13b)
1
- ( N/. ) c
c
-2+1a A- 27 l '
-9{(-1+6A)
-9 {(-1 +3 ()
0
9{( -1+H)
1/2
9((-1+6.)
2-18 '7:+-27 '7
2
9,,(1 +6 A- 3 .) - 9 A
9A(-1+3A- 6.)+9.
54 (A-.)
114 Mthode des lments finis
Avec
En coordonnes barycentriques
L, = l, L, = C, L, =.'
2,3,3,4 Elment cubique incomplet (triangle, 9 nuds, CO)
Si nous dsirons viter le nud intrieur numro 10 dans l'lment
prcdent, nous pouvons utiliser 2 techniques:
- Construire les fonctions < N > partir d'une base polynomiale
incomplte 9 termes en supprimant C' '1 ou C.' dans (2, 13a), La combi-
naison C'. + C.' ne peut tre utilise dens < P > car elle rend [P.J
singulire. Les fonctions N sont ensuite construites conformment au
paragraphe " 4 , l ,
- Exprimer la variable nodale u
lO
sous forme d'une combinaison
linaire des variables u, '" u. [2]
1 1
U'O = if (u, + u, + u, + u. + u, + u.) - li (u, + u. + u,), (2, 14a)
L ff
" 1 1 b 'l' 1 d' , ,
es coe IClents 4' et - 6' sont 0 tenus en utllsant a con Illon SUivante:
les fonctions modifies < N, N, '" N. > doivent comprendre tous
les termes d'un polynme quadratique de manire satisfaire (1 , 31),
et respecter la symtrie du triangle de rfrence :
( N 1 = ( N lU) + (a 1 NID; { ~ ~ } = { ~ } ' + { a 1 ~ t ;
{
aN} = {aN} (1) + { a 1 aN
ID
a. a, ac (2 , 14b)
o les fonctions ( N 1(') {aN} (1) et {aN} (1) sont les neuf premires
'ac ,
fonctions de la table du paragraphe prcdent;
1 1 1
- li if if
2,3,3,5 . Elments curvilignes
(2,14c)
Des lments cts curvilignes sont utiliss pour reprsenter un
domaine frontires curvilignes, Ils sont obtenus en augmentant le
nombre de nuds gomtriques que l'on choisit systmatiquement sur
la frontire de l'lment :
Divers types d'lments 115
a) Elment cts quadratiques
,
o : les fonctions < N > sont identiques aux fonctions < N > du
paragraphe 2.3.3.1
( x, ) et (y, ) sont les coordonnes des 6 nuds gomtriques de
l'lment rel.
Cet lment est isoparamtrique si nous utilisons l'approximation de u
dfinie au paragraphe 2.3.3.1.
b) Elment cts cubiques
,
v'
'8
Nous utilisons comme fonctions < N > les fonctions < N > du
paragraphe 2.3.3.4.
Remarquons que la distorsion de l'lment doit respecter en tout point
la condition:
det (J) > O.
116 Mthode des lments linis
2.3.3.6 Elment non conforme (triangle, 3 nuds, semi-CO)
1
2
3
"
< P> = .< 1 >
(P.J = [P.J-I =
2
{N}
{ aNlae }
2
1-2
-2
1 -2 "
0
"
{ }
2
0
-2
Cet lment ne satisfait pas la continuit de u sur les frontires.
(2.158)
(2 . 15b)
2.3.4 LMENTS DE HAUTE PRCISION DE TYPE HERMITE
La gomtrie de l'lment peut tre du type linaire (paragraphe 2.2.1).
quedratique (paragraphe 2.3.3 . 58) ou cubique (2.3.3. 5b) . Dans les
deux derniers cas, les nuds gomtriques sont plus nombreux que les
nuds d'interpolation.
2.3.4.1 Elment cubique complet (triangle, 4 nuds, semi-C
'
)
l'" 'j;'" 1
,
U"lh:"'1
1 - 1, 2,3
u,
C c):'1"'1
Oy III
,
'.
u,
u,
(
u,
v' v'
n=4 nd -ID
Divers types d'lments
117
< P > _ < 1 '1 ' ' 1;' (2. 16a)
Nud 1
H
Nud 2
H
Nud 3
H
Nud 4 10
[T] =
[T,l
[P,] =
< >
P
i=1,2,3
P
< ry (/;,) >
< P(!;.,) >
u() = < N > { u, l .
( N l ( N/i; l
'<'(3-2'<)-7 a 6'-1+'<)-7b
.<'-a ''<-2 )-b
-2
{'(3-2 {)-7. 6W-<)-7b
'(-1+)+2a (-2+3 1;)+2 b
' '1-
2
ry)-7 a -7 b
ry'(-1 8 2b
278 27 b
{ u, l. = (T) ( u, )
(2.16b)
( N/'l l
6'-1+'<)-7c
-2 ,l- c
''<-2
-7 c
2c
'-c
6 c
2 ry - c
ry)+2 c
27 c
o [TJ
[
1 0 0 ]
[J(!;,)) i = 1,2,3.
[T,)
1
(2.16c)
11 8 Mthode des lments finis
2.3.4.2 Elment cubique incomplet (triangle. 3 nuds, semi-C')
Le nud central de l'lment prcdent peut tre limin en exprimant
la variable nodale U
4
sous forme d'une combinaison linaire des variables u
l
'
u" u, et de leurs drives (2) :
1
u. = :3 (u, + u, + u,)
1
+ TI! (a, u, 2 a, u, + a, u,) +
1
+ TI! (a, u, + a, u, - 2 a, u,)
les coefficients 1/3,1/18, - 1/9 sont obtenus en introduisant la condition
suivante les fonctions modifies < NI N
2
... N
9
> doivent
comprendre tous les termes d'un polynme quadratique de manire
satisfaire (1 .31) et respecter la symtrie du triangle.
On obtient les fonctions N et leurs drives par une technique analogue
celle du paragraphe 2 . 3.3.4.
La fonction u et ses drives premires sont continues aux 3 nuds.
5 1
au. au d' .
ur es c t s u et a; sont continues, par conlre n est IscontlOue,
2.3.4.3 Elment du 5' ordre (triangle, 3 nuds, C')
,
"
". ,
1- 1,2,3 J 1,2,3
La base polynomiale < P > est complte jusqu'au 4' ordre et contient
trois termes du 5' ordre tels que la drive normale Sur chaque ct de
l'lment de rfrence verie de manire cubique en et :
< P > = < 1 ; ' ,,'; e e' "
4 ' ' ' _ 5 ' ;
_ ,,' - > . (2.178)
La matrice [P .1-' de dimensions (18 x 18) peut alors tre inverse pour
fournir les coefficients des 18 fonctions < N >. Supposons que les
variables nodales soient organises sous la forme :
Divers types d'lments 119
O u" u" u, sont les variabl es attaches aux nuds de l'lment de
rfrence qui impliquent donc des drives en et " . Les fonctions
d'interpolation sont alors les suivantes [2] :
N, = l'(1O l- 15l' + 61' + 30 + ,,
N, = (1
2
(3 - 2 1 - 3 ' + 6
N, = - 21 - + 6
Nud 1 N. = ' 1
2
(1 - ( + 2
N, =
Nud 2
Nud 3
1
N. = '2 1
2
(1 + 2 ( -
N, = 1;'(101; - 15 1;' + 6 ' + 15
N. = (; (- BI; + 14 ' - 6 ' - 15 l)
N. = (6 - 4 1; - 3 - 3 + 3 ( q)
N
IO
= (2 (1 - 0' + 5 .Il
1;' q
Nil = 2 (- 2 + 2 + + ,,' -
1;2 q' l .
N" = 4 + -2-
N" = q' (1 0 - 15 + 6 + 15 (2 1)
N,. = (1 (6 - 3 - 4 - 3 ( ' + 3
,
N" = ; (- 8 + - 6 - 15 1;' l)
. ' l 1;'
N16 = 4 + -2-
N
I1
= "'2 (- 2 + 1; + 2 + 1;' - l,)
,
NIB = (2 - q)' + 5 e )
l=1-(-".
120
Mthode des lments finis
Le passage des variables nodales de l'lment de rfrence aux variables
nodales de l'lment rel se fait en utilisant une matrice de transformation T,
construite partir de la matrice jacobienne et des matrices [C,l et [C,l
de (1 .46) values en chaque nud i :
{ u, l( = [T,l{ u;}. (2.17b)
Par exemple pour un lment cts rectilignes, dont la matrice jaco-
bienne est constante :
1 0 0 0 0 0
0
J"
J
12
0 0 0
0 J
2I
J
22
0 0 0
[T,l = 0 0 0
Jft 2 J" J
12
Jf2 (2.17c)
0 0 0 J
lt
J
21
J'2
J
21
J
I2
J
22
+ J
lI
J
22
0 0 0
Ji,
2 J
2I
J
22
Ji2
2,4 Elments quadrilatraux (deux dimensions)
2,4,' DE COORDONNt:ES
Nous utilisons pour tous les lments quadrilatraux l'lment de rf-
rence suivant :
( -l, ,)
(1,1 l
4
,
l, ;,
-,
{
,
2
.
Les coordonnes (l;, peuvent tre interprtes comme des
coordonnes curvilignes sur l'lment rel
,
",
, -1--1- .... -
" '1
a
c1.
\v _1- _ _ ___ _
'1" -1
,
,
, -t -\- -;;
... ""
....l _I .... !t- '1=cl,
. ':.
-,
,
'Iim.nl. rt"
,
,
Par convention nous numrotons les nuds dans le sens trigonomtrique.
Divers types d'lments 121
2,4,2 LMENT BI-LlNAIRE (quadrilatre, 4 nuds, CO)
Cet lment est dcrit dans les exemples 1 .16 et 1 .18.
,
"
4
,
"
'y.
C
2
1 2 "
'.
,
v' v'
Les nuds gomtriques et les nuds d'interpolation sont confondus;
l'lment est isoparamtrique :
1
2
3
4
< P>
-
< 1 i 1;
< PIs,) >
< >
[P J -, =
[PJ =
< PIs,) >
4
< P(I;.) >
{N 1
c
{ aN/aI; 1
c
(1 - ) (1 - 'Il - 1 +
(1 + 1;) (1 -
1 -
(1 + ) (1 +
1 +
(1 - ) (1 + - 1 -
>
(2.188)
1 1 1 1
-1 1 1 -1
-1 -1 1 1
(2'. 18b)
1 -1 1 -1
1
- { 1
c
c
- 1 + 1;
- 1 -
1/4
1 + 1;
1 -
L'expression explicite de la matrice jacobienne [J] se trouve dans
l'exemple 1 .18. L'erreur d'approximation peut tre obtenue en gnralisant
deux dimensions la relation (1.68).
2,4.3 LMENTS DE HAUTE PRCISION DE TYPE
LAGRANGE (continuit CO)
Nous conservons, pour les lments de ce paragraphe, les nuds
gomtriques, les fonctions N et la matrice jacobienne de l'lment bi-
linaire du paragraphe 2.4.2. Nous dcrirons des lments curvilignes au
paragraphe 2.4.3.5.
122 Mthode des lments finis
2,4.3.1 Elment quadratique complet (quadrilatre, 9 nuds, CO)
Cet lment utilise une approximation quadratique de Lagrange une
dimension dans les deux directions Il est souvent utilis en mcanique
des fluides.
,
7
,
9
-,
, ,
. -,
"
,
,
,
,
v'
Il, ".,
.,' -,-
ele ..
< P > - < "i; i = 0, 1, 2 ; i = 0, " 2 >
, '2 2" (2.19)
= < 1 > .
Les fonctions NU';, '1) de cet lment, donnes ci-dessous, sont les
produits des fonctions et correspondant l'lment de Lagrange
une dimension et 3 nuds du paragraphe 2.2.2.1.
1
2
3
4
5
6
7
8
9
Cet lment a une continuit de type Co.
{ N)
{ 1
(1-.;) (1 '1 (1 -2 ) '1
4 4
- (I-') (1-'1) '1
2
- (1 +0 e'l
- (1 + 2 ) (1
4 4
(1+0 (1 +2 ) (1
2 2
(1 H) (1 (1 +2 ) (1 +,,)
4 4
(1-")
- (1 .
2
-(I-) -(1-2) '1
4 4
-(1-0 - (1-2 ) (1-'1')
2 2
(l-')
{ N/'l 1
(1 -) (1 -2 '1)
4
-(I-')
2
4
- (1 H)
(1 H) (1 +2
4
(1-') (1 +2
2
4
(1 -0
-2(1-') '1
Divers types d'lments 123
2.4.3.2 Elment quadratique incomplet (quadrilatre. 8 nuds.
CO)
Cet lment, trs souvent utilis sous sa forme isoparamtrique, ne
comporte que 8 nuds situs sur la frontire de l'lment:
,
7 6
,
4
-,
,
,
,
2
,
-,
< P > _ < 1 ' ' > . (2.20)
Cet lment prsente galement une continuit Co.
(N) ( N/( ) ( )
1
- (t - () (1 - (1 + ( + (1 - {2 ( + (1 - ) ( + 2
4 4 4
(1 - (') (1 -
- (1 - (
- (1 - ')
2 2
2
- (1 + ) (1 - (1 - ( + (1 - (2 ( - - (1 + ) ( - 2
4 4 4
3
(1 + () (1 _
(1 _
- (1 + ()
2 2
4
- (1 + ) (1 + (1 - ( - (1 + (2 ( + (1 + () ( + 2
4 4 4
5
(1 - (') (1 +
(1 - ')
2 2
6
- (1 - () (1 + (1 + - (1 + 1/) (2 ( - - (1 - () ( -
4 4 4
7
(1 - () (1 - - (1 -
- (1 - ()
2 2
8
124
Mthode des lments finis
2.4.3.3 Elment cubique complet (quadrilatre, 16 nuds; CO)
C'est un lment de Lagrange 4 nuds dans les directions 1; et .
1
2
3
4
5
6
7
8
9
10
11
1 2
13
14
15
16
o
.,
,
"
,
Y,
" "
"
Y, "
"
"
,
(
-,
, , ,
-, .1/
3
Y,
,
n
o
l6 nd"6
< P > = < ' 'li; i = 0, 1, 2, 3; j = 0, 1, 2, 3 > (2.21 )
{ aN(I;, } { N(, }
N,(). N, B,() .N,
N, (f,). B,
N, (0 ,N, B,(I;) .N,('1l N,()
N,(e) .N, (,,) B,(O. N, N,()
N.(e) .N, B.(I;). N.W. B, (,,)
N.(f,).N,(,,) B.{}. N.(f,).
N.().N,('1l B.{} N.W. B,(,,)
N.{). N.(,,)
B.{) .N.('1l N.W.
B,{) N,()
N,(I;) B,{) .N.(,,)
N, (1;) .
N, (1;) N, () .
N, (1;) B, (f,)
N, (e).
B, (f,). N, (e).
N,() B,<o, N,().
N,(I;) B,()
N,() .N,(") B,() N,()
N, (1;) B,() ,N,(,,)
N,()
< N,W > = < - (1 - ) (1 - 91;') ; 9(1 - e') (1 - 3 {);
9(1 - 1;') (1 + 3 ); - (1 + ) (1 - 91;') >
= < N, ({) N,({) N,(I;) N.W >
< B,() > = < 1 + 181; - 27 1;'; - 27 - 181; + 81 1;';
27 - 18 1; - 81 e'; - 1 + 18 1; + 27 ' >
= < B,() B,(I;) B,(I;) B.(f,) >.
1
2
3
4
5
6
7
8
9
10
11
12
Divers types d'lments 125
Nous pourrions construire un lment de Lagrange gnral n x n
nuds en utilisant, dans les deux directions et les polynmes de
Lagrange d'ordre (n - 1) donns au paragraphe 2.2.2.3.
2.4.3.4 Elment cubique incomplet
Cet lment, souvent utilis sous SB forme isoparamtrique, comporte
12 nuds sur sa frontire:
10 9
,
1
7
Y,
"
6
'l,
"
,
e
1 2
,
1
-1
'l,
1
( N)
( aNla( 1
1
- ( aNla. )
c c c
(1-) (1-.)
(1-.) +2 (-3 <'_.')
CO , 3 ,)
(1-) "9+
2
.-( - "
(1-3 () (1-(') (1-.) (1-.) (-3-2 (+9 (') (-IH') (1-3()
(1+3 () (l-e) (1-.) (1-.) (3-2 (-9 (') (-IH') (1+3)
(1 H) (1-.,) (1 -.)
(- +2 e+3 (1+)
(IH) (1-3,,) (1-.') (1-.,') (1-3.) (1 H){-3-2 ,,+9 .')
c
(1 +.:') (1-1-31/) (1--'1
1
)
(1+'1) _'gO+2':-+3{2+'1
l
)
(1 +) (3-2'1-9 '1l)
(lH) (-
9/32
(1 +) (1 +.,)
(1 +3 () (1-(') (1 +,) (1+,) (3-2(-9(') (1-(') (1+3()
(1-3 ) (1-(') (1 +,) (1 +,) (-3-2 (+9 (') (1-(') (1-3()
(l-) (1 +.) (1 +,) +2 ('_,,)
. ( 10 2 '3 ,)
. (1-() -"9+ ,H + ,
(l-) (1 +3,) (1-,') (-1+,') (1+3,) (1-) (3-2,-9,')
(1-() (1-3,) (1-,') (-1+,') (1-3,) (1-() (-3-2,+9,')
(2.22)
1 26 Mthode des lments finis
2.4.3.5 Elments curvilignes
Nous pouvons construire des quadrilatres curvilignes en augmentant le
nombre de nuds gomtriques sur la frontire de l'lment.
a) Elment cts quadratiques
,
Les fonctions N sont identiques aux fonct ions N du paragraphe 2 . 4 . 3 . 2.
b) Elment cts cubiques
Les fonctions N sont identiques aux fonctions N du paragraphe 2 . 4 . 3 . 4.
2.4.4 lLlMENT DE HAUTE PRlCISION DE TYPE HERMITE
La gomtrie de l'lment peut tre linaire. quadratique ou cubique,
comme dans le cas des lments de Lagrange.
2.4.4.1 Elment cubique (quadrilatre. 4 nuds, semi-C
'
)
JoJ'
0,
0, Hi
,
0"1
0
:',, !
{b;l" }
1"1,2,3,"
0,
byUI
'b'lUI 0,
1. 1,2,3,4 0,
(
",
",
0,
0,
,
v'
, ..
v'
Divers types d'lments 127
( N) ( aN/aI )
t
- ( N/a, )
Nud 1
fi
,(a-(-,) It-,} 1-3+3 ('+,'+,) 11 - (} (-3+{'+3 ,'+()
,(t-(') -.(1 +3 () 1-1 +() (1-(')
.(1 - ,') ( - 1 +,) 11 - ,1') -.11+ 3,)
Nud 2
bl+( - ,) (1-,,) 13-3 ('-,'-,) Il +() (-3-(+{'+3 ,')
-bit-l') -bll -3 () It +() 11-(')
b(t-,') (t-,) (1 -.,') -b(t+3,)
1/8
Nud 3
U
c(a+(+,) 11+,) (3-3 ('-,'+,) Il +() (3+{-('-3 ,,' )
-c(I-(') -cll-3 () I-l-() (1-(')
1-1-,) (1-,') - cll-3,)
t
Nud 4 11
t2
dla-(+,) 11+,) 1-3+3('+,'-,) It - () 13-(-('-3,')
dlt-(') -dit +3 () It-() 11-(')
-d(1 -,') 11+,) (1 - ,') -d(I-3,)
. avec a = (1 - 1;) (1 - '/); b = (1 + ) (1 - C = (1 + ) (1 + ;
d = (1 - ) (1 + a = 2 _ 1;' _ ,,' ,
Les fonctions < N > correspondent aux variables nodales {u,l"
La transformation des variables nodales s'crit :
u, u,
{ u, l, =
u,
( u, ) =
u,
u, u,
u.
, u.
x
( u, ), =
{ u,} ci [T J = U
o 0]
[J(!;,))
[T,]
[T,]
(2,23b)
Sur les cOts, u et sont continues, mais ne l'est pas, Par contre les
valeurs de et en chaque nud sont identiques pour tous les lments
relis ces nuds,
1 28 Mthode des lments finis
2.4.4.2 Elment rectangulaire (rectangle. 4 nuds, CI)
"
".
"'
(
"
,
".
"
he III
H(' b."
bhUI
1= 1,2,3,04
n_" "d= 16
y
"
b. III
III" Jo.
Uy III
b., III
L
_______ 1,2,3,"
,
Cet lment prsente une continuit CI complte. Il doit par contre tre
rectangulaire et parallle au systme d'axes (x, y) car dans le cas gnral
la transformation de la variable nodale al, u, ferait intervenir les 3 drives
secondes en x :
< P > = < e' i = 0, 1 , 2, 3; j = 0, 1, 2, 3 > . (2.24)
On obtient facilement les fonctions N en utilisant "approximation d'Her-
mite une dimension (paragraphe 2.2.3.1) dans les deux directions.
( N(t" } { aN(!;, } { aN(!;, }
1 NI() NI (e) . BI
Nud 1
2
3
N,(!;) .N
I
B,(!;)
N
I
(!;) BI ((;) NIW
4 N,() B,W
5 N,(!;) B,(I;) N, (!;) .
6
Nud 2
7
N.(!;) .N
I
B.() .N
I
N.()
B,(I;)
8 N.(t;) B.{} N.W.
9 N,(!;) B,(!;) N,(e)
Nud 3
10
11
N.(t;) B.{} N.(t;) . B,
N,(t;) B,(!;) N,W.
12
N.() B.() N.W.
13 N.(!;) B.(!;) NI ().
Nud 4
14
15
N,({;) B,(I;) N,({;)
BI{} NI {}.
16 N,({;) B,(!;) N, ({;) . B.
Divers types d'lments
129
1
< N,(I',) > = ii < (1 - )' (2 + 0 ; (1 - e) (1 - 0 ; (1 + e) (2 - ) ;
(- 1 + ') (1 + ) >
= < Nd) N,W N,() N.(.;) >
1
< 8 ,(1',) > = 4 < - 3(1 - 1',' ); (- 1 + 1',) (1 + 3 ); 3(1 - e) ;
(- 1 - ) (1 - 3 1',) >
= < 8,() 8,(1',) 8,(0 8. () > .
La transformat ion des variables nodales est semblable
1
0 0 0
0
a
0 0
[T,) =
0 0
b
0
2:
0 0 0
ab
T
o : a = x
2
- XI ,
b = V. -
y, .
2.5 Elments ttradriques (trois dimensions)
2.6.1 SYSTMES DE COORDONNES
(2.23b)
Nous utilisons pour tous les lments de forme ttradrique l'lment de
rfrence suivant :
v'
0
l-e-"7-C 0
Comme dans le cas du triangle, les coordonnes (, q, ( ) peuvent iltre
interprtes comme des coordonnes curvilignes sur l'lment rel. Les
surfeces 1', = constante (ou q = constante bu ( = constante) sont, dans le
cas d'un lment artes rectilignes, des plans parallles aux faces de
l'lment.
coordonnes barycentriques L, L, L, L. sont parfois utilises pour
, :p.i rer un point 0 d'un artes rectilignes.
130
4
3
2
Mthode des lments finis
V,
L, = V
V,
L, = V
V,
L, = V
V,
L, = V
V = V, + V, + V, + V,
L, + L, + L, + L, = 1
V, est le volume du ttradre o-j-k-I (i, j , k, 1 = . l, 2, 3, 4)
Par exemple V, est le volume du ttradre 0-1 -2-3-4.
(2 . 250)
Les coordonnes barycentriques sont lies aux coordonnes , par:
L, '"
L, '" '1
L, '" ,.
(2.25b)
Remarquons que l'ordre de numrotation doit tre cohrent entre
l'lment de rfrence et l'lment rel. Les trois premiers nuds sont
parcourus dans le sens trigonomtrique, le vecteur normal au plan qu'ils
forment tant orient vers l'intrieur de l' lment.
2.5.2 ELEMENT LINEAIRE (ttradre, 4 nuds, CO)
"
'.
,
v' v'
,.,
,,'
Divers types d'lments 131
Les 4 nuds gomtriques sont confondus avec les nuds d'interpola-
tian:
<P> = < 1
ry (>
< P(!;I) > 1 0
< P(!;,) >
; [P J-I
-1 1
[PJ =
< P(!;,) >
-
-1 0
1
2
3
4
< P(I;..) >
{N}
( aN/a )
1--ry-( - 1
1
ry 0
( 0
La matrice jacobienne s'exprime:
[
X, - XI
[J] = x, - XI
X
4
- XI
o V est le volume de l'lment rel.
-1 0
{ aN/ary }
Y2 - YI
y, - YI
Y4 - YI
- 1
0
1
0
det (J) = 6 V
(2,260)
0 0
0 0
(2,26b)
1 0
0 1
{ aN/a( }
- 1
0
0
1
(2,26e)
2.5.3 LMENTS DE HAUTE PRCISION DE TYPE
LAGRANGE (continuit CO)
2,5.3,1 Elment quadratique complet (ttradre, 10 nuds, CO)
10
n'IO nd'IO
vor/obl ... UI tn 10 no.ull.
Lu M'lId, 2,4,6,7,8,9 10nl
oux mlll.ux du c6ti.
"
132 Mthode des lments finis
Nous conservons la gomtrie de l'lment ttradrique linaire. La
base polynomiale est quadratique complte
< P > . = < 1 , ' " e( > . (2.27)
On obtient facilement les fonctions N en se basant sur celles du triangle
quadratique (paragraphe 2 . 3.3 . 1).
1
2
3
4
5
6
7
8
9
10
avec
{N}
-(1-2)
4
'-e(1-2)
4
- q(1 - 2 q)
4 q
4 '
4 e,
4
- W - 20
{ aN/a } { } { aN/a, }
1 - 4 1 - 4 1 - 4
4( - ) - 4 - 4
- 1 + 4 0 0
4 0
0 - 1 + 4 q 0
- 4 q 4(,t - q) - 4 q
- 4'
- 4 ( 4(,1 - 0
4( 0 4
0
4(
4 '1
0 0
- 1 + 4'
2.5,3.2 Elment cubique complet (ttradre, 20 nuds, CO)
..
vorlobt .. , UI ln 20 noelold.
Les no.ud ur ln cOti. lonl ou Y3 el ou. 2/:s du cOli!.
Ln hOIIudl 10,/2,1" ,16 ' 01\1 GlU cIn"" dt. tOUI
""20 "d"20
< P > est une base polynomiale cubique complte en e, (.
Divers types d'lments
133
Les fonctions d'interpolation N s' obtiennent partir des fonctions
donnes au paragraphe 2.3.3.3 en remplaant par 1 - - - , :
les fonctions NI N,o sont alors identiques. Les fonctions Nil' N
12
N", N
17
, N" et N,o s'expriment comme les fonctions N" NIC' N" NB, N,
et N, du paragraphe 2.3.3.3 en remplaant par . Les fonctions N",
N
I6
et N
t9
s'expriment comme les fonctions N
s
N
IO
et N
6
du para-
graphe 2.3.3.3 en remplaant e par . La fonction N,. est 27
Remarque
Nous pourrions liminer les nuds 10, 12, 14, 16 des faces, par une
technique analogue celle du paragraphe 2.3.3.4, pour obtenir un
lment 16 nuds.
2.5.3.3 Elments curvilignes
Nous pouvons construire des lments faces incurves en utilisant
comme fonctions N les fonctions des paragraphes 2 . 5 . 3 . 1 et 2 . 5 . 3.2.
2,5.4 DE HAUTE PREcISION DE TYPE HERMITE
Comme dans le cas du triangle, un lment de type semi-C' utilise les
variables nodales :
- u, 8\u
1
a"u
f
(u
1
aux 4 sommets
- u, au centre de chaque facB.
Cet lment comporte donc 8 nuds, 20 depr{w; de libert, et utilise une
base polynomiale complte cubique. Il est ausSI possible d'utiliser un
polynme incomplet de 16 termes et d'viter les nuds situs sur les
faces. On peut par exemple supprimer les monmes e'l, (, "e,
2.6 Elments hexadriques (trois dimensions)
2.6.1 ELEMENT TRI-LINEAIRE (he.aMre, 8 nuds, CO)
,
-1 !ii7J =E 1
1
,
,
v'
"B
" ..
v'
134 Mthode des lments finis
Cet lment comporte une variable u, en chacun de ses 8 nuds. Les
nuds gomtriques sont confondus avec les nuds d'interpolation.
< P > = < 1 1; '1\ l; > . (2.29)
Les fonctions N sont les produits de fonctions N de l'lment linaire
une dimension.
1
2
3
4
5
6
7
8
C
8
2
h
2
Ci.
8, b
2
C
2
8, h, C
2
8
2
h, Cl
8
2
h
2
CI
8, h
2
CI
8, h, CI
8
2
h, CI
Avec
( aN/aI; )
1
{ aN/a } - { }
C C
- h
2
Cl - al Cl
- 8
2
h
2
b
2
Cl - BI Cl - 8, b
2
b, Cl 8
l
Cl - 8, b
l
- b, Cl 8
2
Cl
- 8
2
h,
- b
2
CI - 8
2
CI a
2
b
2
b
2
CI - 8, CI Bt b
2
b, CI 8, CI 8, b
l
- b
1
c. 8
2
Cl
8
2
h,
8, = 1 + 1;; 8, = 1 - 1;
b
,
= 1 + b, = 1 -
c, = 1 + ; C, = 1 - , .
C
1/8
2.6,2 t:Lt:MENTS DE HAUTE PRt:CISION DE TYPE
LAGRANGE (continuit CO)
Nous conservons pour les lments suiv8nts les fonctions N de l'lment
prcdent.
2.6.2.1 Elment quadratique complet (hexadre, 27 nuds, CO)
Cet lment utilise une approximation .quadratique de Lagrange une
dimension dans les trois directions 1;, .
n = 27 n, = 27
< P > - < 1;' C'; i = 0, 1, 2; j = 0, 1, 2; k = 0, l, 2 > .
(2.308)
Divers types d'lments 135
Les coordonnes (, des nuds sont constitues des 27 triplets
construits par combinaison des valeurs - 1,0, 1. Les fonctions N sont de la
forme:
() = N() .N(O (2.30b)
o N(). N(() sont identiques aux fonctions N() donnes au
paragraphe 2.2.2.1.
2.6.2.2 Elment quadratique incomplet (hexadre, 20 nuds,
CO)
Cet lment est trs souvent utilis surtout sous sa forme isoparam-
trique :
"
20
19
9
< P > = < 1 (; ' (' (;
' ', >. (2.31)
Les fonctions N, et leurs drives sont les suivantes:
- Nuds sommets :
Nud i 1 3 5 7 13 15 17 19
,
-1
1 1 -1 -1 1 1 -1
-1 -1 1 1 -1 -1 1 1
"
-1 -1 -1 -1 1 1 1 1
1
N, = 8 (1 + ,) (1 + (1 + ((,) (- 2 + , + + ((,)
aN, 1
D = 8 ,(1 + (1 + ((,) (- 1 + 2 , + + ((,)
aN, 1
= + ,) (1 + ((,) (- 1 + , + 2 + ",)
aN, 1
a( = 8,,(1 + ,) (1 + (- 1 + , + + 2 ((,).
136 Mthode des lments finis
- Nuds sur les cts parallles l'axe 1; :
Nud i 2 6 14 18
1;
-1 1 -1 1
,= '(,
-1 -1 1 1
1
N, = 4 (1 - 1;') (1 + (1 + ((,)
aN, 1
a[ = - :1 W + (1 + ((,)
aN, 1 ,
= 4 - 1; ) (1 + (C,)
aN, 1 ,
a( = 4 (,(1 - 1; ) (1 + ,
- Nuds sur les cts parallles l'axe :
Nud i 4 8 16 20
,
1 -1 1 -1
0' "
'(,
-1 -1 1 1
1
N, = 4 (1 + 1;1;,) (1 - (1 + ((,)
aN, 1 ,
a[ = 41;,(1 - ) (1 + (C,)
aN, 1
= - 2 + ,) (1 + ((,)
aN, 1 ,
ar = 4 (,(1 + I;,) (1 - ) ,
- Nuds sur les cts parallles l'axe' :
Nud i 9 10 11 12
( _ 0' ,
-1 1 1 -1
,- ,
-1 -1 1 1
Divers types d'lments 137
1
N, li (1 + (1 + (1 _ (')
N, 1 ,
De li + (1 - , )
N, 1 ,
,/ + (1 -,)
2.6.2.3 Elment cubique incomplet (hexadre, 32 nuds, CO)
Cet lment prsente 8 nuds aux sommets et 24 nuds rpartis au
tiers et aux deux tiers de chaque arte .
. , "
"
"
1 ..
, ''''
i!l 1 1 ..
24 las .8
_' !]. 1 Il ... --
__ ... - ..... .10
.1 " .1
14 , "
,
.. , 1
La base < P > est une base polynomiale cubique complte (20 termes)
laquelle s'ajoutent les 12 termes suivants:
',
e"c'
Les fonctions N, et leurs drives sont les suivantes:
- Nuds sommets :
Nud i 1 4 7 10 21 24
e,
-1 1 1 -1 -1 1
-1 -1 1 1 -1 -1
(,
-1 -1 -1 -1 1 1
(2 . 32)
27 30
1 -1
1 1
1
,
138 Mthode des lments finis
N, = 6
9
4 (1 + {{,) (1 + q'I,) (1 + ,) ( - li + ' + 'l' + C,)
= 6
9
4 (1 + qq,) (1 + ((,) ({,( - 1: + 3 ' + 'l' + {') +
= 6
9
4 (1 + ,) (1 + ((,) (q, (- 1
9
9 + ' + 3 q' + C' ) + 2 q)
= 6
9
4 (1 + ,) (1 + qq,) (c,( - 1: +e' + 'l' + 3(') + 2C),
- Nuds sur les cts parallles l'axe :
Nud i 2 3 8 9 22 23 28 29
,
1 1 1 1 1 1 1 1
-3
3 3
-3 -3
3 3
-3
q,
-1 -1 1 1 -1 -1 1 1
C,
-1 -1 -1 -1 1 1 1 1
N, = (1 - ') ,) (1 + qq,) (1 + ",)
aN, 81 ( 2 { ,)
ae = 64 (1 + qq,) (1 + ,) {, - "'9 - 3 e,
aN, 81 "(1 )'
a = 64 q,(1 - ) 9 + , (1 + ((,)
aN, 81 , (1 )
ac = 64,,(1 - e) 9 + , (1 + qq,) ,
- Nuds sur les cts parallles l'axe q :
Nud i 5 6 11 12 25 26 31 32
, 1 1 -1 -1 1 1 -1 -1
1 1 1 1 1 1 1 1
q,
-3
3 3
-3 -3
3 3
-3
C,
-1 -1 -1 -1 1 1 1 1
Divers types d'lments
139
81 (1)
N, = 64 (1 + (1 - Il') "9 + (1 + ({,)
oN, 81 2 (1 )
= 64 - 9" + (1 + CI,)
oN, 81 . ( 2 ,)
= 64 (1 + (1 + ((,) - 3
oN, 81 , (1 )
ar = 64 \,(1 + (1 - 9" + .
- Nuds sur les cts parallles l'axe C :
Nud i 13 14 15 16 17 18 19 20
-1 1 1 -1 -1 1 1 -1
-1 -1 1 1 -1 -1 1 1
C,
1 1 1 1 1 1 1 1
-3 -3 -3 -3
3 3 3 3
N, = :! (1 + W (1 + (1 - C') (; + (C,)
oN, 81 2 (1 )
"Ff = 64 + (1 - C) li + CC,
oN, 81 2 (1 )
T, = 64 + (1 - C) li + CC,
oN, 81 ( 2 \ '2)
ar = 64 (1 + ,) (1 + C, - ""9 - 3. C, .
140 Mthode des Mments finis
2.6.2 . 4 Elments curvilignes
a) Elments faces quadratiques
1
~
,
......
- ..... -
,
Les fonctions N sont identiques aux fonctions N du paragraphe 2.6.2.2.
b) Elments faces cubiques
+
,
.. , ....
,.-
,
Les fonctions N sont identiques aux fonct ions N du paragraphe 2 . 6 . 2 . 3.
2.6.3 t:LeMENTS DE HAUTE PRCISION DU TYPE HERMITE
Il est possible de construire un lment semi-C 1 de haute prcision il
8 nuds en utilisant la base polynomiale du paragraphe 2.6 . 2 . 3 et
4 variables nodales par nud:
U
f
a ~ U O"Uj OeUf '
Les lments C' il trois dimensions sont rarement utiliss en raison de
leur nombre trs lev de degrs de libert.
Divers types d'lments 141
2,7 Elments prismatiques (trois dimensions)
1
2
3
4
5
6
2,7,1 ELEMENT A 6 NOEUDS (prisme, 6 nuds, Co)
(
(N)
la
a
lb
b
0
0
I-e "1 !: 0
-I:H" 1
,
< P > - < 1 , e{
( aN/aI; ) ( )
-a
a
0
-b
b
0
1 - ,
8= 2
b _ 1 + ,
- 2
-8
0
a
-b
0
b
,
v'
(2.33)
{ aN/a, l
l
-2
-2
-2
l
2
e
2
2
142
Mthode des lments finis
2.7.2 LMENT A 15 NOEUDS (prisme, 15 nuds, CO)
,
p= < 1 ~ ( ec ~ , e', e ~ , ~ 2 , " {C' ~ C 'C' e ~ , ~ , > .
(2.34 )
Remarquons que la base polynomiale se rduit < 1 e q > lorsque' = O.
Pour les nuds 1 6 = - 1), les fonctions N sont les fonctions du
paragraphe 2.3.3.1 multiplies par - (1 -; C) '. Pour les nuds 10
15 (C = 1), les fonctions N sont les fonctions du paragraphe 2.3.3.1
multiplies par (1 +2
0
(. Enfin les fonctions N" N, et N. correspondant
aux nuds = 0) sont:
(1 - e - q) (1 - ('); (,(1 - ('); /1(1 - e) .
2,8 Elments divers
2,8,1 APPROXIMATION DE GRANDEURS VECTORIELLES
Si nous dsirons construire une approximation sur le domaine V
d'une grandeur vectorielle :
u = EJ
Divers types d'lments 143
nous utiliserons une approximation par lments finis pour chaque
corn posante :
ce qui peut s'crire :
u = < N. > {u,}
v = < N, > { v, }
p = < Np > {p,}
u = [N) { u, } .
(2.35a)
{
{ u, }}
{ v, }
{ p, }
(2.35b)
Lorsque des composantes ont des natures ou caractristiques sem-
blables, nous leur attribuons souvent les mmes fonctions N: par
exemple < Nu> == < N., >,
EXEMPLE 2.1. E/ment quadrilatral 8 nuds pour la mcanique des
fluides.
Dans certains problmes de mcanique des fluides 2 dimensions,
nous devons construire une approximation d'un champ de vitesse
de composantes u et v, et d'un champ de pression p. Il est souhai-
table, pour ce problme, d'utiliser une approximation linaire pour p
et quadratique pour u et v.
",
" p
"
'.
.,
,
,
P,
~
~
".
,
v'
'.
p.
'.
"
,
,
P,
(
144 Mthode des lments finis
Nous choisissons l'approximation suivante :
< Nil>
0 0
u.
E}
(1 x 8) (8 x l)
0 < Nil > 0
V.
-
(1 x 8) (8 x l)
0 0 < Np >
P.
(1 x 4) (4 x l)
{ n = [ ~ >
o ] {( x. ) }
< N > ( Y. )
o : < N, > '" < N > est donne au paragraphe 2 . 4 . 3 . 2
< Np> est donne au paragraphe 2 . 4 . 2
( u. ) T = < Ut u, >
{ V. )T =
< VI V, >
( P. ) T = < PI
p, p,
Pl>
( x.l' = < XI x, >
{ y.)T = < YI ... Y, >
2.8.2 MODIFICATIONS DES LMENTS
Il est parfois utile de disposer d'lments qui prsentent des nombres
de nuds diffrents sur leurs divers cllts. Ainsi la fonction d'interpo-
lation sera de degrs diffrents sur les divers cllts, Ceci permet par
exemple:
- de raccorder des lments de types diffrents :
Divers types d'lments
145
d'utiliser un degr d' approximat ion diffrent dans les directions , ~ :
~
opprolllllClUOtI
Q'JOIh'ollqu. In (
{
Ces lments sont construits en transformant des lments classiques
par suppression de nuds. Pour cela nous pouvons introduire des rela-
tions linaires entre les variables nodales, de manire liminer cer-
taines variables.
EXEMPLE 2. 2. EJment quadrilatral quadratique Il 7 nuds.
Nous partons de J'lment Il 8 nuds et crivons que u ~ , ~ ) est
linaire sur le c6t 1 -7 8.
"'\'
u:.f
" +--__ 0-_ _O
Pour J'lment Il 8 nuds :
.,\:'
u.,,'--
. , ....... --< .... - ....
< N > = < N, N, .. . N, > .
Pour J'lment Il 7 nuds (1 2 3 4 5 6 7) :
< N > = < (NI + ~ . ) N,N, N.N, N. (N, + ~ . ) > .
Pour un lment Il 6 nuds (1 2 3 4 5 7)
,
,
< N > = < (NI + ~ . ) N, N, N. (N, + ~ . ) (N, + ~ . + ~ . ) > .
146 Methode des Mments finis
2.8.3 LMENTS A NOMBRE DE NOEUDS VARIABLE [7J
Nous avons jusqu'ici prsent sparment les fonctions d'interpola-
tion des lments linaires et quadratiques une, deux et trois dimensions.
Nous pouvons galement construire les fonctions N des lments qua-
dratiques en ajoutant des termes aux fonctions N des lments linaires;
chacun de ces termes correspond l'addition d'un nud sur un ct
de l'lment. Considrons par exemple le quadrilatre 4 nuds.
"
,
,
1 2
(
NI' + f,' )(1-'1') )
Nf" tU+?J}(I-'f}1 (porO'l'0ph, 2 . 4 . 2 )
H
s
,tll +{I1',,'1)
H .. ' fll-(Jl h.",
Ajoutons un nud au milieu des cts '1 = - 1 et = 1 ; les fonctions
d'interpolation correspondantes N* sont :
- nuds de coin
- nuds de cts :
"
1
,
(
2
,
N* - 'N _ !!. -
,- 2 2 2
Nt = N,
Nt = N .
(2.36)
o
Divers types d'lments
a = ~ (1 - ') (1 - ~ )
2
b = ; (1 + ) (1 _ ~ )
147
sont les fonctions d'interpolation N, et N. des nuds de ct de l'l-
ment quadratique 8 nuds donn.es au paragraphe 2.4.3.2.
Plus gnralement l'addition d'un nud au milieu d'un ct modifie
seulement les fonctions d'interpolation correspondant aux 2 nuds
situs aux extrmits de ce ct : il faut leur ajouter le terme - ; o a
est la fonction d'interpolation du nud milieu ajout. Ceci est valable
une, deux et trois dimensions. Les figures 2.1 et 2.2 prsentent les
fonctions N pour les lments nombre de nuds variable une et
deux dimensions.
Termes des fonctions N
Nuds; Termes prsents Termes ajouter
Termes ajouter
({,) pour tous les pour les l
lments 2, monts 3
pour les lments
3 ou 4 nuds et 4 nuds
4 nuds
1 - 8 1
- 1
2
-2:
- ( - 1 + 9 + ' - 9 ')
16
1 + 8 1
1 - - - (-1 - 9 + ' + 9 ')
2 2 16
Elment
3 nuds:
, = 0
t
Elment
0 8 16 (9-27 -9 '+27')
4 nuds:
t
, = --
3
Elment
4 nuds:
0 0 "6 (9 + 27 - 9 ' - 27 ')
1
, = '3
8 = 1 - 1;' = fonction N, du paragraphe 2.2.2.1 ,
Figure 2.1. Fonctions N pour des lments une dimension 2, 3
et 4 nuds.
148 Mthode des lments finis
Termes des fonctions N
Nuds i
Termes ajouter pour
(" Il,)
Termes prsents
chaque nud ajout sur un ct
pour tous les lments
(fonctions du
nud
paragraphe 2 . 4 . 2)
0, - 1
Coins
1 8
- 1 - 1
4 (1 - .:) (1 - ~ )
-2
1 - 1
1 8
4 (1 + ) (1 - ~ )
-2
1 . 1
~ (1 + ) (1 + ~ ) 0
- 1 1
1
4 (1 - ) (1 + ~ )
0
COts
0 - 1 8
1 0 0
0 1 0
- 1 0 0
1
= 2 (1 - e) (1 - ry) = fonction N,
b = ; (1 + 1;) (1 - ~ ) = fonction N.
e = ; (1 - 1;') (1 + '1) = fonction N.
d = ; (1 - {) (1 - 'l') = fonction N,
nud nud nud
l, 0 0, 1
- 1 0 ,
d
0 0
-2
b
0 0
-2
b c
0
-2 -2
0
c d
-2 -2
0 0 0
b 0 0
0 c
0
0 0 d
du paragraphe 2.4.3.2.
Figure 2,2, Fonctions N pour des lments quadrilatraux comportant
4 8 nuds.
2.8,4 IOLEMENTS SUPERPARAMIOTRIQUES
Nous avons utilis jusqu'ici des lments isoparamtriques (N '" N)
et sub-paramtriques (lments quadratiques ou cubiques cOts rec-
Divers types d'lments
149
tilignes). Les lments sont super-paramtriques lorsque le degr
de N est suprieur celui de N. L'utilisation de ces lments n'est pas
courante car elle pose un problme de convergence : si nous dsirons
1
1 1
1 d
" . , au au au d
que es erreurs e 1 sur es nvees premIeres ox' oy' oz ten ent vers
zro lorsque la taille de l'lment tend vers zro, il faut que l'approxima-
tion de u contienne un polynme complet d'ordre 1 en x.
Cherchons la condition pour que l'approximation u contienne un
polynme linaire de la forme :
U
o
(x, y) = 8, + 8
2
X + 8, y.
La transformation gomtrique
x = < N> {x,}
y = < N> { y,}
permet d'exprimer U
o
en termes de 1;, ~ :
uo(l;, ~ ) = 8, + 8, < N> (x, ). + 8, < N> { y, }
o: b
l
= al + 8
2
XI + 8
3
YI
b,
~ N , = 1) .
Pour que l'approximation
u(l;, ~ ) = < N> {u, }
(2.378)
(2.37b)
(2.37c)
comprenne l'expression uo(l;, ~ ) , il faut que chaque fonctio'!. N, soit
une combinaison linaire des fonctions N!. Si < P> et < P> sont
les bases polynomiales correspondant aux fonctions < N > et < N >,
il faut que la base < P > soit incluse dans la base < P >. Pour les
lments superparamtriques, cette condition n'est pas vrifie,
2,8,5 LMENTS INFINIS
Nous dcrivons maintenant un lment qui prsente une longueur
infinie dans la direction x. Il permet de reprsenter approximativement
une fonction sur un domaine infini dans la direction x, lorsque cette
fonction tend vers zro l'infini de manire monotone.
150
Mthode des lments finis
Considrons la transformation gomtrique suivante une dimension
qui transforme le nud 2 de l'lment de rfrence en un point de l'l-
ment rel situ l'infini :
2
. ..
-, o
' . (
llimeM de rf'"nce
,
"
liml'" ",r
(2.38a)
Utilisons l'approximation linaire classique sur l'lment de rfrence
avec u, = 0 l'infini
(
') _ 1 - 1 + {u, } _ 1
u, - < 2 2 > u, = 0
En utilisant la transformation (2. 38a)
nous obtenons
= a (x - x,) - ,
.(x-x,)+1
,
u(x) = ",-+:--:'.'(x-'--"x',) u, .
-
2 Ut
(2 . 38b)
(2 . 38c)
Cette approximation de u tend vers zro l'infini en -' . Il est possible
aX
de modifier la forme de u(x) en multipliant la fonction d'interpolation N, ()
par une fonction f () qui s'annule pour = 1 ; par exemple
Alors:
La mme technique s'applique aux lments deux dimensions. D'autres
choix de fonctions sont proposs dans [8].
Divers types d'lments 151
REFERENCES
(1) J . J . CONNOR and C, A. BREBBIA, Finite Element Technique lor F/uid Flow, ButterwOr1h
Co .. 1976.
(2J A. R. MITCHEl and A. WAIT, The Finte Element Method in Partial Dillefental Equa-
tions, Wilev. 1977.
(3] O. C. ZIENKIEWICZ. The Finite Element Method in Engineering Science. MCGf8w-HiU.
New Yonc. lst edition, 1967. 3rd edlt ion. 1977.
(4) J . l. SYNGE, The Hypercircle Method in Ma/hem.'ical Physcs, Cambridge Univ. Press.
1957.
[5] J. T. OOEN. Finile Elements of Non-Linesf Continua, McGraw- HiII, New York, 1972.
(6) M. ZLAMAl, t( Sorne Recent Advances in the Mathematics of Finite Elements., Mathe-
matlcs of Finite Elemonts and Applications. pp. 59-81, Academie Press. 1973.
[7] K. J . BATHE and E. l. Wl LSON. Nurnerical Methods in Fnite Element Ana/ysis, Prentice-
Hall, 1976.
(8) P. BETIESS, 1: Infini1e Elements, /nt. J . Num. Melh. Eng., ", pp. 53-64. 1977.
CHAPITRE 3
Formulation intgrale
3.0 Introduction
Les deux premiers chapitres ont t consacrs il I"approximation de
fonctions par lments finis et la description d'lments classiques.
Dans ce troisime .chapitre nous nous intressons aux formulations
intgrales (ou variationnelles) des quations de comportement de
systmes physiques. La mthode des lments finis, dcrite au chapitre 4,
discrtisa una formulation intgrala pour conduire un systme d'qua-
tions algbriques qui fournit une solution approche du problme (fig. 3 . 1).
FOrmulation
des
quations
Transformation
des
. quati ons
Rsolution
numrique
1
1
Systme physique
lois de 18 p hysique. sciences de Ingnieur
Equations 8UX
drives partiellos
mthode d 85 rsidus pondrs
Formulat ion intgrale
approximai ion des fonctions inconnues par
nis et organlution matricielle lments fi
Systme
d' quations algbriques
rsolution numrique du systme
(SOlutIO"
~ p r O h ~
Figure 3.1. Transformation des quations d'un systme physique.
154 Mthode des lments finis
Dans ce chapitre nous commenons par proposer une classification
des systmes physiques discrets et des systmes continus. Puis nous
introduisons la mthode des rsidus pondrs qui, en utilisant des
fonctions de pondration, permet de passer d'un systme d'quations
aux drives partielles une formulation intgrale. L'intgration par
parties fournit des formulations intgrales modifies qui sont plus faciles
utiliser.
En mcanique dos solides, la notion de fonctionnelle est souvent
utilise pour construire directement une formulation intgrale en
sant le principe de stationnarit de la fonctionnelle d'nergie. Nous
montrons que cette dernire mthode est un cas particulier de la mthode
des rsidus pondrs. La technique des multiplicateurs de Lagrange
fournit des fonctionnelles modifies, de type mixte ou complmentaire
qui peuvent tre utiles pour certains problmes. Soulignons que la
notion de fonctionnelle n'est pas ncessaire si l'on cannait les quations
aux drives partielles puisque la mthode des rsidus pondrs conduit
directement aux formulations intgrales.
La mthode des rsidus pondrs fournit selon le choix des fonctions
de pondration tout un ensemble de formulations intgrales :
- formulation de type Galerkine, ou de Ritz si l'on utilise la notion
de fonctionnelle. Celle -ci est la plus utilise
formulation de type collocation par points ou par sous-domaines
formulation de type moindres carrs
formulation de type quations intgrales de contour.
Equati ons
'u'
drives
partielles
Construct ion de
formes intgrales W
par la mthode
des rsidus pondrs
et 3 . 3)
Classification
des systmes
(13 . t )
Discrtisation
et rsolution du
systme algbrique
(13 5)
-
f.
Principes
variationnels
-----1
1
1
1
Fonctionnelles
et conditions
de 'stationnarit
(134)
1
______ J
Figure 3,2. Relations entre les paragraphes du chapitre 3.
Formulation intgrale 155
La mthode des paramtres indtermins consiste remplacer,
dans l'une des formulations prcdentes, les fonctions inconnues par
des approximations de type (1 ,2) qui dpendent d'un nombre fini de
paramtres. Cette mthode devient la mthode des lments finis lorsque
nous utilisons l'approximation par lments finis dfinie au para-
graphe 1,1.2, Nous obtenons ainsi une expression discrtise d'une
formulation intgrale qui constitue le systme d'quations algbriques
conduisant la solution approche.
Les relations entre les paragraphes de ce chapitre sont rsumes par
la figure 3.2,
3,1 Classification des systmes physiques [1, 2]
3,1,1 SYSTMES DISCRETS ET SYSTMES CONTINUS
Un systme physique est caractris par un ensemble de variables qui
peuvent dpendre des coordonnes d'espace x = (x, y, z) et du temps t.
Le systme est dit stationnaire- si ses variables ne dpendent pas du
temps.
Certaines variables d du systme sont connues priori .: proprits
physiques, dimensions du systme, sollicitations, conditions aux limites,
etc. D'autres variables u sont inconnues: dplacements, vitesses, temp-
ratures, contraintes, etc.
Un modle mathmatique du systme permet d'crire. des relations
entre u et d en utilisant des lois physiques. Ces relations constituent
un systme d'quations en u que nous nous proposons de rsoudre, Le
nombre de degrs de libert du systme est le nombre de paramtres
ncessaires pour dfinir u un instant t donn.
Un systme est discret s'il possde un nombre de degrs de libert
fini, Un systme est continu s'il possde un nombre de degrs de libert
infini.
Le comportement d'un systme discret est reprsent par un systme
d'quations algbriques, Celui d'un systme continu est le plus sou-
vent reprsent par un systme d'quations aux drives partielles
ou intgro-diffrentielles associ des conditions aux limites en espace
et en temps,
Les quations algbriques des systmes discrets peuvent tre rsolues
par les mthodes numriques dcrites au chapitre 5. Par contre les qua-
tions des systmes continus ne peuvent en gnral pas tre rsolues
directement. Il est ncessaire de discrtiser ces quations, c'est--dire
156 Mthode des lments finis
de les remplacer par des quations algbriques. La mthode des lments
finis est l'une des mthodes qui peuvent tre utilises pour faire cette
discrtisation.
3.1.2 PROBLMES D'QUILIBRE, DE VALEURS PROPRES
ET DE PROPAGATION
Les problmes qui concernent les systmes discrets et continus peuvent
tre classs en 3 catgories que nous allons dfinir brivement en dcri-
vant le type d'quations correspondant chacun d'eux.
a) Problmes d'quilibre ou de valeurs aux limites
Ils consistent calculer u dans un cas stationnaire. Pour un systme
discret, les quations de comportement peuvent en gnral s'crire sous
forme matricielle :
[KI { U ) = { F }
o : [KI est une matrice caractrisant le systme
{ U ) sont les variables inconnues
{ F ) sont les sollicitations connues.
{3 . 1a)
Le comportement d'un systme continu est dcrit par les quations
aux drives partielles :
[(u) + fv=O
C(u) = f s
sur un domaine V
sur la frontire S de V
(3.1 b)
o : C et e sont des oprateurs diffrentiels caractrisant le systme
u sont les fonctions inconnues
fv et fs sont des fonctions connues dites sollicitations.
b) Problmes de valeurs propres ou de valeurs critiques
Ils constituent une extension d'un problme d'quilibre dans laquelle
nous valuons u correspondant des valeurs critiques de certains para-
mtres l., dites valeurs propres. Les quations correspondantes s'crivent:
Formula/ion intgrale
; ,
' ..
pour un systme discret :
(K] (U) = (M] (U)
o (M] est la matrice masse,
pour un systme continu:
C, (u) = ,l [,(u) sur le domaine V
e, (u) = ,l C,(u) sur la frontire S.
o t, C, C, e, sont des oprateurs diffrentiels.
c) Problmes de propagation ou de valeurs initiales
157
(3 . 2a)
(3.2b)
Ils consistent valuer u(x, t) pour t > to. dans un systme non sta-
tionnaire, u (x. (
0
) tant connu.
- Pour un systme discret:
d' d
[M] dt' ( U) + [Cl dt ( U) + [K) (U) = { F(t)} pour / > 10 (3 . 3a)
avec les conditions initiales
{ U} = { U
o
} et pour t = to
o [Cl est la matrice d'amortissement.
Pour un systme continu :
au ,
u = U
o
et Tt = U
o
pour t = to .
avec les conditions initiales
a'u au
m al' + C Dt +
C(u) + f, = 0 sur V
C(u) = f" sur S
(3.3b)
La figure 3 . 3 rsume la classification des systmes physiques que
nous venons de prsenter.
Dfinissons quelques notions couramment employes pour caract-
riser les quations des systmes physiques :
- Un systme discret est linaire si les termes de [K), [M), [Cl
et {F) sont des constantes indpendantes de u.
- Un systme continu est linaire si les expre .. ions C(u) et C(u)
sont linaires en u et ses drives. De plus f v. f", m, C sont indpendantes
de u et de ses drives. Nous pouvons alors crire :
[(u) = [C] { u ); C(u) = (C' ] { u )
systme physique
-linQire
ou
- non linare
discret
c::ontinu
stotomaire
non stationnaire
{au transitoire
ou pr0J>Ofll0tion
ou valeur initiale 1
stotionnaire
non stationnaire
(ou transitoire
ou propr)gotian
Ou initiale)
.t (Ill; e (,,) sont des oprateurs differentiets hornoones .
quilibt"e
voleurs propres
quilibre
[K) lui -IFI
[K)lul-
f > '0 :
2
[M) -E-z
dt dl
, = '0 :
IUo l ' 1 o f conn",
1"(u)+'y=Osur V
=.'s sur S
1 voJaws propres r -1',',,1 = >..12(.." sur V
e,(u) = ),e
2
(u) sur S
t ,..t
a
:
.0 .r
+C-'t- (u)=fysurV
eh)=fssurS
t = '0 :
110 ,a COIVII.lS
Figure 3.3. Classification des systmes physiques.
(J>
CD
'"
1}
""
<;;:
:J
'"
"
",
,,'
c;;.
Formulation inMgrale 159
o [q et rel sont des matrices d'oprateurs diffrentiels indpendants
de u. Par exemple pour l'oprateur laplacien :
a'u a'u [a a ]
C(u) LIu ax' + iJv' iJx' + .' u
- Un systme d' quations aux drives partielles est dit d'ordre m
s'il fait intervenir des drives de u jusqu' l'ordre m.
Un oprateur diffrentiel r. est dit homogne si
[(u 0) O.
- Un systme d'quations linaires aux drives partielles
[[j { u } + { f y } 0
est dit homogne si :
{ f
y
} 0
et les conditions aux limites
[CI { u } (fs )
sont dites homognes si :
( fs ) O.
Un systme diffrentiel linaire est auto-adjoint ou symtrique
SI :
L < u> L < v > [C)(u)dV
(3,4a)
o u et v sont des fonctions suffisamment drivables sur V, qui satis-
font les conditions aux limites homognes:
C(u) C(v) O. (3.4b)
Un systme diffrentiel linaire est positif si
Iv < u> [CI (u}dV;;' 0 (3,4c)
pour toutes les fonctions u qui satisfont (3. 4b) ,
Si (3 . 4c) est nul seulement pour u 0, le systme est dfini positif,
EXEMPLE 3, 1, Problmes continus il deux dimensions.
Problme d'quilibre:
L'quation de Poisson suivante correspond il un systme continu
stationnaire deux dimensions :
o'u o'u
- + - + f
y
0 sur V,
ox' av'
160
Mthode des lments finis
Elle rgit par exemple la distribution de temprature u dans un
milieu bidimensionnel homogne et isotrope, en rgime station-
naire. Pour Que cette quation admette une solution il faut
satisfaire l'une des deux conditions aux limites suivantes en chaque
point de la frontire S du domaine V
- Condition sur u (dite condition de Dirichlet) :
u = Us sur Su
o S, reprsente la partie de S sur laquelle est impose celle condition.
- Condition sur ou condition de flux :
au
an + au fs sur S,
o S, reprsente la partie de S sur laquelle est impose celle condition.
Si a ,. 0, celle condition est dite de Cauchy.
Si " 0, cette condition est dite de Neuman .
. ,
"'Us
s,
__ -3. __ ....... + Ou' "
v
,
Nous pouvons crire l'quation et les conditions aux limites sous
forme matricielle :
[
a' fJ']
ox' + W 'u + f
y
0
soit [Cl ( u ) + ( fy ) 0 sur V.
Un + aJ 'u fs soit [CIl (u) = (fs 1 surS, .
[1) . u Us soit [e..] { u 1 {f, 1 sur S, .
Rsoudre le problme d'quilibre consiste trouver la fonction u
qui satisfait les trois relations ci-dessus,
Formulation intgrale 161
Le systme est auto-adjoint car nous pouvons dmontrer par
intgration par parties que :
f
[
a'v a'v] [{PU O'U]
y u ax' + ay' dV Jy v ax' + av' dV
lorsque u et v satisfont les conditions aux limites homognes
au} }
sur S,; sur S,.
- + av 0 V 0
an .
Nous pouvons dmontrer de la mme manire que le systme
est dfini positif car :
f.
[
a'u a'u]
y u ax' + av' d v > 0 si a;:' 0
pour tout u non nul Qui satisfait les conditions aux limites homognes
prcdentes.
Problme de valeurs propres
L'quation de Helmholtz s'crit
a'u a'u
ax' + av' + .lu 0
sur V.
Elle est associe des conditions aux limites de type Neuman ou
Dirichlet. La solution de ce problme consiste calculer la fois
le paramtre et la fonction u.
Cette quation peut par exemple dfinir les modes propres u et les
frquences propres .jA. de vibration d'une membrane lastique
sous tension. Elle s'applique aussi au calcul des ondes lectroma-
gntiques et des vibrations de fluides en acoustique.
<!.,e_ "-o.'! _
Un systme non stationnaire peut tre dcrit par
t> to
sur V.
162
Mthode des lments finis
conditions aux limites :
au
an + au = fs sur S f
u = Us sur Su'
t = to
conditions initia/es :
u = U
o
sur V.
Cette quation rgit par exemple une distribution de temprature u
dans un mi/ieu bidimensionnel, en rgime transitoire.
Rsoudre le problme de propagation consiste trouver la
fonction u a tout instant t > 10 Qui satisfait les trois relations cidessus.
EXEMPLE 3.2. Equation de Navier-Stokes.
Les quations d'coulement laminaire non stationnaire deux
dimensions d'un fluide visqueux incompressible sont les quations
de Navier-Stokes :
au au au 1 op l' (0
2
U a' u)
a + u ax + v av + p ax - p ax' + av' + fx = 0
av av av 1 ap l' (a' v a' v )
a + u ax + v av + p av - p ax' + av' + f, = 0
au + av = 0
ax av
o : U, v sont les composantes du vecteur vitesse
p est la pression statique
fx f, sont les forces appliques par uniM de volume
l' est la viscosit dvnamique du fluide
p est sa densit.
Les conditions aux /imites sont par exemple (t > to)
au, }
-p+2I' an=f,
(
au, au,) _ sur S f
l' an+Ts -f,
UII = Uns}
_ sur SU .
U., - U
3
S
o n et s sont les directions normale et tangente la frontire .
Formulation intgrale 163
'.
"
J,'
S,
S,
Les conditions initiales sont (t ~ to)
~ : ~ : } sur V.
P ~ Po
Les quations non linaires ci-dessus s'crivent sous forme
matricielle:
( il) + [Cl ( u ) + ( f v ) ~ 0
o:
u
fx
Tt
u
(il) ~
v
( u ) ~ ( fv ) ~
f,
ai
v
0
P
0
u..+v.._l (
l
+ l): 0 : ~
x v p x2 v
l
: : p x
_________________________ J ____________________________ J _____ _
o ' J1(
l
l
):1
[C]= u X +v v -p x
l
+ V> : p v
, ,
-- - - - -- - - -- --- - -- -- - - - - --""1- - - - - - - - ---- -- -- - - - --- -- - - - - .,. - __ w.
'
x v 0
La formulation stationnaire est obtenue en supprimant le terme { u }.
3,2 Mthode des rsidus pondrs [3)
3,2,1 RSIDUS
Considrons un systme physique continu stationnaire dont le compor-
tement est reprsent par un systme d'quations aux drives partielles,
linaire ou non linaire d'ordre m
C(u) + fv ~ 0 sur le domaine V (3.5a)
164
Mthode des lments finis
les conditions aux limites s'crivant :
C(u) = fs sur la frontire S .
(3 . 5b)
Les variables inconnues u dpendent des coordonnes x.
Des fonctions u constituent une sofution du problme d'quilibre si
elles satisfont la fois (3. 5a) et (3 . 5b).
Nous appelons rsidu la quantit R(u) dfinie par:
R(u) = [lu) + fv
(3.6)
qui s'annule videmment quand u est solution de (3.5). Le rsidu est
un vecteur lorsque (3. 5a) est un systme d'quations diffrentielles.
3.2.2 FORMES INTGRALES
La mthode des rsidus pondrs consiste rechercher des fonc-
tions u qui annulent la forme intgrale
W(u) = f < 0/1 > {R(u)} dV = f < 0/1 > {((u) + f,} dV = 0 (3.7)
" v
pour toute fonction de pondration .v appanenant un ensemble
de fonctions E., u appartenant l'ensemble E. des solutions admissibles
qui satisfont les conditions aux limites (3 . 5b) et qui sont drivables
jusqu' l'ordre m.
Toute solution u qui vrifie (3. 5a) et (3. 5b) vrifie galement (3.7)
quel que soit le choix de E . Par contre la solution u de (3.7) dpend
du choix de E . Par exemple si l'ensemble E. est constitu par toutes les
distributions de Dirac o(x) sur V, alors les fonctions u qui satisfont (3.7)
satisfont galement (3. 5a) puisque le rsidu R est alors nul en tout
point de V, Si l'ensemble E. est fini, la solution u qui satisfait (3.7) est
une solution approximative du problme : elle ne satisfait pas exacte-
ment (3. 5a) en tout point de V. C'est ainsi que nous utilisons en fait
la mthode des rsidus pondrs.
EXEMPLE 3.3. Forme intgrale de l'quation de Poisson.
La forme intgrale de l'quation de Poisson de l'exemple 3.1
s'crit:
f
(
iJ'u a'u )
W = ,o/I(x, y) ax' + av' + fv dV. = 0
o u est drivable deux fois et doit satisfaire toutes les conditions
aux limites sur S. et S f'
Formulation intgrale 165
EXEMPLE 3 . 4. Forme intgrale des quations de Navier -Stokes .
La lorme intgrale des quations stat;onnales de Navier-Stokes
de J'exemple 3 . 2 s'crit sous forme matricielle :
w = L < 1jJ,(x, y) 1jJ,(x, V) ljJ p(x, y) > {ICl {;} + fv } dV = 0
o : u, v sont drivables deux fois, p est drivable une fois
u, v, p satisfont toufes les conditions aux limites sur Su et S f
IC] .st dfinie dans l'exemple 3.2.
3.3 Transformation des formes intgrales
3 . 3 . 1 INTI:GRATION PAR PARTIES
L'intgration par parties permet de transformer une forme intgrale
du type (3.7) de manire diminuer les conditions imposes aux fonc-
tions admissibles u. Rappelons tout d'abord les formules d'i ntgration
par parties :
8) Une dimension
J
" d'u l'' dljJ du
ljJ-dx = - - -dx +
dx' dx dx
.x. .:1:,
( 1jJ 9.!!. ) 1" .
dx .1,
b) Deux dimensions
L ljJ dx dy = - t u dx dy + fs ljJ u dy
= - L u dx dy + i ljJ u 1 dS
(3. Ba)
(3 . Bb)
(3.9a)
166
r
,
Mthode des lments finis
7 pOlinf ... ,. l'tll,ltUt
t , it . i .m8
.1.. f 1. ... " 1..
bn ch
'-md5
dy.ldS
1 t/J dx d y = - 1 u dx d y - fs t/J u dx
--f u dx d y +,h t/J u m dS
A y Ys
(3,9b)
L (t/J 6u - u6t/J) dxdy =fs (t/J dS o il = ::1 + :;"
c) Trois dimen'sions
L t/J dx dy dz = - L u dx dy dz + fs t/J u 1 dS ,
s
-
i
-: pOllllf nit U""'II'
(.ri .i
--
m' n . ,
--
Il 1'1 k
dV 1 d.
.L .!L
tin b. b; bl
-mIS
clrd, tdS
.bdr 'mdS
(3,9c)
(3,10)
Formulation intgrale 167
3.3.2 FORME INTGRALE FAIBLE
L'intgration par parties de (3.7) fournit des formes intgrales dites
faibles qui prsentent les avantages suivants :
- l'ordre maximum des drives de u qui apparaissent dans la forme
intgrale diminue. Les conditions de drivabilit de u sont donc moins
fortes;
- certaines des conditions aux limites qui apparaissent dans la forme
faible peuvent tre prises en compte dans la formulation intgrale, au
lieu d'tre satisfaites identiquement par u.
Par contre l'intgration par parties fait apparatre des drives de .p.
Donc les conditions de drivabilit de .p augmentent. De plus .p peut
avoir satisfaire des conditions sur une partie de la frontire de manire
faire disparaitre certains termes de contour. Nous approchons la solu-
tion de l'quation (3.5) par la solution de la forme intgrale faible, mme
si cette solution ne satisfait pas les conditions de drivabilit de (3.5).
De mme une ligne polygonale peut approcher une courbe quelconque
d'aussi prs que l'on veut, sans tre drivable en ses sommets.
EXEMPLE 3.5. Forme intgrale faible de l'quation de Poisson.
Dans la forme intgrale de l'exemple 3.3, u doit :
- tre drivable deux fois;
- satisfaire toutes les conditions aux limites sur SI et Su'
Les fonctions tjJ ne sont soumises aucune condition.
..
W _ r (ai/J au + ai/J au _ I/J f) d V +
Jv ax ax Dy ay v
+ 1/ dS + L I/J dS 0 .
Les fonctions I/J et u doivent tre drivables une fois. Nous avons
maintenant des termes de contour sur SI et Sil' Ceci permet d'utiliser
la condition impose u sur S f :
au
- fs - u sur SI
an
pour remplacer :
f
I/J au dS
s, an
par 11/J(fs - u) dS .
SI
168 Mthode des lments finis
De plus nous pouvons
en imposant :
faire disparatre le terme de contour sur Sil
'" = 0 sur S,.
La forme intgrale faible s'crit alors:
w = - L + - '" fv) dV + J., "'(fs - .u) dS = 0
(1 )
o u el 1/1 doivent satisfaire les conditions aux limites
u = Us sur Su
'" = 0 sur S,.
Apres deux intgrations par parties de la forme intgrale de l'exem-
pl;":i: 3-: ----------------------------
w= L + :;) u + "'fv) dV+Ts ("':> dS =
a' '" a' '"
Si nous choisissons des fonctions qui satisfont ;;::r + '-T = 0 en
ax ay
tout point de V, la forme (2) ne contient plus d'intgrale de volume
si fv = 0 :
w = '" - - - u dS = 0 .
f:
(
au a",)
s an an
(3)
Celle expression constitue la base de la mthode des quations
intgrales de con/our.
Rsum
Conditions sur u Conditions sur l/I
Formulation
ordre de condition condition ordre de condition condition
drivation sur S, sur Su drivation sur SI sur SIl
Equation
au
aux drives
2 b+a:ucfs U = Us nant nant nant
paftjolles
on
Forme int6gre/e
2
oU
nant nant nant
de l'exemple 3.3
-+u-fs u - Us
on
Forme intgrale (1) 1 n8nt u = Us 1 nant
"'-0
SUy = 0
Forme intgfs/e
nlumt
AU
'"
ulis!a;t !:t.rJI :; 0
-+ au-Is
u - Us
( pas de
on (pas de conditions sur S)
. volume
Formulation intgrale
169
Pour un systme diffrentiel d'ordre m tel que (3.5) et pour sa forme
intgrale (3.7), les fonctions admissibles u doivent tre drivables m fois
et satisfaire toutes les conditions aux limites. Aprs s intgrations par
parties nous pouvons choisir les conditions sur u et W suivantes:
u doit tre drivable m - s fois;
- .p doit tre drivable s fois;
- u satisfait seulement les conditions aux limites contenant des
drives jusqu' l'ordre m - s - 1 ;
- .p est nulle sur les frontires sur lesquelles u doit satisfaire les condi-
tions aux limites p(cdentes.
les conditions aux limites qui contiennent des drives d'ordre sup-
rieur ou gal m - s sont alors prises en compte dans la formulation
intgrale.
3.3.3 CONSTRUCTION DE FORMES INTGRAlES ADDI-
TIONNEllES
Dans la pratique le systme d'quations C(u) + f
y
= 0 est souvent
construit par limination de variables q, telles que contraintes, gradients,
entre plusieurs types de relations correspondant aux diverses lois phy-
siques, par exemple :
C,(q) - fv = 0 : lois d'quilibre ou de conservation
C,(q, u) = 0: lois constitutives.
(3.11 )
l'ordre de l'oprateur [ est en gnral plus lev que celui des oprateurs
C, et C,. Il est parfois utile de construire des formes intgrales directement
partir de (3.11) pour faire apparatre explicitement les variables q comme
des inconnues, et pour diminuer les conditions de drivabilit de u.
EXEMPLE 3.6. Construction de l'quation de Poisson.
Dans le cas d'un problme de rpartition de chaleur dans une
plaque de conductivit gale 1, nous crivons deux types de
relations:
- la conservation du flux de chaleur q, 'y tant une source de
chaleur par unit de volume
aqx aq, f 0
C,(q) - 'y = ax + ay - y =
la relation flux de chaleur-temprature:
au
{
qx + ax = 0
C,(q, u) = 0 au
q, + ay = 0
o u(x, y) est la temprature au point (x, y).
170
Mthode des lments finis
L'quation de Poiss on est obtenue en liminant Q;x et qy entre ces
trois quations :
a'u a'u
ax' + av' + f
y
= 0 .
Appliquons la mthode des rsidus pondrs directement aux opra-
teurs (C, -: fy) et C,:
W,= L < 1/1. > {l, (q) - f y ) dV+ L < 1/1, > {l,(q, u) } dV=O
(3.12a)
Comme 1\1" et 1\1" sont indpendants :
f
< 1/1. > {C,(q) - f, } dV = 0
l '
L < 1/1, > { l , (q, u) } d V = 0 (3 . 12b)
o u et q satisfont toutes les conditions aux limites sur S. et S,.
EXEMPLE 3 . 7. Forme intgrale mixte de l'quation de Poisson.
Utilisons les relations de l'exemple 3 . 6 pour construire W, :
W, = L (I/I.( aa';' + - f
y
) + 1/1 (q. + +
+ I/I.,(q, + dV = O.
Choisissons comme fonctions de pondration des fonctions de
mme nature que u, q. et q, notes ou, oq. et oq, :
1/1. = ou
1/1 = oq.
1/1., = oq, .
Alors :
W, = Iv (ouea';' + - f) + oq. (q. + +
+ dV=O.
' ...... '
Formulation intgrale 171
3 .. 4 Fonctionnelles [4, 5)
N o u ~ allons montrer que la mthode des rsidus pondrs. dans cer-
tains cas, quivaut rendre stationnaire une fonctionnelle. Par exemple
dans le cas de la mcanique des solides, cette fonctionnelle peut tre
l'nergie potentielle totale du systme. Ceci permet d'obtenir une formu-
lation intgrale directement partir des conditions de stationnarit de
la fonctionnelle, ce qui est utile lorsque la fonctionnelle est plus simple
exprimer que les quations aux drives partielles (3.5).
3.4,1 PREMIRE VARIATION
Une fonctionnelle 7r est une fonction d'un ensemble de fonctions et
de leurs drives:
(3.13a)
La premire variation de n est dfinie par:
On on (ou)
On = - ou + ~ 0 - + ...
ou 0 ou ox
ox
(3.13b)
o : ou, 0 ~ ~ ) sont des variations quelconques de u et ~ ~
~ ~ est obtenue par drivation formelle de n par rapport u
o ~ : ) est obtenue par drivation formelle de n par rapport ~ ~ .
ox
L'oprateur 6 a les proprits suivantes:
o (ou) = o( ou)
\OX ox
o(ou) = 0
o(L u dV) = Iv ou dV
o(u + v) = ou + OV
o(u v) = u ov + v ou = o(v u)
o(c u) = c ou (c = constante) .
(3.14)
172 Mthode des lments finis
EXEMPLE 3 . 8. Fonctionnelle une dimension.
Considrons l'exemple de fonctionnelle suivant :
n (u, ~ ) = r G ~ ~ ) -u f) dx, f est constant .
Sa premire variation est donc (3. 13b) :
.In = .1 r ~ ( ~ ~ ) -u f) dx
soit en utilisant les proprits (3.14) :
f
X> ( (d ) du ) f"
li re = XI ( ; d ~ dx - oU f dx = Xl
En prenant la premire variation de 01( , nous obtenons la seconde
variation de 1[ :
1
" ( (dU))' f" (d( .lU)'
b'n = b( .In) = .1 dx dx = dx dx
XI XI
car b(bu) =0 .
3.4.2 FONCTIONNELLE ASSOCIE A UNE FORME INT-
GRALE
Pour certains problmes dfinis par (3.5a) et (3 . 5b). il est possible de
construire une fonctionnelle n (u, ~ , .. .) telle que:
(3 . 15a)
o West une forme intgrale particulire, dite de type Galerkine, obtenue
en choisissant'" = bu dans la relation (3 . 7) et en intgrant par parties si
ncessaire :
W = L < .lu > {C(u) + fv} dV = 0 .
(3.15b)
Ceci est en particulier possible si :
'- C et C sont linaires et toutes leS drives de C sont d'ordre pair;
- f
s
, f v sont indpendants de u.
Ces conditions sont suffisantes pour qu'une fonctionnelle existe, mais
ne sont pas ncessaires.
Formulation intgrale 173
EXEMPLE 3.9. Fonctionnelle de l'quation de Poisson.
[(u) +
a'u a'u
t v ~ ax' + ay' +
tv ~ O.
Cet oprateur ne contient que des drives du second ordre; tv est
constant. Il possde donc une tonctionnelle.
La torme intgrale (1) de l'exemple 3.5 est :
J
(
a", au a", au ) f
w v ax ax + ay ay - '" tv dV + SI "'(.u - t
s
) dS ~ o.
En choisissant comme tonction de pondration '" '" bu, on
obtient :
w J (a( bu) au + a( bu)
, l' ax ax ay
~ ~ - bu tv) dV +
+ J bu(ou - t
s
) dS ~ O.
SI
Si nous dfinissons une fonctionnelle 1t sous la forme:
( au au) J (1 (au)' 1 (au)' )
n ,U, ax 'ay ~ v 2: ax + 2: ay - u tv dV +
+ t G .u' - u ts) dS
nous pouvons vrifier que :
'bn'" W ~ o.
La relation (3.15) peut tre interprte comme une condition de sta-
tionnarit de la fonctionnelle n : une solution u qui annule W, rend sta-
tionnaire la fonctionnelle n. Celle-ci est minimale ou maximale selon que la
seconde variation (j2Jt est positive ou ngative pour cette solution u :
b'n (u, : ~ , ... ) ~ ::;, bu bu + a i ~ ) ' b ~ ) b : ~ ) + ....
(3 . 1 6)
174 Mthode des lments finis
EXEMPLE 3 . 10. Seconde variation de la fonctionnefle de l'quation
de Poisson.
Lo seconde variation de n de l'exempfe 3.9 est :
Cette grandeur est toujours positive pour tJu non nul et (X positif.
L8 solution u de Mc = W = 0 rend donc n minimum.
Une fonctionnelle" (u, ~ ~ , .. ) est dite linaire si son expression est
1
. au 1
ln aire en u, ax f ".; par exemp e :
(3 . 17)
Une fonctionnelle est dite quadratique si son expression est quadra-
. au 1
tique en u, -a , ... ; par exemp e :
x .
,,= L (a, ( ~ ~ ) + a, u,) dV.
(3.18)
En pratique on dit parfois" fonctionnelle quadratique pour une fonction-
nelle qui comprend une partie quadratique et une partie linaire. Une
fonctionnelle purement quadratique peut tre crite sous forme matricielle:
au
-'" > [0]
ox
u
au
ax
dV
o [0) est une matrice symtrique, indpendante de u.
Sa premire et sa seconde variations s'crivent alors:
b" = L < bu
o(bu) ... > [0]
ox
u
au
ax
dV
(3.19)
(3.20a)
Formulation intgrale
0'" = Iv < ou
ou
a(bu)
ax
175
dV. (3.20b)
La fonctionnelle" est dfinie positive (n > 0) si la matrice [0] est
dfinie positive, c'est-dire si toutes ses valeurs propres sont positives.
Alors la seconde variation [)2n est aussi positive, -
EXEMPLE 3.11. Forme matricielle de la fonctionelle de l'quation de
Poisson.
La fonctionnelle" de l'exemple 3.9 s'crit sous forme matricielle:
ou
,,= 2. f au au> [1
~ J
ax
- 2 u fv) dV +
2 v ax ay 0
au
ay
+ L, ( a ~ - u fs)
dS.
Sa seconde variation est :
o( bu)
bW = b'" = i (}( bu)
a( ou)
[ ~
~ J
ax
) dV +
v ox
ay >
(bu)
ay
+ f a( bu)' dS .
s,
Donc dans ce cas [0] = [ ~ ~ J . Celle matrice est dfinie positive
puisque ses valeurs propres sont gales 1. Par consquent 0'" ;;, O.
3.4.3 PRINCIPE DE STATIONNARIT
Ecrivons les quations aux drives partielles (3.5) en sparant les
conditions aux limites en deux parties; la condition sur Sf est celle qui
apparat dans l'intgrale de contour lors de l'intgration par parties
C(u) + fv = 0 sur V
Cf( u) = fs sur SI
C,(u) = f, surS,.
(3.210)
(3.21b)
(3.21c)
176
Mthode des lments finis
La lorme intgrale obtenue par la mthode des rsidus pondrs est
W(IJ) L < '" > {L(U) + fv } dV 0 pour tout 1\1
(3.22)
avec:
C,(u) f s sur S,
C.(u) = f. sur S .
En choisissant 1\1 .l u et en intgrant par parties, nous pouvons
construire dans certains cas (systmes dits conservatifs) une fonction-
nelle 7t telle que la solution u cherche rende cette fonctionnelle station-
naire :
avec :
7t( u) ;: W(u) 0
e.(u) f . sur S .
Le principe de stationnarit s'nonce ainsi :
(3.23)
Parmi toutes les fonctions u admissibl es (drivabilit et conditions aux
limites sur S.), celle qui vrifie les quations (3.21 a et b) rend la fonction-
nelle n stationnaire.
3 . 4.4 MULTIPLICATEURS DE LAGRANGE ET FONCTION-
NELLES ADDITIONNELLES
Dans la fonctionnelle 7t les seules variables inconnues du problme
sont les fonctions u qui doivent satisfaire des conditions de continuit
et des conditions aux limites sur S .
La mthode des multiplicateurs de Lagrange permet de construire
d'autres fonctionnelles n* dont les conditions de stationnarit constituent
de nouvelles formulations intgrales qui peuvent prsenter les caractris-
tiques suivantes :
- .introduction de variables physiques additionnelles comme inconnues
- conditions de drivabilit et conditions aux limites moins svres
sur u.
Introduisons d'abord la notion de multiplicateur de Lagrange grce
un exemple simple:
EXEMPLE 3 , 12. Multiplicateur de Lagrange.
L'extremum de la fonction
n, (u, v) u' + v'
Formulation intgrale 177
est dfini par la condition :
on, = 2 u ou + 2 v ov = 0 pour tout oU et ov .
D'o: u = v = 0 n, (0,0) = 0 .
Supposons que nous cherchions le minimum de 1t, avec la condition:
glu, v) = u - v + 2 = o.
Une premire mthode consiste utiliser glu, v) = 0 pour liminer v
de l'expression de n,
n(u) = 2 u' + 4 u + 4
on = 4(u + 1) ou = 0
u = - 1 v = 1 n( - 1, 1) = 2.
La mthode du multiplicateur de Lagrange consiste rendre station-
naire :
n"(u, v , ~ = n,(u, v) + g(u, v) = u' + v' + (u - v + 2)
o est le multiplicateur de Lagrange correspondant la condition
9 = O.
La condition de stationnarit s'crit:
on* an an
on" = au ou + av ov + a ~ o = 0 pour tout ou, ov, O.l
soit:
on" = (2 u + ou + (2 v - ) OV + (u - v + 2) o ~ = 0
d'o: 2u+=O
2v-=0
u-v+2=O
d'o
u = - 1
v = 1
= 2.
Cette mthode vite l'limination mais conduit ici une fonction n"
des 3 variables u, v, , 810rs que la fonction n ne dpend que de u.
Gnralisons les rsultats de l'exemple prcdent en cherchant les
fonctions u qui rendent une fonctionnelle ", (u, q) stationnaire tout en
vrifiant les relations :
9, (u, q) = 0
g,(u, q) = 0
gm(u, q) = 0
sur V (3.25)
o q sont des variables physiques telles que contraintes, dbits, etc.
178
Mthode des lments finis
Une mthode consiste liminer m variables parmi u et q dans la fonc-
tionnelle ", en utilisant (3 . 25) . Par exemple si le nombre de relations (3 . 25)
est gal au nombre de variables q, nous pouvons obtenir une fonctionnelle
" qui ne dpend que de u.
La mthode des multiplicateurs de Lagrange consiste introduire m
multiplicateurs de Lagrange )'1' )'2' .. . , I.
m
, et rendre stationnaire la
fonctionnelle gnralise :
,,'(u, q , ) = ",(u, q) + Iv (i., g,(u, q) + i. ,g,(u, q) + ... +
+) . g.(u,q))dV. (3.26)
Les conditions de stationnarit de ,,' incluent les conditions (3.25)
,,, = 0
u
,,' = 0
q
0,,'
-' = g . = 0 r = 1, 2, .. . , m .
1. i 1
(3.27)
L'ensemble des inconnues est pass de u, q u, q, . La fonctionnelle n*
n'est pas dfinie positive, mme si " est dfinie positive. La figure 3.4
prsente les relations entre n, ni et n* .
EXEMPLE 3.13. Fonctionnelle gnralise de l'quation de Poisson.
Considrons la fonctionnelle de l'exemple (3 . 9)
n(u) = L G ~ , + H : ~ , -u fv) dV +
+ t G au' - u fs) dS .
Elle peut s'crire aussi en introduisant q, et q, (voir exemple 3.6)
", (u, q" q,) = Iv G (q', + cf,) - u fv) dV +
+ L, G au' - u fs) dS
Formulation intgrale 179
avec les deux conditions:
ou
q, + ax = 0
au
q, + ay = O.
Rendre 1t stationnaire quivaut rendre ni stationnaire sous condi-
tions. Par limination de qx et qy dans ni grce aux deux condi-
tions, nous obtenons n. Nous pouvons aussi utiliser la mthode
des multiplicateurs de Lagrange pour dfinir la fonctionnelle modifie:
,,'(u, q" q" ,II, ,) = t (} (q; + cf,) - u fv + .lI (q, + ~ ~ ) +
+ , (q, + ~ ~ ) ) dV+ fJ;au' -u fs) dS.
La condition de stationnarit de 1[* est:
" .
'" _ rr* rr* an'" 21t*.
b" - il bu + a bq, + -a bq, + -0) bAI
U Qx qy '1
e" ,. 0
+ a, UI" = .
Explicitons chaque terme:
aa"; bu = t (- fv bu + ,II aa:
u
+ , a;yu) dV +
ou aprs intgration par parties :
a,,' = _ f (0,11 + a, + fv) dV +
au v ax ay
+ r (au - fs) bu dS = 0
Js,
+ f (au - fs + ,lI m + ,1,1) dS = 0
s,
en supposant bu = 0 sur S ..
l, m sont les cosinus directeurs de la normale S f'
Les autres conditions de stationnarit sont:
~ , = f . (q, + ,Id dV = 0
q, v
a,,' f
a = (q, + ,) dV = 0
q, v
a,,' f ( au)
a
I
= v q, + ax dV = 0
a,,' f ( au)
a, = v q, + ay dV = 0 .
180 Mthode des lments finis
bn,(u, q) - 0 _
g,(u, q) - 0
Stat ionnarit
.avec conditions
Elimination
d. q
Multiplicateurs
de Lagrange
bn( u) "" 0 1
bnO(u, q, ).) _ 0 1
----,--.,-,..
Stationnarit
sans conditions
Figure 3.4. Transformation d'une fonctionnelle avec conditions en une
autre fonctionnelle sans conditions,
Les multiplicateurs de Lagrange ont souvent un sens physique: ce sont
par exemple des dbits, des flux. des contraintes.
Nous pouvons construire des fonctionnelles mixtes 1t, par limina-
tion des multiplicateurs de Lagrange de la fonctionnelle n', en utilisant
les relations 3 ,27. En mcanique des solides, les fonctionnelles dites
d'Heilinger- Reissner [6J sont de type mixte.
EXEMPLE 3 . 14. Fonction mixte de l'exemple 3 . 12.
Utilisons l'une des conditions de stationnarit de n', dans l'exemple
3.12, pour exprimer.l sous l'une des formes
{
- 2 u
.l = 2 v
v - u,
Les fonctions mixtes sont obtenues en reportant l'une des
expressions de .l dns la fonction n' de l'exemple 3.12 :
{
(- .r + v' + 2 uv - 4 u)
n,(u, v) = (u' - v' + 2 uv + 4 v)
(2 uv - 2 u + 2 v).
Les conditions de stationnarit de n, donnent dans chaque cas
u = - 1
v = 1
et n,( - 1, 1) = 2 .
Formulation intgrale 181
EXEMPLE 3.15. Fonctionnelle mixte de l'quation de Poisson.
Utilisons les relations a'" 0 et an' 0 de l'exemple 3.13 pour
qx Q'J
liminer , et , dans n' :
l\ = - qx
.1.
2
- q,.
La fonctionnelle n devient la fonctionnelle mixte n, :
n,tu. q,. q,) - L G (q; + q!) +q, + q, + u fv) dV +
+ t, G au' - u fs) dS.
Les conditions de stationnarit, aprs intgration par parties de
n
,
au 8u, sont:
a", f
oq, - v
:;: - Iv (q, + dV 0
a", f (
q
, Oq, ) r
u v ox + y - fv dV + J
s
, (au - fs - q.) dS 0
o;
q. q,l + q, m
u us}
liu 0 sur S,.
Une autre forme de 7t,. est obtenue en intgrant par parties les termes
ou u
q, OX et q, y :
-f + tf,) - (q, + q, - fv) u) dV
v 2' , X oy
+1 u fs - u
q
.) dS - f q,udS.
s, Su
Dans la fonctionnelle n de l'exemple (3 . 9), la seule variable est u.
Par contre les fonctionnelles n, et n: dpendent de trois variables
indpendantes u, q" q,.
182
Mthode des lments finis
La fonctionnelle complmentaire n, est finalement obtenue en
liminant u dans Tt, grce des conditions imposes q.
EXEMPLE 3 . 16. Fonctionnelle complmentaire de l'quation de Poisson
dans le cas o = O.
Si nous choisissons Qx et q., de manire satisfaire identiquement
les relations :
Bq, + Bq, _ fv = 0 sur V
Bx By
q, + fs = 0 sur S,
la fonctionnelle ~ de l'exemple 3 . 15 devient la fonctionnelle
complmentaire
f q, u dS.
Js"
Celle fonctionnelle dpend seulement des 2 variables q, et q,. Ses
conditions de stationnarit sont: _,
Bn,= -J q,dV-f ludS=O
aq, .
v s"
an, J f
r=- q,dV- mudS=O.
q, v Su
La figure 3,5 montre les relations entre n, n*, 1t
r
, ne ainsi que leur inter-
prtation en lasticit linaire.
3.5 Discrtisation des formes intgrales
3.5.1 DISCRt:TISATION DE W
Dans les paragraphes 3. 2et 3 . 3. nous avons remplac la rsolution
des quations aux drives partielles (3.5) par la recherche de fonc-
tions u qui annulent la forme intgrale (3.7) :
w= Lift.R(U)dV= Lift.(C(U)+fv)dV=O (3.28)
pour toute fonct ion ift.
Formulation intgrale
Forme W
t
1\'(u)
Fonctionnelle
directe
(Multiplie aleurs
nge) de Lagr8
1((u, q, k)
(Eliminati on
d. ')
n.(u, q)
ou
(Conditio ns
sur q)
',(q)
Fonctionnelle
gnralise
Fonctionnelle
mixte
Fonctionnelle
complmentaire
Travail virtuel
Energie potentille
totale
Fonct ionnelle
de Hu-Washi:z:u
Fonctionnelle
d.
Hellinger- Reissner
Energie
complmentaire
(Cas de l'lasticit
linaire)
Figure 3.5. Divers types de fonctionnelles.
183
Pour construire une solution approche u, nous discrtisons (3.28)
en deux tapes :
- Choisissons une appro.ximation il n paramtres des fonctions
inconnues u. Cette approximation peut tre nodale ou non nodale, sur
le domaine entier ou sur des sous-domaines (voir paragraphe 1 . 1). La
mthode des paramtres indtermins [1] utilise l'approximation non
nodale (1.3). La mthode des lments finis utilise l'approximation par
lments finis dcrite au paragraphe 1.1.2. Dans tous les cas, u peut
s'crire:
u = u (al' a" ... , a,).
(3.29)
L'expression (3 . 28) devient :
W = L \fi .(C(u(a
l
, a" "', 8,) + fv)) dV = 0
(3 . 30)
pour tout \fi.
184 Mihode des lments linis
Choisissons un ensemble de n fonctions de pondration indpen-
dantes .pl ' .p" ... , .p,. Soulignons que le nombre de fonctions de pon-
dration doit tre gal au nombre de paramtres de l'approximation (3.29).
Le choix du type de fonctions .p; conduit diffrentes mthodes: collo-
cation, Galerkin. (la plus utilise), moindres carrs. Les relations (3.30)
s'crivent:
W
I
= Iv J/i1(C(u(a
l
, a" .... a,) + Iv)) dV = 0
W
,
= Iv J/i,(C(u(a
l
, a" .... a,) + Iv)) dV = 0
(3.31 )
W, = Iv .p,(C(u(a
l
, a" .... a,) + fv)) dV = O.
Systme d'quations diHrentielles : I:(u) + fy'" 0 ~ u r V
Conditions aUl( limites:
e,( u) - fs sur S f
C,Cu) - f, sur S"
1 Rsidus pondrs
Forme intgrale: W - Jy ~ r u ) + f y) dV .,. 0
1-
o ~ u satisfait les conditions aux limites sur Sv et S /,
J Intgration par parties
Forme intgrale faible ~ W = t (CI (+) Cl(U) + \jtf.,) dV
+ f (C('I<) f, + ... ) dS ~ a
"
o u satisfait les conditions sur Sy .
~ I Choix : V ;;;; Ju
(Systme conservalif)
Choix de' 1f
Fonctionnelle II
Approximatio n de u
telle 'Que
l)n _ W
J Approximation de u
Fonctionnelle
Stationnarit
Forme intgrale
discrtise
6tr _ 0
discrtise
(KJ{U.) - (F)
Solution
Figure 3,6, Relations entre systmes d'quations diffrentielles, formes
intgrales et fonctionnelles.
Formulation intgrale 185
Elles constituent un systme d'quations algbriques dont la solution
fourn it les paramtres de l'approximation de u :
[K]{ 8 } = (F} (3.32)
La figure 3.6 rsume les diverses oprations ncessaires pour obtenir
une solution approche par la mthode des rsidus pondrs.
3 . 5 . 2 APPROXIMATION DES FONCTIONS u
Les fonctions u sont reprsentes par l'une des approximations du
chapitre 1. en satisfaisant les conditions de drivabilit et les condi-
tions aux limites requises par la forme intgrale utilise :
- Approximation non nodale sur tout le domaine V (relation (1 , 3))
u = u(x. al. a,. "'. a,) - < PI P, Pli >-
8
1
a,
(3,33)
- Approximation nodale sur tout le domaine V (relation (1 . 5)
(3 . 34 )
- Approximation par lments finis (paragraphe 1 . 1 .2).
Dans les exemples suivants, nous utilisons des appro)(imations non
nodales sur V de type (3 , 33) pour illustrer les mthodes correspondant
aux divers choix de fonctions de pondrat ion 1jI. Dans le reste de ce
livre nous u.tilisons des approximations par. lments finis.
EXEMPLE 3 . 17, Approximation non nodale de u sur un carr,
Considrons Nquaton de Poisson
(f, = f = constante) :
dfinie sur
a'u O' u
qu) + f, = ax' + ay' + f = 0
sur le carr
u = 0 sur S {X =
y=
1
1
un carr
186 Mthode des lments finis
,
.. 0
U:O
2
,-0
1.
, - 0
.1
2
Une approximation de u qui satisfait les conditio{ls aux limites
et les symtries est :
u = < PI P, > {::} = < P > ( a )
o : PI = (x' - 1)( y' - 1)
P, = (x' - 1) (y' - 1) (x' + v') = PI (x' + y') .
Alors:
C(u) = C{< P> (a)) = C(PI) a, + C{P,) a,
avec : C(Pd = 2(x' + y' - 2)
C(P,) = 2(6x' - 1) (y' - 1) + 2(6 v' - 1) (x' - 1) +
+ 2(x" - xl) + 2(y" - y') .
3.5.3 CHOIX DES FONCTIONS DE PONDRATION o/!
Selon le choix de iii, l'quation (3 . 31) conduit diffrentes mthodes
rsumes sur la figure 3.7.
3.5.3.1 Collocation par points
La fonction o/!;(x) est la distribution de Dirac o(x;) au point x;. dit point
de collocation. La forme intgrale (3 . 7) s'crit :
w = f o(x;) R(x. u) dV = R(x,. u) = O.
v .
(3.35)
Formulation intgrale 187
w= 0
o=<P>{a}
ou
(relation 3.28)
o = < N > { u ~ }
------
T Choix de W
1 1 1
1
Coliocation Collocation
pa, pa, Galerkine Moindres carrs
points sous-domaines
;, = ou ;, = o(t(u))
0/ = constante
ou ou
;, = orx;)
sur des
o/=<P> ;,=tP
sous-domaines ou ou
~ = N > ;, = t N
3.5.3.1 3.5.3.2 3.5.3.3 3.5.3.4
Figure 3,7, Diffrentes mthodes de paramtres indtermins selon
le choix de 1\1,
L'quation (3,31) devient :
W,(a) ~ (C(u(x, al' a" .. " a,)) + t
v
).= .. ~ 0 i ~ 1,2, .. " n
soit en utilisant l'approximation (3.33) de u :
Wi(a) ~ (C P> (a)) + tv). _ .. ~ 0
~ C(P) > (al + t
v
).= .. ~ 0,
(3,36)
La prcision de la solution dpend du choix des points Xi; celui-ci doit
respecter les symtries du problme. Le nombre de points de collocation
est gal au nombre n de paramtres ai' En pratique cette mthode est peu
utilise car elle est difficile mettre en oeuvre avec une approximation
par lments finis, De plus elle conduit un systme d'quations non
symtrique, Par contre elle a l'avantage d'viter l'intgration sur le volume,
ce qui peut tre intressant pour certains problmes non linaires. La
qualit de la solution peut tre amliore en prenant un nombre de points
de collocation suprieur n et en utilisant la technique des moindres carrs,
188
Mthode des lments finis
EXEMPLE 3.18. Rsolution de l'quation de Poisson par collocation
par points.
Utilisons la collocation par points pour rsoudre le problme
dfini dans l'exemple prcdent. Les points de collocation choisis
sont:
,
e,
1
1t.'<O 0 >
XI".<I/Z'l2>
L es fonctions de pondration sont :
.p, = o(x,)
.p, = o(x,) .
Les quations (3.36) s'crivent, avec l'approximation de u de
l'exemple prcdent :
W
,
= < [(P,) [(P,) >,." {::} + f(x
,
) =
W, = < [(P,) [(P,) >, . " {::} + f(x,) = 0,
D'o 'en utilisant les rsultats de l'exemple prcdent:
W, = - 4 a, + 4 a, + f = 0 {al = 0,297 6 f
W, = - 3 a, - a, + f = 0 a, = 0,0476 f,
La valeur de u au centre est
u, = u(x, ) = 0,2976 f,
La valeur ({ exacte obtenue par un dveloppement en srie de
Fourier 14 termes est :
u, "" 0,2947 f,
Formulation intgrale 189
La valeur de u, obtenue avec l'approximation 1 seul paramtre
u = P, (x) a, serait :
avec le point de collocation x, : u, = 0,25 f ;
- avec le point de collocation x, : u, '" 0,333 f.
3.5.3.2 Collocation par sous-domaines
Choisissons n sous-domaines Vi et prenons comme fonction 1/1/ :
{
1 si x appartient V'
"', = si x n'appartient pas V' .
(3 . 37)
La relation (3.31) s'crit sous la forme des n quations
W,(a) = r C(P) > ( a ) + fv) dV = o.
Jv.
(3.38)
La prcision de la solution dpend du choix des sous-domaines V'.
Ceux-ci doivent respecter les symtries. Le nombre de sous-domaines
doit tre gal au nombre de paramtres a,. Cette mthode est peu utilise
car le choix des sous-domaines est difficile. Comme elle ncessite des
intgrations sur V, il est prfrable d'employer la mthode de Galerkine.
EXEMPLE 3 . 19. Rsolution de l'quation de Poisson par collocation
pBr sous-domaines.
Rsolvons le mme problme que dans l'exemple prcdent en
utilisant les deux sous-domaines suivants
190 Mthode des lments finis
Le systme (3.38) s'crit :
W, = Iv, < ((P,)
((P,) > dV
{
a,} + r 1 dV
a
2
J yi
= - 0,916 7 a, + 0,387 5 a, + 0,25 f = 0
w, = L < L(P,) C(P,) > dV {::} +
J
fdV
v'
= - 1,75 a, - 3,5875 a, + 0,751 = O.
D'o : a, = 0,2994 f
a, = 0,063 0 f .
La valeur de u au centre est :
u, = a, = 0,2994 f .
La valeur obtenue avec J'approximation 1 psrsmetre u = PI (x, y) 8,
et en intgrant sur tout le domaine, serait u, = 0,3751.
3,5,3.3 Mthode de Galerkine
Les fonctions IJ! sont constitues par l'ensemble des variations ou
des fonctions u :
IJ! = ou = < P> { 6a} pour tout {oa} (3.39)
o { /Ja} sont les variations des paramtres d'approximation {a}.
L'quation (3.31) devient :
(3.40)
W=<oa> L{P)(cp>{a})+fv)dV=O. (?.41)
Comme W doit s'annuler pour tout {oa}, la relation prcdente
quivalente aux n quations algbriques :
est
W, (a) = J. P,( < C(P) > { a } + Iv) dV = 0
(3.42)
= t P,( < C(P) > {a} + Iv} dV = O.
Ce systme est symtrique si l'oprateur L est auto-adjoint.
Formulation intgrale 191
EXEMPLE 3,20, Rsolution de l'quation de Poisson par la mthode
de Galerkine sans intgration par parties.
En utilisant les {onctions PI et P, de l'exemple 3,17, nous obte-
nons l'expression suivante de (3,42) :
W
I
t < PI ,[(PI)
W, 1 < P,,[(PI)
PI ,[(P,) > dV
P,. [(P,) > dV
{a
a,l}
{a
a,l}
+ 0
+ t P, {dV 0,
D'o le systme symtrique:
5,689 al + 1,9505 a, 1,777 8{
1,95058
1
+ 2,3839 a, 0,7111 {
al 0,292 2 { a, 0,059 2 {
u, 0,292 2 {.
La valeur obtenue avec l'approximation 1 paramtre (x, y) al
serait:
u, 0,312 '5 {.
En utilisant une approximation 3 paramtres avec les fonctions
PI' P, et PI x')I', nous aurions :
al 0,2949 { a, 0,0401 { a, 0,123 {,
u, 0,294 9 { ,
L'intgration par parties permet en gnral de transformer (3.42),
comme cela a t expos dans le paragraphe 3.3:
WI(a) f [1(Ptl [,(Pl > {a }}dV - f PI {v dV - f PI {sdS
y y SI
W,(a) L [I(P,) [,(Pl > {a })dV - L P, {v dV - l PJsdS o.
1 (3.43)
Les solutions de (3.42) et (3.43) sont identiques si les fonctions < P >
sont identiques et satisfont toutes les conditions requises par (3.42).
Cependant les conditions requises par (3.43) tant moins restrictives,
nous pouvons utiliser des fonctions < P> plus simples pour (3.43)
que pour (3.42). Parmi toutes les mthodes dcrites, c'est la mthode
de Galerkine sous la forme (3.43) qui est la plus utilise.
192 Mthode des lments linis
EXEMPLE 3 , 21 , Rsolution de l'quation ' de Poisson par la mthode
de Galerkine, aprs intgration par parties ,
En utilisant la lorme W obtenue par intgration par parties dans
J'exemple 3. 5 nous (rouvons : .
C, =
o
<-
ox
o
->'
oy ,
C, =
L'expression (3,43) devient (fs = = 0)
o
oP, oP, + aPi oP, > dV {a a,'} _
X ox oy oy
W, = L
'OP, oP, oP, oP,
<--+-- '
OX OX oy oy ,
- Lp,'dV=O,
OP, oP, + oP, oP, > dV {a,} _
X ox oy oy a,
- Iv P, IdV = 0 ,
Ce systme d'quations et sa solution sont identiques ceux de
l'exemple 3 , 20,
3,5,3,4 Mthode des moindres carrs
La mthode des moindres carrs consiste minimiser l'expression
"m = L R,RdV
par rapport aux paramtres a" a" " ', a" R tant le rsidu
R = C(u) + Iv = < C(P) > (a l + Iv ,
Les conditions de stationnarit de (3,44) sont
W = o1t
m
(a" a" .. " a,) = 0
W.(a) = L C(P.) C(P) > (8) + Iv)dV = 0
~ . a ) = L C(P,) C(P) > (a l + IvldV = 0,
(3,44 )
(3,45)
(3,46)
-'
Formulation intgrale 193
Cette mthode est peu utilise car elle ne permet pas l'intgration par
parties, et impose donc des conditions plus strictes sur l'approximation
de u que la mthode de Galerkine. Par contre elle conduit un systme
symtrique et dfini-positif quel que soit l'oprateur L.
EXEMPLE 3.22. Rsolution de l'quation de Poisson par la mthode
des moindres carrs.
En utilisant les lonctions P, et P, de l'exemple 3.17 la relation
(3.46) s'exprime, pour le problme dlini dans l'exemple 3.18 :
w ~ L <L(P,).L(Pd C(Pd.L(P,dV{::}+LC(p,)ldV=O
w'=L <C(P,).L(P,) C(P,).C(P,dv{:;}+LL(p,)ldV=O
31,288 9 a, + 25,193 7 8, = 10,66671
25,1937 a, + 87,446 3 a, = 12,800 1
a, ~ 0,29041 a, = 0,0627 l,
u, = 0,29041.
Avec l'approximation un paramtre u = Pdx, y) a" on trouverait:
u, = 0,340 91.
En utilisant une approximation trois paramtres et les lonctions
PI' P" P,. x' y', nous aurions :
a, = 0,294 9 1 a, = 0,038 5 1 a, = 0,156 2 1
u, = 0,294 91.
3.5.4 DISCRTISATION D'UNE FONCTIONNELLE (mthode de
Ritz)
La mthode de Ritz consiste discrtiser une fonctionnelle n en uti-
lisant une approximation de u du type (3.33) puis crire ses condi-
tions de stationnarit par rapport aux paramtres de l'approximation
n(u) = n(u(a" a" ... , a,))
an an an
bn(a" a" .... a,) = -a lia, + -a lia, + ... + -a lia, = O.
al 8
2
an
194
D' o les n
Mthode des lments finis
quations :
an = o. an = o.
aa, 'aa, '
an
. -0
... , a,. - .
(3.47)
Les fonctions u
tionnelle.
doivent satisfaire les conditions requises par la fonc-
Si la fonctionnelle n existe, sa premire variation
forme intgrale W de type Galerkine (3.43)
est identique une
bn = W = O. (3.48)
La solution obtenue par la mthode de Ritz est alors identique celle
obtenue par la mthode de Galerkine. La figure 3.8 montre qu'en fait
les mthodes de Ritz et de Galerkine sont identiques.
! rsidus pon
drs
,Fonctionnelle
"
diser tisation
d. u
Fonctionnelle'
discrtise
n(s . 82. "" a ~
conditions de
stationnarit
(Aitz)
conditions de,
stationnarit
par rapport
8 . 8
2
... , ait
Forme intgrale
(3 . 7)
1- = 6u
intgration
par parties
Forme intgrale 'aible
f5n - W
Gat
<lI klne " 0
discrtisatia
d. u
( Galerkine)
Forme Intgrale '
discrtise (3.43)
(in(OI, 82 ..... 8 ~ _ 0
Figure 3,8. Mthodes de Ritz et de Galerkine,
n
EXEMPLE 3 .23. Rsolution de l'quation de Poisson par 18 mthode
de Ritl.
L'expression de n est donne dans l'exemple 3.11 (a = fs = 0) .
En utl'lisant l'approximation de u de l'exemple 3,17 nous obtenons:
( aPI aPI aPI ap,
1 J ax ay ax ax
n(8" 8,) = -2 < 8, a, > v
ap, ap, aPI ap,
ax ay ay ay
Formulation intgrale
195
Alors lin = 0 s'crit :
oP, oP, oP, oP,
--+--
J ox ox oy ay
v Sym.
Ce systme d'quations est identique Il celui de l'exemple 3.21
correspondant Il la mthode de Galerkine,
EXEMPLE 3,24, Comparaison des rsultats des diffrentes mthodes,
Rsumons les valeurs de ~ obtenues par les diffrentes mthodes
utilises prcdemment pour rsoudre le problme de Poisson de
l'exemple 3,17.
P, = (x' - 1) (y' - 1); P, = P, (x' + y'); P
3
= P, ,x' y' ,
Collocation
Collocation GBlerkinfJ Moindres Exacte
Fonctions par poinrs
pa, ou Ritz carrs paf srie
sous domaines Exemple 3.20 Exemple de Fourier
Exemple 3.18
Exemple 3.19 ou3.23 3.22 (14 termes)
P, 0,2500 0,3750 0,3125 0,3409
PI' Pl
0,2976 0,2994 0,2922 0,2904 0,2947
p . Pl' Pl
0,2949 0,2949
3,5.5 PROPRII:TI:S DES SYSTM ES D'I:QUATIONS
Toutes les mthodes prcdentes conduisent un systme d'qua-
tions :
[K] { a ) = {F) , (3.49)
La figure 3,9 rsume les proprits de ce systme, pour chacune des
mthodes.
196
Mthode des lments finis
Conditions sur
Proprits
Mthodes Termes KI) F, u=<P> {a}
doncsur < P>
delKI
Coll ocation par r(PJ) en x :=: Xi - 1 ... (XI) sur S ~ non symtrique
points sur S,
Collocation pat
J" PI) dV
-LI, dV
sur S"
non symltique
sous- sur S,
dOmaines
Galerkine
L P, t(PI) dV
- JI' PI l" dV
sur Sil symtrique si 1:
sur SI autoadjoint
Galerkine aprs
L < rd
P
,) >
{ tJ(Pj )}dV
Lp/ lvdV
sur Sil symtrique si \:
intgration auto- adjoint
par parties
t
l
:=: t ,
+ J PI's dS
"
Moindres
L t(P,) P,) dV
-J v t (PI) Iy dV
sur S"
symtrique et
carrs sur S f dfinie
positive
Ritz (si la fone-
L
< CI(P
I
) > (',(P, ) }dV
P, (v dV
sur S"
symtrique
tiannelle
existe)
,
+ J PI 's dS
"
Figure 3,9, Proprits du systme d'quations de la mthode des
paramtres indtermins.
Rt:SUlTATS IMPORTANTS
Forme intgrale de la mthode des rsidus pondrs
w = L ,p R (u) dV = L ,p(C(u)
fv) dV = O. (3.7)
Premire variation d'une fonctionnelle :
an
an = au au +
an a(ou) +
~ ~ ) OX
(3.13b)
Formulation intgrale
Fonctionnelle associe une forme intgrale
n telle que J1t '" W = 0
W = J v Ju(C(u) + fvl dV .
Forme intgrale discrtise :
W, = J v I/I,(C(u(a" a" ... , a,)) + fvldV = 0
i = 1, 2, ... , n ,
Collocation par points :
W,(a) = C(P) > (a 1 + tvlx." = O.
Collocation par sous-domaines :
W,(a) = r C(P) > ( a ) + fvl dV = 0,
J v'
Galerkine (aprs intgration par parties) ou Ritz
W,(a) = J v C,(P,) < C,(P) > (a) dV-
197
(3.15a)
(3.15b)
(3.31 )
(3.36)
(3,38)
- r P, fv dV - f P,fs dS = 0, (3.43)
J v s,
Moindres carrs:
{a},a
l
,a2""
c
[Cl
E,
E",
Iv, Is
(F)
[K]
W,(a) = L C(P,) C(P) > (a) + fvldV = 0,
NOTATIONS
paramtres de l'approximation de u
coefficient d'amortissement
matrice d'amortissement d'un systme discret
ensemble des fonctions u admissibles
ensemble de fonctions de pondration
(3,46)
vecteur des sollicitations de volume et de surface
vecteur sollicitations d'un systme discret
matrice globale ou rigidit d'un systme discret
198
l, m, n
C(u), C(u)
m
[M]
q
R
u
W, W\, W" ...
bu, bn
b'u, 0'.
O( x)
LI
, .l\' .l" .. .
!/J, !/J\, !/J" .. .
,
n, ni. 1t 1t,. ne
Mthode des lments finis
composantes du vecteur unitaire normal la frontire du
domaine
oprateurs diffrentiels dfinissant les quations et condi-
tions aux limites d'un systme physique continu
masse par unit de volume
matrice masse d'un systme discret
variables physiques telles que dbit. contraintes
rsidu correspondant une quation aux drives pAr-
tielles
parties de la frontire du domaine sur lesquelles sr nt
connues u et f
variables inconnues d'un systme physique
formes intgrales
premire variation d'une fonction, d'une fonct ionnelle
seconde variation d' une fonction, d' une fonctionnelle
distribution de Dirac correspondant au point x
oprateur laplacien
valeurs propres ou multiplicateurs de Lagrange
fonctions de pondration
fonctionnelles.
REFERENCES
111 s. H. CAANDAlL, Engineering Analysis, McGrawHili. 1956.
(21 L. COLLATZ, The Numerical Treatment of DifferentiaI Equations. Springer.Verl ag, 1966.
[31 B. A. F1NLAYSON, The Method of Weighl ed Residuals and Variations' Princip/es,
Academie Press. 1972.
(4) S. C. MIKHLlN, VaristioneJ Methods in MathemecCa/ physics, Macmillan, 1964.
(51 S. C. MIKHLlN, The Numa/ica! Performance of Variationa/ Methods, Wolters-Noordhoff,
1971.
(6) K. WASHIZU, Variationsl Methods in Elasticit y Md PIBsticity, Pargamon, 1975.
CHAPITRE 4
Prsentation matricielle de la mthode
des lments finis
4,0 Introduction
Ce chapitre dcrit la mthode des lments finis ainsi que les diffrentes
tapes ncessaires pour la mettre en uvre. Nous insistons en particulier
sur l'organisation matricielle qui facilite le passage de la formulation la
programmation.
Tout d'abord nous dfinissons la mthode des lments finis comme une
mthode de discrtisation des formes intgrales de type Galerkine; elle
remplace la forme intgrale globale W par une somme de formes int-
grales lmentaires WII! puis discrtise celles-ci en utilisant une approxi-
mation par lments finis. Ceci conduit la dfinition des matrices
globales et lmentaires. Nous discutons ensuite les conditions de
convergence et prsentons la technique dite du patch test utile pour
vrifier la convergence des lments non conformes.
Puis nous dcrivons l'organisation matricielle des formes intgrales
lmentaires discrtises, en utilisant deux exemples bass l'un sur les
problmes harmoniques et l'aulre sur l'lasticit plane ; les sous-pro-
grammes correspondants prcisent la technique de calcul des matrices et
vecteurs lmentaires.
La technique d'assemblage, caractristique de la mthode des
lments finis, permet de passer des matrices et vecteurs lmentaires la
matrice et au vecteur globaux. Nous tudions ensuite les proprits de la
matrice globale, ainsi que les diverses techniques de stockage de
celle-ci, en particulier le stockage par la mthode de la ligne de ciel .
Enfin nous dcrivons les diffrentes manires d'introduire les conditions
aux limites dans le systme d'quations final, ainsi que les oprations de
transformation des variables. Nous terminons le chapitre par un exemple
dtaill d'application de la mthode des lments finis l'quation de
Poisson.
4 ,1 Mthode des lments finis
4.1 . 1 DFINITIDN
La mthode des lments finis consiste utiliser une approximation par
lments finis (paragraphe 1.1.2) des fonctions inconnues u pour
200
Mthode des lments finis
discrtiser une forme intgrale W (paragraphe 3.2), puis rsoudre le
systme d'quations algbriques ainsi obtenu. Dans ce paragraphe,
nous dcrivons brivement les diffrentes tapes qui seront dtailles
dans la suite du chapitre.
Nous utilisons des formes intgrales de type Galerkine (para-
graphe 3.5 . 3 . 3) pour lesquelles les fonctions de pondration sont
'" "" ou :
W= L bu(C(u) + fv)dV= O.
(4.1)
Remplaons cette intgrale par une somme d'intgrales sur chaque
lment V' :
W = W' = E f bu'([(u') + fv)dV= O. (4.20)
t = t
Pour calculer chaque terme W', dit forme intgrale lmentaire,
utilisons une approximation par lments finis de u et de bu sur chaque
lment V' :
u' = < N > { u, }
ou' = < N >' { bu, } .
(4.2b)
Comme < N > est nul en tout point extrieur V', et comme < u, > ne
fait intervenir que les variables nodales de l'lment V', chaque terme W' se
calcule partir des seules variables lies l'lment e. Cette proprit a
contribu au succs de la mthode des lments finis, en raison de la
nature rptitive des oprations ncessaires pour valuer chaque terme W'.
En utilisant (4. 2b), W devient:
W' = L. ou'(C(u') + fv)dV
W' = < ou,> L{N}f
v
dV) . (4 . 2C)
Nous effectuons le plus souvent des intgrations par parties de
(4 . 1) (voir paragraphe 3.3) pour diminuer au maximum l'ordre des
drives qui interviennent. L'expression de W fait alors intervenir des
drives de oU dt des intgrales de contour. Les termes W' peuvent alors
s'crire de manire matricielle (systme stationnaire) :
W'=f o(au') > [D]{au'} - OU'.fv)dV-f ou'.fsdS (4 . 3)
V SI
o :
au' a'u'
< u' > = < ut! - .. . - . , , >
0" ax'
< b(au') > = < bu' ... .. >
,-,'
Prsentation matricielle de la mthode des lments finis 201
[0] est une matrice indpendante de u' et de ses drives pour les opra-
teurs [ linaires. [0] est fonction de u" et de ses drives pour les
oprateurs [ non linaires.
f. , fs sont les sollicitations de volume et de surface
V' est le volume de l'lment
Sr est la portion de frontire de l'lment e [si elle existe) qui concide
avec la frontire SI de V, sur laquelle l'intgration par parties fait
apparatre une intgrale de contour.
EXEMPLE 4.1. Expression matricielle de W' (quation de Poisson).
Pour l'quation de Poisson, prsente dans l'exemple 3.1, la
forme intgrale lmentaire W' s'crit, en supprimant les indices e
de u ~ et 51/ :
avant intgration par parties (voir exemple 3.3)
aprs intgration par parties (voir exemple 3. 5)
W=2:
W
'= z:(f b(u) ' > [D]{u) - bufv)dV-
~ t v-
o
-t. bu(fs - au) dS) = 0
1
< b(u) > - < b ~ ~ ) b ~ ~ ) >
u u
= < x y>
< u >
[0] = [ ~ ~ l
Considrons le domaine rectangulaire V divis en lments rectan-
gulaires V'. Sa frontire S est divise en deux portions S, et Sr:
s,
1
,
2
5,
,
4
5,
,
202
Mthode des lments finis
L'intgrale de contour n'existe alors que sur un ct des lmenls 1,
2, 3 et 4; elle s'crit pour l'lment 1 :
,
F' bu(x" y) (f
s
- au(x" y)) dy .
"
Finalement, en utilisant dans (4.3) les expressions (4. 2b) de u et bu' et
des expressions analogues de au!' et o(ul!) en fonction de ( u" ) et < buu >,
nous obtenons l'expression matricielle suivante de W
e
discrtise, qui est la
base de la mthode des lments finis (voir paragraphe 4 . 2.1) :
W' = < bu.>(lk)(u.} - If)) (4 . 4)
o : Ik) est la matrice lmentaire, indpendante de u. si l'opra-
teur l: est linaire
( f) est le vecteur lmentaire des sollicitations;
( u.) est le vecteur lmentaire des variables nodales;
( bu,) est le vecteur lmentaire des variations des variables _'
nodales.
La forme intgrale globale (4. 2a) se construit par addition des formes
lmentaires (4 . 4) : .
W = LW' = L < bu. > (lk) ( u. ) - ( f)) = O. (4. 5a)
, .
Cette somme est ensuite organise sous la forme matricielle :
o : [K]
( F)
( U, )
W = < bU" > {[K] { U" ] - ( F )) = 0
est la matrice globale, indpendante ou non de ( U, )
est le vecteur global des sollicitations
(4 5b)
est le vecteur global de toutes les variables nodales du
problme
( bU. ) est le vecteur global des variations des variables nodales.
Le passage de (4.58) il (4. 5b) constitue l'assemblage des lments;
il permet de construire les termes de IK) et ( F) partir des termes de Ik)
et ( f ) de chaque lment. L'assemblage sera tudi au paragraphe 4.4.
Comme W doit tre nul por tout < bU, >, nous obtenons le systme
d'quations en ( U. ) :
[K]{ U, } = ( F ) . (4.5c)
Dans les problmes non stationnaires apparaissent des termes du type
au a'u
al et al' auxquels correspondent les expressions :
W' = f bu' au' dV et W' = f bu' a 2 ~ dV
V' at v. a,-
(4.6a)
Prsentation matricielle de la mthode des lments finis 203
qui s'aj'lutent (4 . 2a) . Ces termes donnent aprs discrtisation grce
(4 . 2b' :
{
du } { d d ~ }
W' = < bu, > [c) d; ' et W' = < ou, > [m) ,
[c) = [m) = L. ( N) < N > d V (4 . 6b)
o [m) est dite la matrice masse lmentaire,
Nous dfinissons le rsidu lmentaire par
( r ) = ( f ) - [k] ( u, ) . (4.6c)
Le rsidu global est obtenu par assemblage des rsidus lmentaires :
( R ) = L ( r) = ( F) - [K) ( U, ) , (4.6d)
Ce rsidu est nul si { U, ] est la solution de (4. 5c) .
4,1,2 CONDITIONS DE CONVERGENCE DE LA SOLUTION
La mthode des lments finis fournit une solution approche qui
converge vers la solution exacte lorsque l'on diminue la taille des lments,
si l'approximat ion de u satisfait aux deux conditions suivantes :
Base polynomiale complte (voir paragraphes 1 ,3.2 et 1,7)
Pour que la solution approche tende vers la solution exacte lorsque la
taille h des lments tend vers zro. il faut que l'erreur d'approximation de
tous les termes de W
e
soit d'ordre h
n
avec n ~ 1, Nous avons vu au
paragraphe 1 ,7 que l'approximation de u doit utiliser au moins une base
polynomiale complte jusqu' l'ordre m pour assurer la convergence des
drives de u d'ordre m, Par exemple, pour un problme une dimension,
si :
W - 0 - - dx
. -f (iJ
2
u') (iJ'u')
V' ilx' ilx'
(4 .7a)
l'approximation u' doit utiliser la base polynomiale quadratique complte :
1, X, x' ou pour un lment isoparamtrique : 1, , ,' .
Continuit
A la condition locale prcdente, il faut ajouter une condition globale
concernant la continuit des approximations de u et de ses drives entre
les lments, de manire pouvoir crire:
w", LW',
204
Mthode des lments finis
La fonction approche u sur l'ensemble du domaine V doit satisfaire les
conditions de drivabilit de la forme intgrale W : u et toutes ses drives
jusqu' l'ordre m qui apparaissent dans W doivent tre bornes. Si u et
ses drives jusqu' l'ordre m - 1 sont continues sur les lments et sur les
frontires entre lments, la condition prcdente est satisfaite; dans ce
cas un lment est dit conforme, Par exemple pour la forme (4.7a), un
lment conforme assure la continuit de u et de ~ ~ en tout point de V.
Alors qu'il estfacile de satisfaire les conditions de continuit sur chaque
lment. il est parfois difficile de les satisfaire sur les frontires entre
lments, en particulier lorsqu'apparaissent dans W des drives d'ordre
suprieur un. Un lment est dit non conforme lorsqu'il ne satisfait
pas les conditions de continuit requises. Dans ce cas:
W=IW'+W' (4.7b)
,
O Wd est un terme d aux discontinuits entre lments, qUI n'apparat
pas dans les termes W
e
,
Pour que la convergence de la solution approche soit correcte, il faut
que W' soit nul, ou born et tende vers zro avec la taille des lments.
La technique du patch test permet de s'assurer que W' est nul.
4,1,3 PATCH TEST
Deux techniques de patch test sont proposes une mthode num-
rique [1 J et une mthode variationnelle [2J.
Mthode numrique
Nous avons montr au paragraphe prcdent que l'approximation de u
sur chaque lment doit utiliser une base polynomiale complte jusqu'
l'ordre m. Il faut vrifier que cette condition est galement satisfaite par
l'approximation de u sur l'ensemble du domaine V. Pour cela choisissons
un polynme Pm(x) d'ordre m qui soit la solution du problme particulier
suivant:
- le domaine est constitu de quelques lments et inclut au moins un
nud intrieur; par exemple:
4."" ___ -11'
j < : . . . ~ 2
Prsentation 'matricielle de la mthode des lments finis 205
u est impose aux nuds externes (nuds 1, 2, 3, 4 ci-dessus) et
prend en ces nuds les valeurs Uj = P m(Xi) o Xi sont les coordonnes
des nuds. -
Puisque Poo est solution du problme, W(P m) = 0, Montrons que le
terme de discontinuit W' = W - l W' est nul: pour cela il suffit de
,
vrifier que la solution du problme obtenue par lments finis est bien le
polynme Pm (x) ; en particulier la valeur de u aux nuds internes doit tre
u, = Pm(x,), soit dans l'exemple ci-dessus u, = Pm(x,),
Nous pouvons galement utiliser la matrice globale [K] et calculer les
rsidus aux nuds intrieurs (nud 5) correspondant la solution Pm(x);
ces rsidus doivent tre nuls,
EXEMPLE 4,2, Patch test numrique pour l'quation de Laplace,
Appliquons le test l'lment non conforme 3 nuds dcrit au
paragraphe 2,3,3,6, Utilisons le domaine suivant :
,
4
',01.,--+--."
0.6
,
1.0
Pour l'quation de Laplace, m = 1, La forme intgrale West donne
dans l'exemple 4,1, o fv = fs = a = 0, Choisissons
Pm (x, y) = a
o
+ a, x + a, y
avec par exemple
Imposons u comme conditions aux limites aux nuds externes 1, 2,
3, 4,
u, = Pm(O, 0,5) = 1,0
u, = 1,5
u, = 2,0
u
4
= 1,5,
206
Mthode des lments finis
La solution de ce problme par la mthode des lments finis
(voir suite du chapitre) fournit les valeurs de u aux nuds intrieurs:
u
5
' u
6
' u
7
u
ll
" Le patch test consiste vrifier que
Us 1 ,3 P m(0,3, 0,8)
u, 1 ,3 P m(O,3, 0,3)
u, 1 ,8 P
m
(O,8, 0,3)
u, 1,8 P
m
(0,8, 0,8) ,
Mthode variationnelle
Cette mthode consiste simplement vrifier au niveau des formes
intgrales de type Galerkine (3,43) que:
W(Pm) L W'(P,,) O. (4.88)
,
Par intgration par parties, celte expression est transforme en une somme
d'intgrales sur le contour de chaque lment :
L J ... 0,
, S
(4,8b)
L'expression de chaque intgrale J .. , se divise en deux parties:
S'
- La partie conforme telle que son intgrale sur chaque ct de l'l-
ment ne fasse intervenir que les variables nodales du ct considr,
- La partie non conforme telle que son intgrale sur chaque ct de
l'lment fasse intervenir des variables nodales qui n'appartiennent pas
au ct considr.
Au cours de l'assemblage, les parties conformes de (4,8b) s'annulent.
Pour vrifier que (4.8b) est satisfaite, il suffit de considrer seulement
la partie non conforme. Si nous dmontrons que
r (partie non conforme)
J S
pour chaque lment, la relation (4, 8b) est vrifie Quel Que soit le
maillage,
EXEMPLE 4,3. Patch test variationnel pour l'quation de Laplace.
La forme intgrale lmentaire de l'exemple 4,1 s'crit
(fs fv a 0)
f
(
(au) au + (au) au) dV.
v' ax ax ay ay
Prsentation matricielle de la mthode des lments finis 207
Intgrons par parties :
f.
(
OlU illU)
W' ~ - ou -, + ---;: dV +
V' ilx il
y
Remplaons u par le polynme P.dfini dans l'exemple 4.2. Puisque
iJ2P. iJ'P. 0 ap. _ 1 .
iJx
'
+ ay' ~ et an - .
W' ~ 1. bu IdS
o 1 est le cosinus directeur de la normale extrieure de l'lment .
Considrons un lment isol :
,
2
{
bu, }
ou < - 1 + 2 + 2" 1 - 2 1; 1 - 2 '1 > o u ~ ~ < N> ( ou. ) .
ou,
Calculons la valeur de W' sur le ct 1 par exemple ~ ~ 1 - )
1
1-21; Ihdl',
W' ~ < bu, > L
1 + 21;
o h est la longueur du ct 1
Le seul terme non nul de W' est celui qui fait intervenir bu! ; c'est
un terme conforme qui s'annule avec le terme correspondant de
l'lment voisin puisque ou, et h sont les mmes et 1 change de signe.
On peut montrer de la mme manire que celte proprit esl vrifie
208
Mthode des lments finis
sur les deux autres cts. Remarquons que pour ce triangle les termes
qui rendent u discontinue sur chaque ct ont leur intgrale nulle
sur le ct cOTfespondant :
f
N,/dS=O
h ~ q u e cte:
si le nud i n'est pas sur le c6t considr.
4.2 Formes intgrales lmentaires discrtises W"
4,2,1 EXPRESSION MATRICIELLE DE W'
Pour obtenir la forme discrtise (4.4) de W', introdu isons dans (4.3)
les approximations sur l'lment e de u, de bu et de leurs drives (cha-
pitres 1 et 2) :
Alors:
( u ) =
( o(u) } =
u = < N > (u, )
u N
x = < x > ( u, )
bu = < N > { bu, }
< (xu) aN
u = < x > { ou, } .
u < N>
au
ax
bu
aN
< ax > {u,} = [8J ( u, )
< N >
iJN
<->
iJx
{ bu, } = [8,J { bu, } ,
Pour les oprateurs r auto-adjoints :
( b(au) } = b({ Du }); [8,] = [8J,
(4,9a)
(4 , 9b)
Prsentation matricielle de la mthode des lments finis 209
L'quation (4.3) s'crit sous forme discrtise. en utilisant (4.9)
W'= < ou, > (t. [B,V [0] [B] dV {u,)- L {N} fv dV- Li {N} fs dS).
Soit. en comparant avec (4.4) :
(4.10a)
[k] = L [B,V [0] [B] dV
(4.10b)
( f) = f {N} fv d V + f {N} fs dS .
V Sf
(4.10c)
EXEMPLE 4.4. Expression discrtise de la forme W' de l'exemple 4.1
(quation de Poisson).
L'approximation de u sur l'lment s'crit
{au} =
{o(au)}=
au
ax
au
ay
u= < N > ( u, )
aN
< ax >
aN
<->
ay
{ u, } = [B] { u, }
aN
<->
ax
aN
<->
ay
{ ou, } = [B,] { ou, } = [B] { ou, } .
Remarquons que dans ce cas [B,] = [B] car le Laplacien est un
oprateur auto -adjoint :
[k] = f. [BV [0] [B] dV + f "{ N} < N> dS.
V S1
La matrice [k] est symtrique.
{f}=f {N}fvdV+f (N}fsdS.
V SI
Dans le cas d'une sollicitation concentre au point x = x, de la
surface, la fonction fs est une distribution de Dirac o(x,);
fs(x,) = f,o(x,)
le vecteur {f} correspondant s'crit:
{f} = {N(x,): fi'
210 Mthode des lments finis
4.2.2 CAS D'UN OPRATEUR [ NON LINAIRE
Pour les problmes linaires, [k] et (1) sont indpendants de u . Par
contre pour les problmes non linaires [k] dpend de u. mais peut tre
dcompose en la somme d'une matrice constante [kIl et d'une matrice
[k.,(u.)] qui est fonction de u. :
(4.11 )
EXEMPLE 4.5. Poutre en grands dplacements.
La forme intgrale correspondant une poutre rectiligne de
section rectangulaire h x b subissant de grands dplacements
transversaux est (petites dformations et rotations modres)
f
Eh3bf f
W' = Eh b OE . E dx + 12 OK. K dx - ow.l
v
dx
Y y.. Y
o:
, = u" + ; w ~ OE = O(u.,) + w"o(w,,)
K = - W OK = - O(W )
,XI( ,xx
Remarquons qu'ici W' est la premire variation de l'nergie
potentielle totale.
, ,-
v' ~ U
u, W sont les dplacements axiaux et transversaux d'un pain/de
la poutre,
E. h, b sont le module d'Young, la hauteur et l'paisseur de la poutre,
fv est la charge transversale par unit de longueur de poutre.
Prsentation matricielle de la mthode des lments finis 211
Exprimons w
e
sous forme matricielle en sparant les parties
linaires W ~ et non linaires W:/ :
o:
wt=f o(au) > [D,](u} - ow.fy)dx
y.
(au) = ~ x
{
u x. }
{ o(au) } = c5(";,x)
{
c5(u x) }
w,xx
[D,] =
Ehb
o
o
o
o
o
o
o
c5(w,xx)
E h
3
b
12
w,:; = f < o(ou) > [D,,] { au } dx
y.
1
2' w,x
o o
[D,,] = Eh b w,x
o
1
"2 W:x
o
o (matrice non symtrique) .
o
Utilisons deux approximations diffrentes pour u et w :
u = < N, > {u,}
w = < N
w
> { w, } .
D'o:
[
< N'X > 0] {U, }
{ au } = o < N W,x >
o < Nw,xx > w
n
= [Bl{ u, }
{ o(u) } = [B] { ou, } .
Les matrices lmentaires linaires et non linaires s'crivent
[k,] = L. [BF [D,] [B] dx
[k,,] = f [BF [D",] [B] dx (matrice non symtrique)
V
212
Mthode des lments finis
o [D,,] s'exprime en fonction de (w,) :
0
1
2:< Nw,x > ( w, )
0
[0",] = Eh b < Nw,x >
( w, )
1
2 Nw,x >
( w, ))' 0
0 0 0
La matrice [kl!ll est symtrique si nous utilisons une autre expression
de [D,,], en conservant la mme matrice [B]
0
1
0
2' w,x
[D,a = Eh b
1 1 1
'2 w,x 2 W;x + 2 u,x
0
0 0 0
4,2,3 FORME INTGRALE W' SUR L'LMENT DE RF-
RENCE
Dans les chapitres 1 et 2, nous avons construit des fonctions d'inter-
polation N ~ ) sur l'lment de rfrence, Les expressions (4,3) et (4,10)
de W" contiennent :
- des drives en x de u et bu;
- des variables nodales u, et bu, qui incluent, pour les lments
d'Hermite, des valeurs aux nuds de drives en x de u et bu;
- des intgrations sur l'lment rel V',
Il faut donc transformer les drivations en x en drivations en ~ , ainsi
que l'intgration sur V' en une intgration sur l'lment de rfrence V',
4,2,3,1 Transformation des drivations en x
Les drives u .. ,., U . 1" U ~ , U ,:w '" sont exprimes en fonction de u ~ ,
u,'I' u", u , ~ ~ , '" et des termes de l'inverse de la matrice jacobienne [11 = [J]-'
de la transformation gomtrique, conformment aux relations du para-
graphe 1 ,5, Par exemple une dimension :
u() = < N() > (u,)
du _ d du _ de dN(e) ( )
dx - dx de - dx < de > u, '
Prsentation matricielle de la mthode des lments finis 213
L' expression (4. 9b) de la matrice [BJ peut tre rorganise :
[BJ = [QJ [Bd
(4,12)
o : [QJ est une matrice de transformation contenant des termes de
[il = [Jr' ;
[B,J est une matrice semblable [BJ mais qui implique des drives
en 1', des fonctions N(I',) au lieu des drives en x des fonctions
N(x) .
EXEMPLE 4.6. Transformation de la matrice [BJ de la forme intgrale
de Poisson.
aN
ae
a'7
N
<- >
ax ax
<ae>
[BJ =
ax
= [QJ[Bd -
aN il!;
ilN
<->
iJy y
<- >
ay
a'i
Dans ce cas
[QJ = [iJ = [JJ -, ,
Alors:
[kJ = L [B,l' [Q)T (DJ (Q) [Bd d V ,
4,2,3,2 Transformation des variables nodales
Pour un lment d'Hermite les variables nodales (u, l, sur l'lment
de rfrence et {u, lx sur l'lment rel sont lies par:
{u,i, = [Tl{ u, lx
{ l, = (TJ { lx '
La matrice de transformation [TJ contient des termes de [JJ calculs aux
nuds (voir paragraphe 2,3.4.1),
4,2,3,3 Transformation du domaine d'intgration
L'intgrale de volume sur V est remplace par l'intgrale de volume
sur l'lment de rfrence V' (voir paragraphe 1 , 6 , 1 et (1 ,44)l :
f
,,, dv=f
y-
(4.13)
214
Mthode des lments finis
Les limites d'intgration en 1; pour les lments de rfrence classiques
sont :
Une dimension
Deux dimensions
Triangle
f
( O ' J"' -(
... det (J )
< "' 0 I! "'0
Quadrilatre
f
(' J'o,
( . _,
Trois dimensions
Ttradre f( ' f' '-'f"'-'-' ... det (J) dO;
( -0 '1 = 0 .. o
Hexadre
f
( O ' f" " J'.'
' 0_' , 0 _' , . _ ...
Prisme
J
', ' f' '-'f' ' ...
,,- 0 " - I
4.2 . 3 , 4 T,;"nsformation de l'lment diffrentiel dS des int-
grales de conto,ur
a) Intgrale curviligne deux ou trois dimensions
L' intgrale
1 = 1 .. . dS
s'crit en fonction d'une abscisse curviligne s sur la courbe S
f
"
1 = . .. J
s
ds ,
"
(4 , 14a)
L'abscisse s est en gnral l'une des variables , ou . La courbe S cor-
respond l'un des cts ou artes de l'lment de rfrence sur lequel
un point est dfini par le paramtre s
x = < N(s) > (x.) etc.
(4 , 14b)
Prsentation matricielle de la mthode des lments finis 215
EXEMPLE 4. 7. Intgrale de contour pour un lment quatre nuds.
Pour le ct 1; = 1 de l'lment quadrilatral prsent dans
l'exemple 1 .16 :
"1
,
4
,
<
1 2
S;;;; ds;;;;
< N(s) > = < N(I; = > = <0
2 2
1
x., = < N.,(I; = 1, > { x.} = :2 (x, - x
2
)
1
y., = 2 (y, - Y2)
J
s
= Jx7. + Y" = J(X,; x,)' + (y,; y,)'
1 = f' .. Jsd".
- ,
b) Intgrale de surface trois dimensions
L'intgrale
fs'" dS
0>
s'crit en fonction de coordonnes de surfaco s, et s, qui sont en gn-
rai ou (l;, (') ou (') :
f. ... JsdS,dS,. (4,15a)
La surface S est l'une des faces de l'lment de rfrence. Sur cette
face un point est repr par les deux paramtres s, et S2
x = < N(s"s,) > (x.} etc.
(4.15b)
216 Mthode des lments linis
EXEMPLE 4 . 8. Intgrale de contour pour un lment iJ huit nuds.
Sur la lace ( = 1 de l'lment hexadrique huit nuds prsent
au paragraphe 2.6 . 1
s,= s2=tl
ds, '" d{ ds, =
N(s"s,) = (= 1) =
1
=4 < 0000 (1 + ) (1 - Il)
(1 + ) (1 + Il) (1 - ) (1 + Il) >
1
N.{( , (= 1 ) = 4 < 0 ; 0 ; 0 ; 0 ; - (1 - q) ; (1 - q) ; (1 + q) ; - (1 + Il) >
q, (= 1 ) < 0; 0; 0; 0; - (1 ; - (1 H) ; (1 + ) ; (1 - ) >
< Y., > = < N.{ > [{ x. 1 ( Y. 1 ( z. )]
< x." Y." l" > = < N., > [{ x. 1 ( Y. 1 { z. l]
J
s
est donn par (4. 15b) et
1 = (' (' ... q) d dq.
J- 1 J-I
4.2.3.5 Expression de Ik] et : f: sur l ' lment de rfrence
Les expressions (4.1 Ob) et (4.1 Oc) de la matrice Ik] et du vecteur { I}
s'crivent, si l'on utilise une intgration sur l'lment de rfrence V' :
Ik] = L IB.a
T
IO.V IDIIOIIBd deI (J) dl; dll d(
(4.16a)
Prsentation matricielle de la mthode des lments finis 217
{fI = L 1
j
{N}f
s
J
s
ds,ds
2
(4.16b)
o : [0] et [B(] sont dfinis par (4.12);
[0,] et [B,,] sont analogues [0] et [B,] et n'en diffrent que pour
les oprateurs. non auto-adjoints;
J
s
est dfini par (4.14b) ou (4.15b).
Les intgrations de (4.16) sont en gnral faites numriquement en
utilisant les mthodes exposes au paragraphe 5.1 (voir en particulier
(5.4) et l'exemple 5.3).
4,2.4 QUELQUES FORMES CLASSIQUES DE W' ET DE
MATRICES LMENTAIRES
Les formes intgrales W
e
sont en gnral constitues d'une somme
de plusieurs termes; par exemple:
W' = f (0 (ou) . au + a (ou) ,ou) dV.
V' oX ox . ay ay
La figure 4.1 dcrit les termes le plus souvent rencontrs, et les matrices
[B] et [D] correspondantes.
La figure 4.2 prsente la forme explicite de la matrice lmentaire (4. 16a)
pour deux lments une dimension, et pour des formes classiques de W'.
4,3 Techniques de calcul des matrices lmentaires
4.3.1 CALCUL EXPLICITE POUR UN LMENT TRIANGU-
LAIRE (Equation de Poisson)
Appliquons les rsultats des paragraphes prcdents pour construire
les matrices lmentaires, dans un cas o les intgrations peuvent se
faire explicitement. Utilisons l'lment triangulaire 3 nuds du para-
graphe 2.3.2 pour valuer les matrices [k], [ml et le vecteur { f) formuls
dans les exemples 4.4 et 4.6.
,
,
,
v'
2
2
"Tl
"'
"
II)
"Tl
o
-
3
C!)
'"
" .,
'"
'"
.c
c;
C!)
'"
0-
C!)
Quadratiques symtriques
f bu.u dll
V'
f b ( au) - ou d V
V' ax ax
f b ("'u) - a' u dV
V' ax' ax'
f b (amu) . amu dV
8x'" ox'"
V'
Quadratiques non symtriques
bu . - dV f au
8x
i b - iru dV
V' ox x"
Non linaires
f fJ uu audV
V" ox
f b(au). au. au dV
V' ax ax ax
r. (amu) (, au ) a'u
.. . 0 ?,xm '0 u'?'x"" - ilx" dV
- --
{ N }
{ aON}
ax
m
{ N}
{a"N}
ax
m
{ N}
{ N}
{omN}
?'xm
. .
1 < N>
1
aN
<->
iJx
1
O'N
<- >
ax'
1
aMN
<->
ax
o
1
aN
<- >
ax
1
a"N
<->
ax"
aN
< GX > { u, }
<N>
< N> { u, }
aN
< - >
ax
aN aN
< ax > { u, }
< - >
ax
D{{ u, })
a'N
<- >
ilx"
, (
constante symtrique
constante symtrique
constante symtrique
constante symtrique
constante non symtrique
constante
non symtrique
si m #- n
fonction de { u, } symtrique
fonction de { u, ) non symtrique
fonction de { u, } symtrique
fonction de { u, }
non symtrique 1
sIm '# n
...,
co
""
'"
il-
"-
'"
:3
<:;
s:
;;;-
Termes de contour quadratiques
f 5u.u dS
{N} 1 <N>
S'
Termes de volume linaires (sol-
licitations de volume)
i 5u.f
y
dV
{N} 1 f y
y.
Termes de contour linaires (sol-
licitations de surface}
J 5u.fs dS
{N} 1
fs
s' ,
Termes non stationnaires
5u' -dV
f u
y. l
{ N} 1 <N>
.
5u' - dV
f 'u
y. r
{N} 1 <N>
- -------- -- --
Figure 4.1. (Suite).
constante symtrique
Remarques
W' = < 5u, > { f}
{ f} = L { N } f
y
dV
W' = < 5u, > { f}
{ f} = f {N} fs dS
S' ,
W' = < 5u, > [cl {d;,}
[cl = f (N) < N > dV
y.
W' = < 5u, > [ml { d ; ~ }
[ml = i {N} < N> dV
y.
,
~
'"
" 0;
-
c,
"
3
'" <::
".
".
'"
'"
g.
ii>
3
'"
S-
c
g.
~
'"
~
'"
"
;
'"
".
0; .
N
-
'"
220
Mthode des lments finis
Elment linaire 2 nuds (paragraphe 2.2.1)
J
"
bu. u dx =
"
< bu,
J
" ()
a.!!..' ...!!.. dx =
x x
~ I
/ [2
oU
l
> '6 1
1 [ 1
ou} > -1
1
2
J {uu,,} --
< Ju, > (m J ( u, )
-1J {u}.
1 u: ~ < Ju, > (kl ( u, ) .
l=x1 - x
l
Remarque : lm) el Ikl sont utilises pour dfinir les matrices masse et rigidit d'un
lment de barre une dimension.
Elment cubique 2 nuds de type Hermite (paragraphe 2.2.3.1)
f
"
Ju. u dx ~
"
156
/
= < ou,. > 420
22/
4 /'
54 -13/
13/ -31'
156 - 22 /
4 /'
( u, ) ~ < Ju, > (ml ( u, )
u
. -dx
x
1
~ < Ju, > 30/
Sym.
36 3/ -36 3 /
4/' -3/ -l'
36 - 3/
Sym. 4 /'
r J ( : ~ ) :; dx ~
12 6 / -12 6 /
4 /' -6/ 2 /'
12 -6/
Sym. 4/'
< {Ju" > = < ou, /)u., .y ou} lJU1.
x
>; < u
II
> = < u
i
u ..
l
u
2
Ul ,.\ >
1 = x
2
- XI .
Remarque: lm]. [k...J et [kIl sont utilises pour dfinir les matrices masse, rigidit
axiale et rigidit de flexion d' un lment de poutre une dimension. .
Figure 4.2. Formes explicites des matrices lmentaires pour deux
lments une dimension.
Prsentation matricielle de la mthode des lments finis 221
<N>=<1-t,-
l
l ~ >
[i] = _1_ [ y,-y, -(y,-y,)];
2A -(x,-x,) x,-x,
det (J) = 2A = (x, - x,) (y, - y,) - (x, - x,) (y, - y,) (4.17a)
[
-1
[B,J= -1
1
o
[BJ=[jJ [B,J=_1_ [y,-y,
2A x,-x,
(4.17b)
o d est le coefficient de conductivit isotrope qUI est gal 1 pour
l'quation de Laplace.
f
' f'-' [kJ = 0 0 d [Bl' [BJ det (J) d ~ dt, .
La matrice [BJ tant constante : [kJ = A ,d, [Bl' [BJ =
d
[kJ = 4 A
(y,-y,)': (y.1- y,) (y, - y.1): (y, - y,) (y.1- y,)
, ' ,
+ (X.1 - x,) :+ (X.1 - x,) (x, - X.1):+ (x, - x,) (x, - x,)
--------------r---------------------l-------------------
: (y,-y,)' : (y,-y,) (y,-y,)
: +(x,-x,)' :+(x,-x,) (x,-x,)
~ ~
: (y,-y,)'
Symtrique ,
+(x,-x,)
(4,18)
Dans le cas o l'lment rel est homothtique de l'lment de rf-
rence :
XI = Yl = 0; Xl = a; Y2 = 0; x
3
= 0; Y3 = a
[kJ = g [ 2
Sym,
-1
1
-1]
o ,
1
(4.19)
222 Mthode des lments linis
La matrice masse s'crit (4.6b)
(m]
= L C' (N}
< N > det (J) dl, d (4.200)
(m]
lsy
2
m.
1
2 (4.20b)
Le vecteur { I } s'crit (4.16b), SI Iv est constant et fs est nul
{ f }
(4.21 )
La figure 4.3 donne la liste d'un sous-programme de calcul de (k] et ( f}
qui sera utilis par le programme B B MEF prsent au paragraphe 6.2.2.
c
c
c
c
c
SU6ROUTIN& CLEHOO(VCORE , VPR&&,VKE , VrC,NDIN . NNEL , HDL&)
MATRI CE ET VECTEUR POUR UN
TRIfINCL.E A 3 NOEUDS . EOUATJON DE POISSON ISOTROPE
('t'PREEel) _ DI .. DY D)
CLOO
CLOO
&LOO
&LOO
CLOO
ELOO
IKPI..I CIT REAL8(A-H . O- Z) ELOO
DIHENS IOH YCORE(NO'H,HNEL) ,VPREE( 2).VKE( HOLE , HOLE),VPC(NDLE) CLOO
- _ .. _.. HATRI CE ELEMENTAIRE &1.00
K3Z_VeORE(l,J)_YCQRE(I,Z) CLOO
X13 .. VCORE(l, 1) -VCORt( 1,3) &LOO
xal_VeORE(l ,2)veORE(1 ,1) ELOO
Y23.VCORE(2,Z)-YCORE(2,3) &LOO
Y31 .. vCORE(2,J)YCORt(2,1) CLOO
Yla .. YCoRE(3,1)YCORE(2,2) EI.OO
CU- XU"J3I -X I3"Yl2 CLOO
C_YP.&&(I) /(C2'''3 . 000) &LOO
VkE{1,1)_(T23Y23+X3Z_XJ3)C ELOO
VkE(2,Z)_(Y31_Y31+X13X13)C
VkE(3.3)_(YIZY12+XZ1_X21)C EL09
VKE(1.Z)_(YZ3Y31+x3z_XIJ)C
VkE (1.3) _(YIZYZ3.X31XJ2)C CloOO
VkE(3,3)_(Y31n:hX13X21)C noo
VKC(2.1)_VKE(1 . 2) ELOO
VKE(3.1)_VkE(l,3} CLOO
Vkf:(3 . 2}_'IXE(1l.3) f:t. OO
C VECTEUR El.EHENTAIRE EI.OO
C-VPREE( a,caA/8. Cl.OO
VfE(l)_C Cl.OO
VfC(Z ) _C Cl.OO
VPE(3)_C Cl.OO
RCTURH El.OO
END EI.OO
z
,
5
,
,
,.
Il
12
IJ
..
IS
16
"
18
JO
" 21
"
"
,.
Z6
"
" a.
" ,.
JI
"
" J4
,.
Figure 4,3. Liste du sous-programme ELEMOO utilis dans le pro-
gramme BBMEF du paragraphe 6.2.2.
-
Prsentation matricielle de 1. mthode des lments finis 223
4.3.2 ORGANISATION DU CALCUL DES MATRICES L-
MENTAIRES PAR INTGRATION NUMRIQUE
Pour la majorit des lments. il faut avoir recours !"intgration num-
rique, qui sera prsente en dtail au paragraphe 5.1, pour calculer les
matrices et vecteurs lmentaires. Les tapes de calcul correspondantes
sont les suivantes :
a) Oprations communes tous les lments de mme type (ayant
le mme lment de rfrence) :
calcul des coordonnes , et des poids w, correspondant aux points
d'intgration;
calcul des fonctions N, N et de leurs drives en 1; aux points d'in
tgration (pour les lments isoparamtriques N '= N).
b) Oprations ncessaires pour calculer la matrice [k) de chaque l-
ment (4. 16a) :
initialiser [k) zro;
pour chaque point d'intgration , :
calculer la matrice jacobienne [J) partir des drives en 1;
des fonctions N et des coordonnes des nuds de l'lment
(1.43), ainsi que son inverse et son dterminant (voir (1.39)
(1.41));
calculer les drives des fonctions N en x partir des drives
en 1; (1 .37b);
construire les matrices [B) et [D);
accumuler dans [k) le produit: [BI' [D) [B) det (J) w,.
c) Oprations ncessaires pour calculer la matrice masse [m) (4. 6b)
initialiser [m) zro;
pour chaque point d'intgration , :
calculer la matrice jacobienne et son dterminant;
accumuler dans [m) le produit: (N) < N > det (J) w,.
d) Oprations ncessaires pour calculer le vecteur sollicitations { fI
correspondant fv constant (4. 16b)
initialiser {f 1 zro;
pour chaque point d'intgration ,
calculer la matrice jacobienne et son dterminant;
accumuler dans {f} le produit: {N 1 fv det (J) w,.
224
Mthode des lments tinis
e) Oprations ncessaires pour calculer le rsidu {,} partir de
la solution {u,} (4 . 6c) :
initialiser le rsidu { ,} { t) calcul dans (d);
pour chaque point d'intgration , ;
construire les matrices [BJ, [DJ, [JJ comme dans la sous-section (b)
ci-dessus;
accumuler dans {r} le produit: - [B)" [DJ [BJ {u. 1 W, det (J).
t) Oprations ncessaires pour calculer les gradients {ou) aux points
d'intgration partir de la solution {u.) (4. 9b) ;
pour chaque point d'intgration , :
construire la matrice [BJ comme dans la sous-section (b) ci-
dessus;
calculer et imprimer le gradient : {ou) = [BJ { u. ).
4.3.3 SOUS-PROGRAMMES DE CALCUL DES
MATRICES
Le programme gnral MEF, dcrit au chapitre 6, peut inclure une
bibliothque d'lments une, deux et trois dimensions et concernant
des domaines d'application varis : mcanique des fluides, problmes
harmoniques, mcanique des solides. Pour chaque type d'lment 'nn' ,
un seul sous-programme ELEMnn contrOle les calculs de toutes les
matrices et vecteurs lmentaires du paragraphe 4.3.2. La variable de
contrOle ICODE spcifie quelle opration lmentaire est requise; par
exemple:
ICODE = 1 initialisation des paramtres caractristiques de ce type
d'lment (nombre de nuds, de degrs de libert) .
ICODE = 2 excution des oprations lies un lment de rfrence
donn et indpendantes de la gomtrie relle ; calcul des
fonctions d'interpolation N et de leurs drives en aux
points d'intgration (voir paragraphes 1.6.1 et 5.1).
ICODE = 3 calcul de la matrice [kJ, dite matrice rigidit, dans la table
VKE.
ICODE = 4 calcul de la matrice [k,J pour les problmes non-linaires,
dite matrice tangente, dans la table VKE (voir paragraphe 5.3).
1 CO D E = ' 5 calcul da la matrice massa [mJ pour les problmes non-
stationnaires dans la table VKE.
ICODE = 6 calcul du vecteur rsidu { r ) dans la table VFE.
ICODE = 7 calcul du vecteur des sollicitations {t) dans la table VFE.
ICODE = 8 calcul et impression des gradients { ou ).
Prsentation matricielle de la mthode des lments finis 225
Soulignons que le sous-programme ELEMnn n'excute qu'une opration
la fois, dfinie par la valeur de ICODE, Par exemple pour construire la
matrice [k] et la matrice [ml il faut enchaner les oprations suivantes
Calcul de [k]
ICODE = 3
CALL ELEMnn (", ... , VKE)
sauvegarder VKE dans une table autre que VKE
Calcul de [ml
ICODE = 5
CALL ELEMnn (""", VKE)
sauvegarder VKE dans une autre table ,
4,3,4 SOUS-PROGRAMME ELEM01 (problmes quasi harmo-
niques)
La figure 4.4 donne la liste des sous-programmes ELEMOl et NIOl
qui calculent les matrices lmentaires d'un lment quadratique iso-
paramtrique pour les problmes quasi harmoniques rgis par l'quation:
a ( ou) a (ou) a ( au)
iJx d, ax + ay d, ay + ilz d, az + fv = 0 .
(4.22)
La forme intgrale correspondante est semblable celle de l'exemple 4.4,
avec
d, 0 0
au
ax
D = 0
d,
0 et ( au )
au
-
ay
0 0 d,
au
az
Ces sous-programmes, selon le nombre d. dimensions du problme
(variable NDIM), correspondent trois lments diffrents ayant tous
un degr de libert par noeud :
Nombre
Nombre
Elment dcrit
NDIM
de noeuds
de degrs
au paragraphe
de libert
1
3 3
2,2.2.1 (rectiligne)
2 8
8 2,4.3.2 (quadrilatral)
3 20 20 2.6.2.2 (hexadrique)
226
Mthode des lments finis
Sous-programmes utiliss par ELEM01 et NI01
Nom Appel par:
Liste sur
Fonction
la figure
GAUSS ELEM01 5.1 coordonnes et poids des points
de Gauss
JACOB ELEM01 1 .9 calcul de [J]. [/] et det (J)
DNIDX ELEM01 1.10 calcul de < N.
x
>
PNINV NID1 1 .6
calcul de [P,]-t
NI
NID1 1 .6 calcul de < N > et < N , >
.,
BASEP NI, PNINV 1 .6 calcul d'une base polynomiale
< P>
INVERS PNINV 1 . 6 inversion d'une matrice pleine
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
SUBROUTIHE ELEH01(YCORE,VPRHE,VPREE,YDLE,YKC,VrE)
CLEHEHf QUADRATIQUE POUR LES PR08LEHES HARHONIOUES ANISOTROPES
A l,a ou 3 DIMENSIONS:
1 DIMeNSION : ELEMENT A 3 NOEUDS
Z DIHENSIONS : ELEMENT ISOPAUt/ETRIOUE A 8 NOEUDS
3 DIMENS I ONS : ELEHENT ISQ.P,ulHETRJOUE A aD NoeUDS
NOKBRE DE POINTS O'INTECRATION : il DANS CHAQUE DIRECTION
NOMBRE DE DEGRES DE LI8ERTE EN CHAQUE NOEUD : 1
HATRICE OU VECTEUR ELEMENTAIRE CONSTRUIT PAR CE SOUS-PROCRAMME
ELOI
EL.O 1
ELOI
ELOI
1:1.01
EI,OI
ELOI
ELOI
ELOI
SELON LA VALEUil DE leODE : ELOI
leODE . EO.I RETOUR DES PAIlAHETRES ELOI
ICOOE.EO . a CALCUL DES foNCTIONS O'INTEIIPOL"'TION ET DES ELOI
COEffICIENTS D'INTECRATION NUHERIOUE
HATRICE ELEHENTAIRE (Vk&)
HATRleE TANCENTE (VKE) .. . . PAS ECRIT ....
HATRICE HASSE (VKE)
PRODU IT !( . U ('IfE)
ELOI
ELOI
ELOI
ICODE.ED . 3
ICODE .ED .
ICOOE .Eo . e
ICODE . EO.S
lCODE . EO . 7 SOLLICITATION ELEMENTAIRE (VfE) . ... I' ... S ECRIT . . .. ELOI
leODE . Eo . a IMPRESSION DES CIlADIENT'S
PROPRIETES ELENENTAIRES
VPREE(') COEffiCIENT DX
VPREE(3) COEffICIENT DY
VPREE(3 ) COEffiCIENT OZ
VPREE(4) C ... P ... CITE SPEClrlQUE DE CHALEUR C
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
,
3
,
,
,
10
Il
IZ
13
14
15
l'
l ,
lB
l'
..
"
" 23
..
"
IHPLICIT REAL-e(AN,OZ) ELOI 27
COHHON/COOR/HOIH &LOI 28
COHHON/RCDT/IEL.ITPE,I1PEI,IGRE,IDLE,ICE,IPRHE.IPREE,INEL,IDEC,IPCELOl 29
l ,ICODE,lDLEO,INELO. IPGO ELOI 30
COHHON /ES/H,HR,I{P ELO I 31
DIH&NSION VCORE(I) . VPRNE(I),YPREE(l),VOLE(1).YKE{l),Vr&(l ) ELOI 33
C....... DIMENSIONS CARACTERISTIQUES DE L'ELEHENT ELOI 33
C (ULULES J"'SQU ' A 3 DIMENSIONS) ELOI 34
C DIMENSION ELOI 38
Figure 4.4. Sous-programmes ELEM01 et NI01 pour le calcul des
matrices lmentaires des problmes quasi h-armoniques,
utiliss par le programme M EF du chapitre 6.
Prsentation matricielle de la mthode des lments finis 227
DJKENSION vePG ( 9 ), VKPC( Z7 ),XVZ ( 3)
C DIMeNSION '1J (NDII( NOIH),VJl(NDIHaHDIH )
OIH CHSION YJ ( 9),VJl( 9)
C DIMENS ION VHIX( INCLeHOIH ) , VNI I+HDI H) .INEl. 'PC),lrCKCD(NDIH)
DIM&NS I ON '1NIX( 60),VIlI ( aIIOl, TrCUD( 3)
C NOMBRE DE P . C. DE SENS KSI , ETA , DlEU
DATA IrCKED!.:!,3,3 1
c .. " ...
c
DATA Z&RO/0.DO/ ,EP6/1,O.I/
IKE.ioLC-(IOLEtl)/Z
c CHOIX DE LA FONCTION fi EXECUTER
c
CO TO (IOO,300,300.400 , 500,600,100,800) ,ICOO&
c
c RETOUR DES PARAMeTRES DE L'CLEHeNT DANS LE COMHOII 'ReDT'
C
100 CO TO (110,120,130).IIOIH
110 IOLEO .. 3
INC\.0 .. 3
IPCO .. 3
RETURH
120 I OLEO .. 8
INCLO.a
lPePd
RCTURH
130 lOLEO"iD
c
1 NCLO_ZO
I PCQ .. 37
RtTURH
C- CALCUL DES COORDONNEES ET po t oS DES P.C
C DES rONCTI ONS N ET DE LEURS DERIVEES
C
200 CALL CAUSS(IPGKED,NDIK,VKPG,VCPG,JPG)
CALL NJOI(VKPG,VNI )
RET UItN
c
C CIILCUL DE LA MATRICE RI GIDITe eLEMENTAIRE
c
C INITIAL I SER vICe
300 DO 310 1 _1, IKE
310 VICC ( t)_ZERO
C . BOUCLE SUR LES POINTS D'INTEGRATION
INI _ 1+ INEL
DO 330 le_I , IPe
C CALCUL DU JAC08IEN.DE SON INVERse ET DE SON DETtRMINANT
CIILL JAC08( VN I (IMI ) , YCORE, MOlK, I NEl., VJ ,VU , OETJ)
Ir ( DETJ.LT.EPS ) VRlfC ( HP,2000) JEL , IC,DETJ
1'.000 PORMAT(' --- ELEN '.15,' P,C. '.13,' OE1(1)_',E13 . 8)
C CALCUL 0& OETJ-POIOS
COEP_YCPG(IG)O&TJ
C .... .. CUCUL DES rONCTlONS D(NI)/D(X)
CALL DNI DX( VNI ( INl ), V JJ , NDIM. INEL , VN IX)
C. ACCUMULER LES TCIIMES DE l.A MATRICE ELEMEHTAlRf:
u_o
DO 320 J .. l, IOLE
DO 3ao l_l,J
Il_1
Ia-J
C_ZERO
DO 315 IJ_l,NDIH
C- C+VNIX(Jl)YNIX(I2)YPREE(IJ )
II-II+IDLE
318 12_12+JDLE
Figure 4.4. (Suite).
Et.O I 36
1::1.01 37
ELO I JO
r.1,O 1
" ELO I ..
ELOI
.,
ELOI ..
EI.O 1 43
I::l.OI ..
&l.01 46
ELOI ..
ELOI 41
&LO I
ELOI ..
ELOI 50
&LOI 51
r.LOI 62
ELO I .3
&LOI ..
ELOI 68
ELOI 56
ELOI
" ELOI
,.
ELO I
" ELOI 60
EI.01 51
&LOI
" CLOI 63
&1.01
"
ELO I ..
CLOI ..
ELOI 61
ELOI 68
ELOI
" ELOI 10
ELOI 11
CLOI
" r.LOI 13
CLOl H
ELOI
" ELOI
" ELOI 11
CLOI
" CLOI 79
CLOI
"
ELO I
.,
CLOl
.,
ELOI .3
CLOI ..
ELO I
"
&1,01 86
ELOI 87
CLOI
CLOI
" ELO I 90
&t.OI
.,
ELOI
" ELOI 93
ELOI
"
ELOI
"
ELOI
"
CLOI 97
tLOl
"
&LOI
" ELOI lOO
228
Mthode des lments finis
flC-JI( .. \
330 VKt(IK).VKE(IX)+C COEf
c- --- P. C.
330 IHI_JHI+(NDIH+l)INEt
RETUR"
c
C CUCUl. DE LA HATRICt TANGENTE ELEMENTAIRE
c
400 CONTINUE
RETUItH
c
C HATRICE; HASSE
C
600 DO 610 1.\, IKt
810 VK&(I)_Z&IIO
rf(VPREE(4) .EO.ZERO)RETUltH
INI .. O
DO 830 Je .. l, IPC
c CALCUL DE LA HATRICE JACOBIENNE
ll_INI+JNEL.l
CALL JACOB(VN' (Il). veORE, NDIN. INEL. VJ VJ l ,OCT J)
C- CU.CUL DU POIDS
COEP_VCPO(IC)DETJ+VPItEE(4)
C . T&RNES DE LA MAt'RICE HASSE
11(.0
DO BaD ).1, IOLE
00830 J_l , J
IK. 11(. 1
Il .. IHf.1
1a_IHI,,'
8ao VKE(IK}.VKE(IK)+YNI(II)+VNI(lt)COEF
830 INI_IHI+(MDUhl )INEI.
RETUltK
c
C CAI.CUL DU RESIDU ELEMENTAIRE
c
600 DO 606 1.0\ ,INEI.
806 VP&(I)_ZERO
IHI .. l.IHEL
DO 840 lC_I, IPG
C. , C,\L.CUL. Dt L.,\ HATRICE JACOBIENNE ET DES DERIVEES
CALL. JAC08(VNI(IHI),VCORE,NDIH,INEL.,VJ,VJ1,DETJ)
CAL.I" DNIDX(VNI( IHI), VJJ ,NDIH, INCL., VNIX)
C . . . CAL.CUL. DU COEffiCIENT COHMUN
cocr.VCPC(IC)DtTJ
C , PRODUIT VPRtC8VDL.E
11.0
DO 830 l_I,NDIH
c_zeRO
DO 810 J_I, INCl..
Il_rh!
810 C_C+VNIX(II)+YDl"t(J)
820 YJ(J).ccocrVPFtCC(I)
c. .. PRODuIT (8T)VJ
DO 830 I_I . IN&L
11_111'1&1..
DO 830 J .. l,NDIIi
1I_I1.1NEt.
830 VfC(I)_VPE(I)+VNIX(II).VJ(J)
840 INI.INl+(NOIN+I).JHEL.
RtTURN
C
C .. C,\LCUL DE PC
C
700 CONTI NU E
Figure 4.4 (Suite).
ELO I 10 1
ELOI 10.
ELOI 103
ELOI 10.
ELOI 10.
EL.OI 106
ELOI 107
ELOI 10.
ELOI
10'
ELOI 110
El.OI 111
ELOI 112
ELOI 113
ELOI Il.
ELOI
'" ELOI 116
ELOI 117
&L.Ol 118
ELOI
1"
&L.OI 12.
ELOI
1"
EL.Ol
1"
&1.01
'" EI..OI
".
EL.OI
'" &1.01
'" CLOI 137
ELOI
, ..
ELOI
".
ELOI 130
- ELOI 131
ELOI 132
ELOI 133
ELOI
, "
ELOI
'36
ELOI 136
ELOI 137
EI.OI 136
&1..01 13.
EI.Ol 14.
DE 1'1 EN X,l,l EI.OI
14'
&LOI 142
ELOI
1"
&LOI 14<
ELOI 14.
&LOI 14.
ELOI
1"
CLOI 14.
CL.OI
14'
ELOI
"0
EL.OI
'61
CI.OI 163
CI..Ol
"3
CLOI
".
CLOI
".
ELOI 168
ELOI
"7
ELOI
1"
ELOI
1"
ELOI
"0
CLOI 181
ELOI
'"
ELOI 163-
ELOI
".
&LOI
'66
Prsentation matricielle de la mthode des lments finis 229
RETURN
e
C CHeUL ET IMPRESSION DES GRADIENTS AUX P.C.
e
800 VRITE(HP.2010) IEL
ZOIO fORMAT(/!' GRADIENTS DANS L ELEHENT :',14/0
IHIO .. 1
INI.'}+INEL
DO 830 IG_1, IPG
CALL JAC08(VNI(INI),VCORE,NDIH,INEL,VJ,YJ1,DETJ)
CUL DNIOX(VNI (JIU) ,VJl NDIH, INEL, VNIX)
c CALCUL DES COORDONNEES DU P.C.
00 803 1 .. 1, NDIH
803 XYZ(I)_ZERO
IG_l
JO.IIHO
DO 807 IN_I,INEL
C .. VNI(IO)
00 808 1 .. 1, NDIH
XYZ(I)_XYZ(I)+CVCORE(IC)
806 lC .. IC+l
801 IO.dO+l
C CALCUL DU GRADIENT
Il_O
DO 820 I .. I,NDIH
C .. ZERO
DO BIO J_l,IDLE
I1_I1+1
810 C_C+YNIX(II)YDLE(J)
820 YJ(I).CYPREE(J)
C IHPRESSION DES GRADIENTS
VRITE(HP,2020) IG,(XYZ(I),I_l,NOIH)
2020 FORHAT(tIX,'P,G, ;',13,' COORDONNEES ;',3E12.6)
VRITE(HP,2026)(YJ(I),I_I,NDIH)
2025 FORHAT(l6X, 'GRADIENTS ;' ,3E12,5)
t N 1 0_1 N 1 0+ J OECL
830 INI_INI+IOECL
VRITE(HP,2030)
2030 FORHATe//)
RETURN
EHO
SUBROUTINE NJOl(VKPG,YNI)
e CALCUL DES FONCTIONS D'INTERPOLATION N ET DE LEURS DERIVEES
e D(N)/D(KSI) D(N)/D(ETA) PAR LA HETHODE GENERALE DE PN INVERSE
e POUR DES ELEHENTS OUADRATIOUES ... 1 2 OU 3 DIHENSIONS
e ENTREES
e VKPG COORDONNEES EN LESOUELLES CALCULER
"
e !PC NOHBRE OE POINTS
e INEL NOHBRE OE FONCTIONS N (DE NOEUDS) INEL. LE .llO
e NDIH NOHBRE OE DIHENSIONS NDIH. LE. 3
e SORTIES
e
vu,
FONCTIONS N ET DERIVEES
ELOI
ELOI
ELOI
ELOI
ELOt
ELOI
El.O 1
ELOI
ELOI
ELOI
ELOI
ELOI
EI.OI
ELOI
ELOI
ELOI
ELOI
EI.01
El.Ol
ELO)
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
&1.01
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
NI Dl
NIOI
NIOI
NIOI
NIOI
NIOI
NJOI
NIOI
NIOI
NIOI
NIOI
166
161
168
169
170
171
17'
173
174
175
176
111
178
178
180
181
182
183
184
18'
1"
181
18'
".
190
191
'"
193
1"
'" 196
191
19.
199
"0
'01
,Da
'03
'" aD,
".
'"
3
4
,
6
1
9
10
Il
12
IHPLICIT REAL.S( .... H,OZ) NIOI 14
COHHON/COOR/NDIH NI Dl lB
COHHON/RGDT / IEL, ITPE, ITPEI , IGRE, IOLE, ICE, IPRNE, IPREE, INEL, IDEG, IPGNIOI 1 Il
COMHON/TRVL/VKSI,YPN,YP,KEXP,KDER,KI NI 01 11
DIHENSION VKPG(l),VNI(I) NI Dl 18
DIMENSION YKSII(3),KEXPI(3),YKSI2(16),KEXPZ(16),VKSI3(1I0), NIOI 19
1 XEXP3(60) NIOI 20
C NIOI 31
C .... ,.. INFORH ... TlONS DEFINISSANT LES 3 ELEHENTS DE REFERENCE NIOI 22
Figure 4.4 (Suite).
230
c
c
c
c
c
C
C ...
Mthode des lments fi nis
(I NEL . LE . ZO NOI N. LE. J)
DIMeNSION VKS I ( NDIH-INEL),KEXP( NDIH+I NC L) , KDCR(NDIH)
DINCNS I ON nSI ( 60 ,.KUr ( 60) ,KOtl( 3)
DIMENSION \lPH ( I NCL+INCL) , VP ( INCL)
DIMENSI ON '1PH ( 400), VP( 20)
DIMe NSI ON KI ( INEL)
QUI CHS I ON ICI ( 2 0)
CARACTERIST IOUES DES ELEMENTS DE REf ERE NCE A 1. 3,3 DIN .
on" VIC 5 11/ - I . 00,0 . 00, I .DO/ ,KEXPI /O , l, 2/
DATA VIC8 12/1.00,I.OO, . 0. 00 ,- 1 . 00, +1.00,-1 .00, +1 . 0 0, . 0.00 .
1 +1 .00, +1.00, +0.00,+1 . 00. - 1 . 00, . 1 . 00. 1 . 00, . 0.00 /
DAU. KCXP2/D , O. l,D , 0, 1 , 2, 0 , 1 , 1. 0 ,2 , 2, 1, l,a/ .IDECR/BI
DATA IIK8 J3/- 1 .DO, 1.00, 1 . 00, +0 .00, 1 . 0 0,- 1 .00,
2
3
,
,
7
,
,
3
+1 .00, . 1 . 00, 1.00, +1.00, +0. 00, - 1 . 00,
+1 . 00, +1 . 00 , 1.00, +0.00.+1 . 00, - 1 . 00 ,
.1 . 00, +1 . 00,,1.00, .}.00.+0.00, 1 . 00,
.1 . 0 0,- 1 . 00,+0.00, +1.00,-1.00 ,+ 0. 0 0 ,
tl . OO,+I , OO,+O.oo, .1.00,.1 . 0 0 ,.0. 00,
. 1 . DO. 1 , 00,.1 . DO, tO. DO , . } . 00, .1 . 00,
+1 .OO, I. OO,tl . OO, tl . OO,. O. OO, .I ,OO,
+1 .00, +1 . 00, +1 . 0 0 0.00 ,.1 .00,. 1 .00 ,
1 .00, tl . OO, +1 . 0 0, 1 .00, . 0.00 , .1.001
DATA l' CXP310,0 , 0, 1,0,0,0, 1,0 ,0,0,1, l, l ,l,
1 ,1, 0 ,0, 1,1, 1 .0, 1 , a,o,o, o,z.o, O,O,Z,
a,I,O, 2.0,1 , lI,I, I , 1,2,0, O,Z ,I , 1,a, 1,
1,0. a , D,l ,li, l ,l,al
10&0-IOCell:
C.'' ,. LES TABLES VI'SI CT kEXP SELON NDIM
l1 .. NOIMJNEL
00 8 '-),11
CO TO (1 , lI , 3) , NOIII
YI'SI ( t ) . VI'S II ( I )
l'E XP(t) . I'CXP l (l)
CO TO 8
2 nSI(I) .. VI'SI2(I)
kEXP{ I ) .. KEXP2( 1 )
co TO S
3 VkS I (I).VKS I 3(1)
KEXP( J ) . K&XP3( 1)
5 CONTI NUE
c-,, DE LA HATRI CE PN INVERSE
CAI,L PNI NY (YKS I,KEXP, VP,KI,VPN)
C CALCUL DE N,D( Nl/ O( KSI),D(N)/D(ErA) AUX P.O.
tI-]
12- 1
DO 10 IC_I , I PC
l'OER( 1 ).0
KDER(Z ) . O
1'0&11:(3) . 0
CALL HI ( YKPC( II ),KEXP , I' OER. VP , VPN , YNJ ( Ia
U _U .INEL-
kOCII:(l ) _1
CALL- HI ( VkPC( II ) , kEXP,kOER, VP, VPH, VNI ( l lI
Ill .. 12.1 NEt.
IF( NOIK . tO. I ) CO TO 10
KOUO ).0
KOER(Z) .I
CALL NI(VKPC( 111,KEXP , KOER , VP , VPN,V NI( l a
IlI_Ia . fNEL .
IF ( NO' II . EO , lI ) CO TO 10
KOER( Z) _O
KOER(3) _1
Figure 4.4. (Suit e) .
NIOI
" NI 0 1 ..
NI 0 1
" HI OI
" NJOI
" NlOl
" HI OI
"
NI OI 30
NI OI 31
NlO I
" NI OI 33
NIOI ..
NI OI 35
NI OI 36
14101 37
14101
"
NIOI 39
NIOI
;0
NIOI U
141 0 1
.,
NIO I ..
NI 0 1 ..
IUOI ..
NIOI ..
NI Dl
.,
NJ OI ..
NIO I ..
NI OI
" NIOI
"
NIOI
,.
NI OI
" NI OI 54
NI OI
" NI OI
" tU Ol
"
NI OI
"
NI OI
" NI OI
" NI OI
'1
NI OI 62
NI OI
" NIOI ..
NI OI
" NIOI
" NI Dl
"
NI OI
" NIOI 69
NI OI 70
NI OI 71
NIOI
" NI OI 73
NIOI
,.
MI OI
" NI 0 1
" NI OI 77
NIOI 7.
N 10 1 79
NI OI
,.
NIO I
'1
NI OI
" NI01
" NI OI ..
NI OI
" NI OI
"
10
Prsentation matricielle de la mthode des lments linis 231
CALI.. MI (VKPC( Il ) ,Kt)!P ,10ER. VP, VPN , VHl( 12 ) 1
12_IZ .. IMEL
Il,,Jl .. NOIH.
RETURH
END
Figure 4.4. (Suite).
MIDI 81
NIOI 88
MIDI 89
NJOI 90
NI 01 91
4.3.5 SOUS-PROGRAMME ELEM02 (lasticit plane)
La forme intgrale correspondant l'lasticit linaire deux dimensions
s'crit [3] :
W' = f < Dt> [0] (E 1 dV - f < bu > {'v.} dV -
Jy. y_ (J' y
O : < u > = < uv >
< bU > = < ou by >
< e > = < 8
x
C,. Yx, >
-f < ou> { ~ s x } dS (4.23a)
Sj Sy
sont les dplacements d'un point
sont les variations des dplacements
au av au av 1 df . . f' . ' 1
_ < ox; ay; ay + ox> sont es ormatlOns tn 100t sima es
f
vp
f
v
)' sont les forces par unit de volume
dans les directions x et y
'
sx
' Isy sont les forces de surfaces appliques
[
d,
[0] = ~
d,
d,
o
( (J 1 = [0] ( E 1
sur SI par unit de surface
est la matrice Qui relie les contraintes
et les dformations ;
d _ E(1 - av)
'-(1+v)(1 v av)
vd,
d, = (1 av)
E
d, = 2(1 + v)
E est le module d'Young
v est le coefficient de Poisson
a gale 0 en contraintes planes
gale 1 en dformations planes
sont les contraintes
232 Mthode des lments finis
Utilisons l'lment 8 nuds du paragraphe 2.4.3.2 pour l'approxi-
mation de u et v (deux degrs de libert par nud) :
,
7
,
8 nO.ud
'.
'
( u 1 = { = [N) ( u. 1
( ou 1 = = [Nl( ou. 1
[N) = [N,ON, 0
o N,ON,
N
s
0 ]
o N
s
o N, ... N. 'sont les fonctions du paragraphe 2,4.3.2
< un > = < u. VI U
2
v
2
< ou" > = < OUI oV
I
bu] OV
2
W' = < ou. > [k) ( u. ) - < bu, > ( ')
[k] = f. f, [B}' [0 ] [B] det (J) d
(16x16)
o
[ NI.,
0
N
2
,J{
0
N"
[Bl = 0
N, 0
N",
0
(3x16) N",
'.
NI,x N2 .'J N
2
.
x
Na,y Na,)!
Le vecteur ( f ) s'crit en ngligeant l'intgrale de surface:
( f) = f' f' [Nf {'v,} det (J) d dlj ,
(16 x 1) - , -, 'v,
(4,23b)
(4.23c)
Prsentation matricielle de la mthode des lments finis 233
La matrice masse s'crit
[ml
(16 x 16)
fI LI [NV[N] det (J) dl; dlj.
(4.23d)
La figure 4.5 prsente la liste des sous-programmes ELEM02. N102,
002, B02 et BTOB qui mettent en uvre les rsultats prcdents.
Sous-programmes utiliss par ELEM02 et NI02 : voir figure 4.4.
SUBROUTINE ELEH02(VCORE,VPRNE,VPREE,VDLE,VKE,VPE) EL02
C QUADRATIOUE A B NOEUDS POUR L'ELASTICITE A 2 DIHENSIONS ELaa 3
C CALCUL DES INfORMATIONS ELEMENTAIRES SELON LA VALEUR DE ICOOEEL02 4
e ,
ICOOE.l PARAHETRES DE L'ELEHENT EL02
e 6 ICODE .. Z fONCTIONS D'INTERPOLATION ET COEPrICIENTS DE GAUSS ELoa
e 7 ICODE.3 HATRICE RIGIDITE ELaz
e B ICODC.4 MATRICE TANGENTE
PA'
ECRIT ... EL02
e 9
ICQOEmB HATRICE HASSE EL02
e 10
ICODE .. 6 RESIDUS r.L02
e Il
ICODE_1 SECOND HEHBRE &1,02
e 1. ICODc .. a CALCUL ET IMPRESSION DES CONTRAINTES I>L02
e 13 PROPRIETES El.EHENTAIRES EL{lZ
e 1. YPREE( 1) MODULE D' YOUNG EL02
e "
VPREE( 2) COEffICIENT DE POISSON ELOa
e 16 VPREE(3) . EO. 0 CONTRAINtES PLANES EI.Oa
e 17 . EO. 1 DEfORMATIONS PLANES EL02
e lB VPREE(4) HASSE ELOa
IHPLICIT REAL8(AH,OZ) ELoa ao
COHHON/COOR/NDIH ELoa al
COHHON/ASSE/NSYH ELoa aa
COHHON/RCDT 1 lEI., ITPE, ITPEI , ICRE, IOLE, ICE, 1 PRNE, 1 PREE, INEL, IOEC, 1 PCELoa a3
1,ICODE,IDLEO,INEI.O,IPGO ELOZ Z4
COHHON/ES/H,HR,HP ELoa Z6
OIHENSION VCORE(I),VPRNE(l),VPREE(l),VDLE(I),VKE(I),VPE(I) ELoa 26
C . DIHENSIONS CARACTERISTIQUES DE L'EI.EHENT EL02 Z7
C DIHENSION VCPC( IPC),VKPC(NDIH-IPC),VDEI(IHATD"Z) EL02 28
OIHENSION VCPC( 9),VKPG( 18),VOEI( 9) ELOZ 29
C DIHENSION vaE (IHATO-IDI.E),VDE (IMATO-Z),VJ (NDIH-NDIH),VJI(NOIH-EL02 30
OIHENSION VBE ( 48),VOE ( 9),VJ ( 4),VJI(4) ELOZ 31
C OIHENSION VNIX( JNEI.NDIH),VNI l+NDIH).INEI..IPC),IPCKEO(NDIH) ELoa 32
OIHENSION VNIX( 16),VNI ( 2l6),JPCKEO( 2) ELOZ 33
C OIHENSION DE LA HATRICE D,NOHBRE DE P.C. ELOZ 34
DATA IHATO/3/,IPCKED/3,31 ELOZ 35
C....... ELoa 36
DATA ZERO/O.DO/,OEUX/Z.DO/,X08/0.800/,RADN/.57Z9S7798130833DaI EI.Oa 37
DATA EPSIl.OGI ELoa 38
SORT(X)-OSORT(X) ELoa 39
ATAt/3(X,Y}_OATAN3(X,Y) ELOZ 40
e
C CHOIX DE LA fONCTION A EXECUTER
EL03 41
EL03 42
e &1.02 43
GO TO {IOO,300,300,400,aOO,600,700,800),ICODE EL03 44
e EL02 45
Figure 4.5. Sous-programmes ELEM02, N102, 002, B02 pour le
calcul des matrices lmentaires des problmes d'lasticit
deux dimensions, utiliss par le programme M EF du
chapitre 6.
234
Mthode des lments finis
C . RETOUR 01:5 PAIIAHI:TRI:S DE t. ' ELI:IU:tlT DANS CONNON 'RGDT'
C
10.
c
c
101.(:0-16
IHELo .. e
IPOO-'
RtrURN
EL03
EL02
EL02
EL02
EL03
EL03
EL03
c ..... CALCUL DES COORDONNEES ET POIDS DE P.C . , ET Des r ONCTlONS N ET&t.oa
c Dt; l.EURS OtRIVEES. ELoa
c
300 CALI. QAUSS(IPCKeD, NOIH ,VKPG,VCPG,IPC)
rf(H . LT.3) GO TO 220
ylt ITCeMP, 2000) IPC
2000 rORMAT(!l6,' POl Nrs DE GAUSS' Il OX, vePG' , ZSX, 'VKPC' )
10 .. 1
DO 210 JO_l, Ire
O_IO+1I0IH 1
YRITE(HP,2010) vepc( IG), (VIePG( 1),1 .. 10, Il)
210 IO_IO+HDIH
2010 rORMAT (lX,raO. 18,8X,3raO.16)
zao CALI. NJ02(VICPC,YNI)
lrOI.1.T.2) "ErUltN
Il .. 3-1H&1..-IPC
VRJTt(MP,a020) (VNI(I),I_l,11)
2030 PORMAT(f' rONCTIONS N &T DERIVEes', (1X,8EU.8
RETURH
c
C CALCUL DE LA MATRICE RIGIDITe eLEMeNTAIRC
c
c- HIITUt.ISU vn;
300 00310 ).01 ,Ile
310 nE(l)_ZERO
C . . . CALCUt. DE 0
&1.02
EL03
EL02
EL02
EL02
EL02
&1.02
&1.02
EI.02
EL02
EL02
&L02
&1.02
EI.02
ELOI'.
EI.OI&
E1.01
I:LOa
ELOt
I:LOJ!
Et.01
Et.oa
EL03
EL03
. CALI. D03 (YPREE,VOE) ELoa
1r(N.CE.3) VRITE(NP,2030) (VDE(I),1_1 , 8) Et.oa
a030 rORNAT(/' HATRICE O'/lX,9E12.8) EL02
c .. BOII CI.E SUR LES P.C.
II-HINtl.
DO 330 lC-l, IPe
C CALCUL DU aCODIEN, DE SON INVERSE ET DE SON DETERHINANT
CAl.l. aCOD( VNI (Il) , VCORE, HDIH, INEI., VJ ,V JI ,DET J)
IP(DtTJ.LT.&PS) VRITE(HP,2040) IEt.,IG,DETJ
3040 rORHAT(' Et.EH ',16,' P.C. ',13,' DET(J) .. ',EIB , B)
tP(N.CE.a) VRITE(Hp,a090) VJ,YJl,DETJ
2080 r OR HAT (f' aCODIEN_' ,4EI2.6 / ' J INYERS_' ,4EHI.8/' OtTJ_' ,E13
C CALCUL DE OCOEr
C-VCI'G(IC)OETJ
DO 330 J .. l,9
330 VO&l Cl ) .. VOE(I)C
C .. CUCUL DE D
CALI. ONIOX(VNJ (Il), YJ! ,NOI H, 1 HEL, VNU)
H'(N.Ct.iiJ) YRITE(HP,3080) (VNIX(J),I .. l,18)
3060 FORNAT(/' VNIX'/(lX,BEI3.B
CALI. 803(VNIX,ltlEL,VBE)
Ir(H. CC . 2) VRITE( HP ,a010) (Y8E(I),I_I,4B)
3010 rORNAT(/' HATRICE B' /(lX,10EI2.B
CALL BTDB(VKE,V8E,VDEI,IDLE,IHATO,NSVH)
330 1I-I1.3.UfEL
RElURN
c
C CALCUL DE t.A HATRleE TANGENTE ELEHENTAIRE
C
400 CONTINUE
RElURN
Figure 4.5. (Suite).
EL02
EL02
&1.02
EL02
EL02
&1.02
&1.02
&1.02
,. )
EL02
EL02
ELOli
EL02
&L02
&L02
EL02
EI.02
EI.02
ELoa
EL02
EL03
Et.Da
EL02
EL02
Et.Oll
ELoa
ELoa
&LOa
EL02
..
.,
..
..
..
" 93
54
..
" 67
" 59
,.
61
" 63
"
" 66
"
68
..
70
71
"
73
" 78
= '
" 77
78
"
61
" &3
..
as
..
67
as
..
,.
"
"
"
..
" ..
"
" ..
, ..
,.,
,.,
,.3
,.,
,.,
,.,
,.7
loe .
,.,
Prsentation matricielle de la mthode des lments finis
c
c ..... CALCUL DE LA HATRICE HASSE
C
600 1,0 1,,1,136
610 VKE(I)_ZERO
C-__ BOUCLE SUR LES P.C.
IDIHI_NDIH_}
IDECL .. (NDIIhl
II_hINtL
12 .. 0
00 660 le .. 1, IPG
CA!." aGOB( VNI (Il), veORE, NOIH. INEL. VJ ,VJl ,DETJ)
n_VCPG(IG)_DETJVPREE(4)
e, -..... ACCUHULER l.ES TERHES DE HASSE
IDL .. O
DO 640 J_1, INEL
JJ .. I2+J
JO .. 1 + IOL- (IDL+ 1) /2
DO 530 1 .. 1 , J
II.la+1
C.VNI(II)-VNI(JJ)O
VKE(JO)VKE(JO)+C
rF(NOIH.EO.l) co TO 53.
JI .. JO .. IDL .. a
00 520 Il.I,IOIHI
VKE(Jl).VKE(Jl) .. C
62. Jl.Jl+Jl+l
63. JO .. JO+NOIH
94. IDL .. IOL .. NOIH
Il.Il+IDECL
660 U.I2+IDECL
RETURN
c
C CALCUL DU RESIDU ELEHENTAIRE
C
C CALCUL DE LA HATRICE D
600 CALL 002(VPREE,VDE)
C. INITIALISER LE VECTEUR DES RESIDUS
DO 610 10 .. 1, IOLE
610 VFE(ID)_ZERO
C. BOUCLE SUR LES P.C.
Il_l+INEL
DO 640 IC .. l, IPG
C CALCUL DU JACOBIEN
CALL JACOB(VNI(II),VCORE,NOIH,INEL,VJ,VJ1,DETJ)
C CALCUL DES FONCTIONS D(NI)/D(X)
CALL ONIOX(VNI(Il),VJl ,NDIH,INEL,VNIX)
C CALCUL DES DEFORHATIONS ET CONTRAINTES
ErSX.ZERO
EPSY.ZERO
GAHXY.ZERO
10 .. 1
DO 820 IN_l, INEL
UN .. VDLE(ID)
VN .. VOLE( ID .. })
CI .. VNIX(IN)
INI_JH+INEL
ca .. VNlX(lNl)
EPSX .. EPSX .. CI-UN
EPSY .. EPSY .. C&-VN
GAHXY .. CAHXY .. CI-VH+C2-UN
6ao 10_10+2
Cl .. VCPG(IC)-OETJ
C2 .. VDE(2)-CI
Figure 4.5. (Suite).
EL02
ELoa
ELoa
ELoa
ELoa
EL02
EI.02
ELoa
ELoa
EL02
ELoa
ELoa
ELoa
ELoa
ELoa
ELna
El.oa
EI.Oa
ELoa
EL02
ELoa
ELoa
ELoa
ELoa
ELoa
ELoa
ELoa
EL02
ELoa
&L02
ELoa
ELoa
E:LOa
EL02
ELoa
ELoa
ELoa
ELoa
El.Oa
ELoa
ELoa
ELoa
ELaa
ELoa
&1.02
EL02
El.Oa
EL02
ELna
ELoa
El.Oa
ELoa
EL03
ELoa
ELoa
ELoa
ELoa
ELoa
ELoa
ELoa
ELoa
EL02
ELoa
ELoa
235
'10
"'
"'
'13
Il.
'16
'16
"'
, 16
, 16
".
'"
'22
'"
12.
'"
12'
12'
12'
, "
13.
13'
'32
13'
13.
'35
'36
, "
'36
'36
14.
'41
'42
143
'44
14.
'46
147
14.
'49
16.
16'
'62
16'
16.
'66
'66
, "
'66
16'
16'
'91
, "
16'
'94
'66
'66
'"
'69
'69
17'
17l
l7B
173
236
Mthode des lments finis
ca.VOE(9)Cl
CI_VOE(l )el
SICY_CZ+&PSX.CI+CPSY
TAU XY _C30 "HXY
c- CALCUL DU RES IDU
10_1
'"
'40
c
DO 830 IN_l , INCl.
CI_VNIX( IN)
HU_INtINEL
ca .. VNIX(INl )
VPC(ID).VFC(ID).CI-SICX+CZ
t
TAUXY
VPC(IDtl).vrC(IO+l)+CZ-SIcr.Cl+TAUXY
ID_ID.a
Il,,Il.3
t
IHI:L
RETURN
c CHCUL DES l'ORGES DE VOLUME, PX rY PAR UNITE DE VOLUNE
C ( POUR LA GRAVITe rx .. o PY ... YPREE(4) )
C
100
110
12.
'"
c
C .
PX.ZERO
n .. YPREE( 4)
00 110 1_1,11
Vyt( 1 )_ZI:RO
Il,,l
IDCCL_ (NDIHtI ) "'IHEL
DO 730 le_l,IPe
CALL JACOB(VNl(ll+tHEL),VCORE,NDIH,INCL,VJ,VJl,DETJ)
DX_VCPG(IO)_DETJ
oy .. ox-rr
PX_DX_PX
la_Il
13_1
DO 7ao IN-l , INCL
YPC(13)-VPC(13).OX-YHI(II)
vrc( 13.1 )-VJ'E( 13.1 }.I)Y-VNI( 12)
12 .. IZ.l
13 .. 13.1
Il .. Il.roe:CL
RETURN
CALCUL CT IHPRESSION DES CONTRAINTES AUX P.C.
EL.Oa
EL02
ELOi
1:1.02
ELOi
1:1.02.
EL02
1:1.02
ELoa
EL"a
Eloa
EL02
ELOl!
ELoa
EL02
&1.02
EL03
ELoa
ELOi
ELoa
ELoa
ELoa
1:1.03
EL03
EL03
ELoa
&1.02
ELoa
ELOi
ELOi
EL02
EL03
ELoa
ELU
&L03
EI.03
ELoa
ELoa
1:1.03
EI.Oa
ELoa
1;L.oa
C EL03
800 VRITE(HP,2080 ) lEI.. ELoa
2080 PORHAT(/!' CONTRAINTES DANS 1.. EI..EHENT '.18! EL03
1 P.C . '. 7X, 'X' .llIC, 'Y' ,9X, 'EPSX' ,8X, 'CPSY' , 7X , 'CAMXY ' ,8X. 'stex ' ,EL03
3 8X.'SICY ' ,IX, ' TAUICY ' , 8X, ' TETA '! 'IIX , ' SICl' ,8X, 'S IC2 ' ,lIC, ' TAUHAX 'EL03
3 !) ELOI
....... CALCUL DE LA HATRIct D CLOI
CALI. DOll(YPREE,VDE} CLoa
....... 80UCLE SUR !.ES P .O. E!.oa
ll_I.INtL
la.o
DO 830 10 .. l,IPe
C CHCUL DU JAC081EN
CALI. JAC08( VN 1 (Il) ,VCORE, NOIH, INEL, VJ ,YJ l ,OET J)
C...... CAI.CUI. DES rONCTIONS D(NI)/D(X)
CHI. PNIOX(VNt( Il), vu, NDIH, INEL, VNU}
C CALCUL DCS OEPORHn lONS ET COORDONNEES DU P.C.
EPSX_ZERO
CPSY.ZERO
CAMU_ZERO
X .. ZERO
Y .. ZERO
Figure 4.5. (Suite).
ELOI
&LOa
ELoa
ELOli
ELoa
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
ELOI
f::L,Oa
IH
115
176
111
17B
17B
180
101
18'
183
, ..
'89
'8'
lB1
188.
'89
'90
19'
,U
19'
19.
'"
'"
181
198
'99
20.
20'
."
j
'"
".
, ..
...
301
308
30'
.10
'"
'"
'"
".
".
'"
'" '10
.19
33.
'"
...
."
...
...
."
'" 338
."
."
'"
"a
'"
".
".
...
'"
Prsentation matricielle de la mthode des lments finis 237
10 .. 1
00 810 lN_I . IHE\.
UN .. VDLC(ID)
YN.VOLt( 10.)
)lN_ YCOIII:(IO)
YN .. VCORE( 10.1,
Cl.vH,,( HI)
INI .. IN.INEL
C2 .. VNJX ( 1141 )
IN1.!th Ja
C3 .. VNI ( tMl)
EPS X. EP SX. CI-U N
tPSy.tPSY. CZ+YN
CAHXY.CAHlIY.CI-VN.CZ+UN
X.X. C3 -XN
Y .. Y.C3-YN
810 10_10+2
1:'-02. ua
CLOZ 2039
&1.02 UO
&1.0 2 a41
EI.Oa 243
EI.02 243
tLOZ au
El.Oa 248
El.Q 3 3<16
ELOi 247
EI.OZ 248
EL.OZ 249
ELOZ 250
&1..02 261
ELoa 252
EI.Oa 253
EL02 254
&1.02 266
EI..02 3136
&1.02 287
&1.02 258
1:1..02 259
EL02 260
1:1.03 261
(;1.02 262
&1.02 263
&1.03 264
&1..02 us
El.Ot 266
El.aa 361
El.02 288
ELa a 369
&1.02 370
&1. 0 2 211
&1.02 272
&1.02 273
C CALCUL DES CONTRAINTES
SI eX.VDCe 1 ) +EPSX+VDE( a )-&P5Y
SICY.VOE ( Z)EPSX.VDE(I)+CPSY
TAUlIY_YDE(9)CAHXY
C CALCUL DES CONTRAlHTES PRINCIPAI.ES
TETA.ATANZ ( DEUX-TAUXY,SICX-SICY)-X08
Tl;TA_TCTA-RADN
Cl- (S J CX. SI CY)-X08
Ca_ (S I CX SICY)X06
TAUKAX.SORT( CZ-ca.TAUXY-TAUXY)
SICI_CI.TAUKAX
Sl c a .. CI TAUHAX
VRITt ( KP .209Q) IC,X . l . CPsx . crsY.CAKXl . SICX.SICY,TAUXY .
1 TCTA. S ICI , SIC2,TAUHAX
20iO fORHAT(l x .I S. IIEI2 . 8 , 8X . f8 . 1/ 66X , 3&12 . 1I)
82'
la.IlI.3+INEt.
Il .. lJ+3+rNtl.
RETUIt/(
ENO
SU8R OUTINE NI02(VKPC,VNl) NIOZ
C CALC UL DES fONCTIONS O'INTERPOLATION N ET DE I,.EURS DERJVEES NIOZ
,
,
C D( N) /O( KSI) ET O(N)/D(ETA) PAR LA HETHOO& CENERALE DE PN INVERSE NIOZ
6
CENTREES NIOZ
vKrc COORDONNEES EN LESOUELLES CALCULER H C NIOZ
!PC HOH8RE DO POINTS C NIOZ 7
C
C
C
C
tNEL NOH8RE DO
NOIH NOHEIRE
'E
SORTIE
'"
rONCTIONS
fONCTIONS N (DE NOEUDS)
OIMENSIONS
N ET DERIVEES
tNCL . EO . 8
NOtN.tO . Z
NI02 S
NIOZ 9
NIOZ 10
NIOZ 11
JHPLt CIT REAL-S ( AH , OZ ) NIOZ 13
CONNON /COOR/ NDIN NIOZ 14
COMKON/ RCOT / IEL , ITPE , ITPEJ,JGRE , I DLE , ICE,IPRME, IPREE , tHEL, lDEe,lrCNloa 15
DIMENSION VXPC(I).VNJ(I) Nloa 16
C HI03 11
C _ , _ INrORNATIOMS LICES A L' ELCMEMT OC RErERENCE CARRe A 8 HO&UOS NIOZ III
C (tHeL . EO . II HOIH . Eo , a ) NIoa 19
C DIMENSION VKSI(NDIM-IHEL) , KEXP(HOIH-IHEL) , XDER(HOIM) NIDa 20
DIMENSION VXSI( 16),KEXP( \8) , KOER( 2 ) NIoa 21
C DIMENSI ON VPN ( INEL-INEL) ,VP(INEL) , Kl(INtL) NIall lia
DIMENSION VPN ( 64 ) ,VP ( 8),X1 ( 8 ) Nloa 33
C COOROONNEES DES NOEUDS DE L'ELEHENT DE REff;RENCE NIOli 24
C
DATA VKS I/ - l . OO, 1 . 00, +0.00,1.00, .1 . 00, , 1 . 00, _1 . 00 , +0 . 00 ,
l +1.00,.1.00, +0.00,.1.00, -1 . 00,.1 . 00, 1.00,+0.001
EXPOSANTS DES NOMONES 0& LA BASE POLYNOMIALE,DECRE MAX .
Figure 4.5. (Suite).
Nloa 211
HIOZ 26
NIoa 21
238
Mthode des lments finis
DATA KEXP /O,O, 1, 0 , D,l, 2,0, 1,1. o,a. 2,\, 1.2/. (DECR /il
c
c ...... .
IDEO_JDtGR
C CALCUL DE LA HATRICE PH INVERSE
CALL PNINV(VK81 ,KCXP,VP,Kl ,VPH)
C __ CALCUL DE N, O( N)/ D(KS I),D(N)/ O(ETA) AUX P. C.
Il .. ]
J2_1
0010 TC .. I , lre
IfDER( 1 )-0
IDER (2) - O
CALL MI(HPC( Il ) ,KEXP , I(DCR, Ir. VPH, VNI (12.
lZ.tz .. INEL
KDER(I)-1
CALL NI(VKPG(ll ),KEXP ,KDER,VP,VPN,VNl ( t2
la.I2+INEL
1<0&R(I)_0
I(DCR(2).1
CALI. Nl(VXPC( Il ), KEXP ,I(O&R. vr. YPH, VNI (12
IZ.J2+1NEL
10 Il .. Jl.NDIN
RCTURN
&HO
SUBROUTIHE D02(VPREE,VDE)
C
CONSTRUCTION DE LA HATRICE 0 (ELASTICITE
C ENTREES
C
VPREE PROPRIET&S
,
C
VPRf:E(l ) MODULE D'YOUNC
C "'PREE(Z) COEFPICIENT 0&
2 DIMENSIONS)
POISSON
C "'PREE(3) .EO.O CONTRAINTES PLANES
C
. EO . 1 DEFORMATIONS PLANES
C
SORTIES
C
VO& HATRlce 0 (PLEINE)
NIO Z
NIOZ
Nlaa
NI02
Nloa
tU oz
NtaZ
tfloa
NIOZ
NIDa
Nl0a
NIOZ
NIDi!
NIDZ
Nlaz
l'HOa
IH03
IH02
NIDZ
NIO Z
NIOZ
NIOZ
NI03
NIDa
ooa
00.
00.
00.
00.
00'
Ooz
00.
DOl
O
c-----.... ----.---------------..-----------.. --........ -_002
IMPLICIT REAL-S(A N.O . Z)
DIMENSION VPREE(I),"'OE(9)
DATA ZERO/O. DO /,UH/I . DO/.D&UX/2.DO/
&_VPRE&(l)
X.VPR&&(Z)
A_VPREE(3)
C1.C-(UN.A-X)/UN.X)-(UN.X-A-X
ca.C1-X/(UN-A-X)
C3_E/(D&UX-(UN.X
... 0&(1 ).CI
VD&(3).ca
VDE(3).ZERO
VOEe" )_C2
VOE ( 6).C1
VDE(6).ZERO
VDE(7).ZERO
YDE(8).ZERO
VDE(9).C3
RETURN
EN'
SUBROUTINE B02(VN1X.INEL . ... 8E)
'01
DOa
'01
ooa
00'
."
DO'
00.
.OZ
.oa
.oa
.oa
...
00.
...
00.
ooa
.. a
DOl
DOl
BO'
Z8
" 30
31
"
33
"
3S
36
37
38
"
" 41
.,
43
..
'8
..
47
'8
..
8.
81
3
,
1
8
,
1.
"
II
13
1
18
18
11
18
l ,
au
aI
"
" ..
.8
a8
"
a8
"
30
31
"
C __ _____ _ Boa a
c
c
c
c
CONSTRUCTION DE LA "ATRICE 8 (ELASTICITE A 3 DIMENSIONS)
EHTRtES
VNU OERJVEtS DES rONCTI ONS O' INTERPOl.ATION EH X, V.Z
INCL NOM811E DE PONCTIONS O'INTERPOL ATION
Figure 4.5. (Suite).
BO'
8
80a
BOa
3
8
c
c
,.
c
c
c
c
Prsentation matricielle de la mthode des lments finis
SORTIE
YB'
MATRICE B
IKPLICIT REALS ( A.H,O.Z)
DIMENSION VNIX(INCL,1),VBE(3,l)
DATA ZERO/O. 001
'.1
DO 10 1_I,INI:1.
ChVNJlI(I,I)
Ca ... VNIlI(I,2)
V6E(I,J).CI
V8E(1 , J .. 1 ) .. ZERo
V8E(3,J) .. ZERO
VBE(Z,J+l)-C2
VBEel,J)-Ca
VBE(3,J+l)_Cl
J .. 3+2
RETURN
END
SUBROUTJNE BTD8(VKE,V8E,VDE,IDLE,IHATD,NSYM>
AJOUTE LE PRODUIT B(T) . D.8 A VKE
ENTREES
'"
"ATRleE ELEMENTAIRE NON SYMETRIOUE ( M8YH . ED . l )
SYMETRIOUE (M8YK.CO.0)
80'
8"
8.'
80'
80'
80.
'02
80'
80'
8.'
8 ..
80'
.. ,
.. ,
.. ,
.. ,
.. ,
8T08
aTDD
nOD
ST08
BTDS
239
7
8
,
,.
Il
"
" ..
18
18
17
18
" ,.
"
"
"
,.
"
" 3
5
,
C VBE MATRICE B BTOD 7
C VOC HATRleE 0 (PL.E!NE) IIT08 8
C IOLE NOMBRE TOTAL DE 0.1.. DE L'CLoEHENT BTDB 9
C INno DIMENSION DE t.A HATRIeE 0 (HAX. Il) 11108 10
C SORTIE 8T08 Il
C VKE !TDB 12
c ........................................ __ ............................................................. _____ BT08 13
IKPLJCJT REAL-8(A.H ,OZ) BTOB 14
DIKENSION VKE(l),VBE(JKATD,l),VDE(JKAfO.l),f(B) BTDB lB
DATA ZERO/O . OOI 8T08 16
C 8T08 11
,.
,.
3.
IJ .. 1
IKAX_JDLE
DO 40 J.l, IOLE
DO aD Ilo.l,lHATD
C .. ZERO
DO 10 Jl_l,IKATD
C .. C+VDE(Il,Jl)VBt(Jl,J)
T(Il).C
Jf(HSYH . ED .O) IHAX .. J
00 40
I_l , IHU
C.ZERO
DO 30 JI-I,IHUo
C.C+VBE(Jl,I)-T(JI)
VKEt Il )_VICE( IJ )+C
IJ_I1+1
RETURH
END
Figure 4.5. (SUite).
8T08
8T08
BTOB
BTDB
8TDB
8TOB
IITOB
BTOB
IIT08
8T08
BTOB
BToB
IIT08
Broe
IIT08
IITD8
IITD8
18
"
20
21
"
" ,.
..
26
37
" ..
3.
31
" 33
34
240 Mthode des lments finis
4.4 Assemblage de la forme globale discrtise W
L'assemblage est l'opration qui consiste construire la matrice globale
IK] et le vecteur global des sollicitations {F} partir des matrices l-
mentaires Ik] et des vecteurs lmentaires des sollicitations { f ],
4,4.1 ASSEMBLAGE PAR EXPANSION DES MATRICES
f:Lf:MENTAIRES
Chaque forme intgrale lmentaire W' s'crit sous la forme discr-
tise (4,4) :
W' = < ou, > ([k] { u, } - { f })
o : [k] est la matrice lmentaire de l'lment e ;
{ f } est le vecteur des sollicitations de l'lment; il est la somme des
sollicitat ions de volume et des sollicitations de surface,
Les vecteurs < ou, > et { u, ] sont diffrents pour chaque lment car
ils contiennent les variables nodales de l'lment e,
Soient < oV, > et { V, J les vecteurs forms par l'ensemble des variables
nodales du domaine complet Vet qui apparaissent dans (4.5b) ,
< ou, > et {u,} contiennent les termes de < oV,;> et {V,} qui
correspondent l'lment e :
Variables globales
< bU" > -
<
bU
l
U
j
U
j bU" u" >
Variables lmentaires
\.
j
/
<
U
II
> = <
/)U i U
j
u" >
O ou" ou}, ou, sont les variables nodales de l'lment.
EXEMPLE 4 , 9. Vecteurs lmentaire { u, } et global { V, J,
Considrons le domaine V reprsent par les 2 lments triangulaires
ayant un seul degr de libert par nud:
,
~
~
2 4
Prsentation matricielle de la mthode des lments finis 241
Les vecteurs globaux sont :
Les vecteurs lmentaires de l'lment (1) sont
< > - < OUt oU
2
{w
4
>
< > - < u
l
u
2
u
4
> .
Les vecteurs lmentaires de l'lment (2) sont :
< > _ < ou, dU
4
oU
J
>
< U!2 ) > _ < u
i
u
4
u) > .
Les formes intgrales lmentaires s 'crivent :
W(I) = < bu;') > (lk' l)j ( u;')} - ( f i l) }l
W'2) = < > (lk'''j (u;2)) - ( f(2) }l .
Remarquons qu'une variable nodale u, (ou bu,) apparait souvent dans
plusieurs vecteurs lmentaires, puisqu'un nud peut appartenir li plusieurs
lments ; c'est le cas des nuds 1 et 4 de l' exemple 4.9. Il est ncessaire
qu'une telle variable nodale soit exprime dans le mme repre pour
tous les lments,
La forme intgrale globale discrtise West la somme des formes l-
mentaires discrtises W' (4,58). Cette opration constitue l'assem-
blage :
W= L w
W = L < bu, > {(k) ( u, 1 - ( f }) .
"
Nous cherchons mettre cette expression sous la forme (4 , 5b)
W = < bV. > ([K) { V, 1 - ( FI) .
Pour cela, il suffit de rcrire les formes lmentaires W' en fonction de
{ V. } et < bV. >
W = < bV. > ([K') {V.l - (F' Il,
(4 , 24)
La matrice [K'l est construite par expansion de la matrice [kj grce
des insert ions de lignes et de colonnes de zros, [k) a pour dimension le
nombre de degrs de libert de l'lment; [K') a pour dimension le nombre
de degrs de libert total.
242
Mthode des lments finis
De mme { F' } esl conslruit par insertion de zros dans { f }. Dtaillons
les oprations d' expansion de lkl en [K'l el de { f } en { F' } :
al Expansion de Ikl
L'expansion de [kl se fait en deux lapes; l'une consiste remplacer r u, }
par r u" } et l'autre remplacer < OU, > par < oU, >, Considrons, tilre
d'exemple, l'expressi on
[
kil
W' = < OUt oU
J
> k
li
kt2] {Ut} = < ou, > [kl {u, J. (4.258)
k
22
uJ
Le vecteur global des variables nodales esl :
Un > .
- Remplacement de ( u, ) par { U, J
Pour que W' resle inchange si l'on remplace { u, J par { U, J, il faut ~ .
remplacer Ikl de dimensions (2 x 2) par une matrice [k1 de dimensions
(2 x n) donl la colonne J est { ~ : : } la colonne J esl .{ ~ : : } et dont
loutes les autres colonnes sont nulles:
colonne J colonne J
OU
J
>
[
00 , . .
00. "
{
kil} 0 .. , {k
t2
} 0 .. , 0]
k
"
0", k
"
O. " 0
(2 x n)
U
J
u
J
+ 1
(4,25b)
Remarquons que si J > J les colonnes de [kl seront interverties dans
(4,25b),
- Remplacement de < ou, > par < oU, >
Pour que W' reste inchange si l'on remplace < ou, > par < oU, > , il
faut encore remplacer cette matrice [k1 par la matrice [K'l de dimensions
Prsentation matricielle de la mthode des lments 'inis 243
(n x n ) dont la li gne J est la premire ligne de {k'j, dont la l igne J est la
seconde ligne de {k'j, et dont les autres lignes sont nulles
< oU" > = < bU, oU
2
, bu, OU
,
+
1
, bu} OUJ +I . . ' ou" >
o o o o
o o -ligne J
W' = <bU, > 0 o o o (U,) = < bU, > {K'l ( U, )
o
o 0
t
colonne 1
b) Expansion de ( f)
k"
o _ ligne J
o 0
t
colonne J (n x n)
Considrons l'expression { , }
W = < bu, bU
J
> ' = < ou, > ( , ) .
"
(2 x 1)
(4 . 25c)
(4.268)
Pour que W, reste inchange si l'on remplace < ou, > par < iiU, >, il
faut remplacer ( , ) de dimension 2 par le vecteur ( F' ) de dimension n
dont le terme J est '" le terme J est " et dont les autres termes sont nuls:
W = < bU > ,
o
o
0
"
0
0
"
0
o
(n x 1)
- ligne 1
= < bU, >
( F" ) . (4 . 26b)
- ligne J
244
Mthode des lments finis
EXEMPLE 4.10. Expansion de Ik] et ( f 1 de l'exemple 4.9.
Dans l'exemple 4 . 9. la forme lmentaire de l'lment (1) s'crit:
ou en utilisant la matrice tendue IK'''j et le vecteur tendu ( F'" 1
bu,
Dans le cas de l'lment (2)
Sous larme tendue
k
''1
"
k"
o
k
'l<
"
o
k
J
\ a k
JJ
k
J2
k
ZI
a k
21
*22
IK"')
u,
u,
u,
u,
u,
u,
u,
u,
l, ''1)
l,
o .
l,
~
( F'" )
f, tlI
o
"
"
---..-
( FUI )
Remarques : Les indices qui apparaissent dans IK'J et [F' 1
reprsentent la position de chaque terme dans Ik] et { 'I. Par contre
les indices dans < bu, > et ( u, 1 reprsentent le numro du nud
correspondant chaque variable nodale.
Nous obtenons la forme intgrale globale par sommation des expres-
sions (4 . 24). < bU, > et ( U, 1 tant mis en facteur:
w = 2: W' = 2: < w. > ([K'J { U. 1 - ( F' 1)
, .
= < W, > ( [ ~ IK'J] { U, 1 - { ~ F' 1 })
= < W, > ([KI [ U, 1 - [ FI) (4.27a)
Prsentation matricielle de la mthode des lments fini' 245
o: [K] = L [K']
,
(4.27b)
{ F} = L { F' } .
,
La matrice globale [K] est donc la somme des matrices lmentaires
tendues [K']. Le vecteur global {F} est la somme des vecteurs lmen
taires tendus {F'}.
EXEMPLE 4.11. Matrice globale de l'exemple 4.10.
La matrice globale est:
[K] = [K")] + [K(2)]
k(l) + k(2)
11 11
k(1)
(2
k(2)
"
k(l) + k(2)
13 12
k(\) k( 1)
0 kil)
[K] =
"
22
kW
0
k\V
k\','
k\') + k(2)
l "
k(l)
32
k(2)
23
kIl) + kW
Le vecteur global des sollicitations est:
(II) + ((2)
1 1
{ F} = (F''') + { F(2)} _
I( 1)
2
IF)
Ijl) + IF'
4,4,2 ASSEMBLAGE EN MCANIQUE DES STRUCTURES
Historiquement, la notion d'assemblage a t d'abord utilise pour des
problmes de mcanique des structures, dans lesquels l'lment est en fait
un ressort, une barre ou une poutre, Pour chaque lment e, considr
comme isol, nous disposons de la relation liant les dplacements ( u, ) et
les forces appliques:
[k] { u, } - { { } = {p} (4,28)
o : { { } sont les forces extrieures connues appliques l'lment, iden
tiques celies de (4.4)
{p } sont les forces internes dues l'action des autres lments sur
l'lment e
[k] est la matrice rigidit lmentaire de (4.4).
246
Mthode des lments finis
L'assemblage consiste constru ire le systme d'quations global:
[K]{ U, } { F}
en utilisant
la continuit des dplacements aux nuds;
l'quilibre des forces qui se traduit, en chaque nud i, par L>; o.
EXEMPLE 4.12. Assemblage de 2 ressorts.
Considrons 2 ressorts de rigidit unit
,"'
,
-
"
- d
21
ut III
-_.
121 121
P P P P
, ,
Les relations (4 . 28) correspondant li chaque ressort sont :
Ressort 1 :
[-:
-:]
{ u\l)}
U\"
{ f,(I)}
(lI)
Ressort 2 :
[-;
-:]
{u\"} _
r"}
(Pl
La structure assemble est la suivante:
u,
-
-
F,
u,
-
2
-
F,
u,
-
3
F,
La continuit des dplacements implique:
up' = VI
U
(l) - U
, - ,
ui
l
) = V
z
u\" u, .
{ (I)} P, .
.
-
{p\"} .
pi
2
)
Prsentation matricielle de la mthode des lments finis 247
L'quilibre des forces s'crit aux 3 nuds:
pp' = 0 + p\2) = 0 = 0
ce qui s'crit, aprs expansion des relations lmentaires sous une
forme comparable (4.25c) et (4.26b)
- -
l 0 0 0 J U, 0 0 -1 1 U, Il'' 0
soit
[K'''] {U, J - (F'" J + [K(2)] {U, J - (F(2)} 0
[ -i
-1
2
-1
[K] { U, J { F J .
4.5 Technique d'assemblage
4.5.1 TAPES DE L'ASSEMBLAGE:
Nous avons vu au paragraphe 4.4 que l'assemblage comporte deux
tapes :
- construction de la matrice tendue [K'l et du vecteur tendu { F' J
de chaque lment selon (4. 25c) et (4. 26b)
- addition des matrices et des vecteurs tendus (4. 27b).
Ces deux tapes sont en pratique effectues simultanment pour viter de
construire explicitement [K'l et {F' J.
4.5.2 RGLE D'ASSEMBLAGE
De manire standardiser les oprations d'assemblage, dfinissons pour
chaque lment la table de LOCalisation Elmentaire LOCE qui
donne la position de chaque terme de { u, J dans { U, J donc galement
la position de chaque terme de < oU
n
> dans < oU
n
>, Dans le cas o
248 Mthode des lments finis
il n'y a qu' un degr de libert par nud, cette table est identique la table
de connectivit CONEC dfinie au paragraphe 1 ,2.6. La dimension de la
table LaCE est gale au nombre de degrs de libert de l'lment n".
EXEMPLE 4.13. Dfinition de la table de localisation lmentaire.
Dans le cas de l'assemblage des deux triangles suivants :
,
'l'v.l'
2 4
la table de connectivit CON EC est:
Mments nuds
1 1 2 4
2 1 4
3
a) S'il Y a 1 degr de libert paf nud u :
l6ment 1
lment 2
< u" > = < u
i
u
2
u
4
>
LOCE = < 1 2 4 >
LOCE = < 1 4 3 > .
b) S'il Y a 2 degrs de libert par nud u et v :
Prsentation matricielle de la mthode des lments finis 249
lment 1
LOCE < 1 2 3 4 7 8 >
lment 2
LOCE < 1 2 7 8 5 6 > ,
Prcisons l'opration d'expansion (4, 25c) d'une matrice lmentaire
Ik] quelconque en une matrice IK"], en utilisant la table de localisation
LOCE : chaque terme k;j de [k] est transfr en Kr; de IK'] de manire
ce que :
ou encore:
1 LOCE (i)
J LOCE (i)
i = 1, n
ar
i = 1, ndf!
K' - K' - k
IJ = LOCE/i). LOCr:(j) = i)'
(4,29.)
De mme, chaque terme fi de (f) est transfr en Ft de {F'} de
manire ce que :
(4,29b)
L'algorithme gnral qui effectue les deux tapes de l'assemblage
est le suivant:
Initialiser les termes de [K] et { F ) zro,
Pour chaque lment :
Ajouter chaque terme Ici) de sa matrice lmentaire au terme Ku
de la matrice globale :
o:
KIJ=KIJ+k
j1
=1 , 2, ... ,n
dt
i 1, 2, .. ', n"
1 LOCE (i)
J LOCE (i) ,
Ajouter chaque terme f
j
du vecteur lmentaire des sollicitations
au terme F, du vecteur global :
o: 1 LOCE (i) ,
250
Mthode des lments finis
4,5,3 EXEMPLE DE SOUS-PROGRAMME D'ASSEMBLAGE
Nous prsentons sur la figure 4,6 un sous-programme simple d'assem-
blage de la matrice [k[ et du vecteur [ f } d'un lment, Ce sous-programme
est utilis de la manire suivante dans le programme BBMEF du chapitre 6:
C
C
C
C
C
C
C
C
C
C
C
C
C
C
Dbut
d'assemblage
j
initialiser 0
VKG et VFG
Pour chaque lment
VKE : matrice 1*1
construire KLOGE
construire VKE
construire VFE
CALL ASSEMB ( .. ,)
t
fin
d'assemblage
VFE : vecteur { f 1
KlOCE : table LOCE
VKG : matrice (KI
VFG : vecteur ( F )
SU8ROUTINE
SOUS-PROGRAMME D'ASSEM8LAGE D'UN El.EHENT
ENTREES
VKE HATRleE ELEMENTAIRE
HE VECTEUR ELEMENTAIRE DES sOLLICITATIONS
nOCE VeCTEUR ELEMENTAIRE DE LOCALISATION
IOLE NOHBRE DE DECRES DE LIBERTE DE L'ELEHENT
HE. NOHBRE D'EOUATIONS A RESOUDRE
SORTIES
VKC MATRICE CLOBALE
VYC VECTEUR GLOBAl. DES SOLLICITATIONS
UMD
AStUI
ASliS
ASHB
ASHB
ASHB
ASHB
ASHB
ASMB
A8NB
ASND
AS"B
AStl8
UHB
ASHB
3
,
7
8
8
,.
Il
IZ
13
14
18
C .......... .. .... ...... ----- ___ .. .. _ ........ _ .... __ ____ _-- --.AStiB "
17
IHPLICIT REAL-S (A.H,OZ)
DIHENSION VKE(JOLE.IDLE),VPE(IOLE),KLOCE(IOLC),
1 VKG(HEO,NEO),vrC(N,EO)
DOIOID_l,IOLC
I_KLOCC(ID)
VPG(I).VPC(I).vrC(IO)
00 10 JO .. l , IOLE
J_KLOCE(JD)
10 VKC(I , J).YKC(I,J).YKE(IO.JO)
RETUR"
END
ASN8
ASH8
ASNO
ASNB
ASMB
AiMB
AStiS
AStl8
ASH8
AStiB
18
18
,.
31
"
"
..
"
"
" ASti! 28
Figure 4.6. Sous-programme d'assemblage ASSEMB, utilis par le
programme BBMEF prsent au chapitre 6,
Prsentation matricielle de la mthode des lments finis 251
4.5.4 CONSTRUCTION DE LA TABLE DE LOCALISATION
LOCE
a) Cas de 1 degr de libert par nud
La table de localisation LOCE est identique la table de connectivit
CONEC qui dfinit l'lment (voir paragraphe 1.2.6).
b) Cas de n
d
, degrs de libert en chaque nud (u, v, ... )
Supposons que les variables nodales soient organises sous la forme
{ U,
}T
-
<
u, v, . .. ,
u v
'" ,
...
> , ,
( U,
)T
-
<
u, v,
.,. ,
u, v,
.,. ,
u
3
v
3
' , , , ... ,
o : i, j, ... sont les numros des n, nuds de l'lment e
n est le nombre total de nuds.
Le nombre total de degrs de libert d'un lment est
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
LOCEf(KCOUEC,NNEL,NDLN,KLOCE)
SOUS. PROGRAMME DE CONSTRUCTION DE LA TABLE XLOCE DE
LOCALISATION D'UN ELEHENT (NOHBRE DE DEGRES DE LIBERTE fIXE
NDLU P.'r.R NOEUD)
LES D.L. ELEHEIlTAIRES ET GLOBAUX SONr ORC,\HISES sous LA l'ORME
U1 YI UZ Va .. U3 V3 ... ETC
ENTREES
XCOHEC TABLE DE CONNECTIVITE D'UN ELEMENT
NHEL NOHBRE DE NOEUDS PAR ELEHENT
NOLU NOHBRE DE DEGRES DE LIBERTE PAR NOEUD
SORTIE
KLOCE TABLE DE LOCALISATION LOCE
u, v,
>
LOCI"
I.ocr 3
LOCI" 4
LOCI" 5
LOCI" 6
Locr 7
LOCI" 8
Loer 9
LOCI" 10
L.ocr Il
LOCI" 1 a
LOCI" 13
LOCI" 14
Loer 15
LOCI" 16
LOCI" 11
c Locr 18
IHPLICIT REAL'S(AN,OZ) Locr 19
DIHENSION KCONEC(I),KLOCE(l) Locr 20
J.'
c BOUCLE SUR LES NNEL NOEUDS DE L'ELEHENT
DO 10 IN_l,NNEL
IDO.(KCONEC(IN)I)'NDLN
c . . . . . . BOUCLE SUR LES NDLN
DO 10 ID .. l,NDLN
J.J+l
10 KLOCE(J)_ID+IDO
RETURN
DEGRES DE LIBERTE
loocr 21
Locr 22
Lacr 23
Lacr 24
Lacr 2B
t,ocr 26
Locr 21
Lacr 28
Locr 29
END Locr 30
Figure 4.7. Sous-programme de cration de la table de localisation
lmentaire LOCE (nombre fixe de degrs de libert par
nud). Ce sous-programme est utilis par le programme
BBMEF prsent au chapitre 6.
252
Mthode des lments finis
La table LOCE se construit pour chaque lment partir de la table
CON EC grce au sous-programme LOCEF de la figure 4.7, utilis dans le
programme BBMEF du chapitre 6.
c) Cas d'un nombre variable de degrs de libert par nud
Il faut stocker le nombre de Degrs de Libert de chaque Nud dans une
table DLNC. En pratique, pour des raisons d'efficacit, celte table est
organise de manire' Cumulative : DLN C (1 + 1) reprsente la somme
des nombres de degrs de libert des nuds 1, 2, ... , 1 - 1, 1.
La table DLNC est de dimension n + 1. Le nombre de degrs de libert
du nud 1 est par ,consquent : '
DLNC (/ + 1) - DLNC (1).
La table LOCE se construit pour chaque lment grce au sous-pro-
gramme LOCEV de la figure 4.8.
SU8ROUTIHE LOCr.V(KCONEC,KOLNC,NNEL,KLOC&) L.OCV
C LOCV
C SOUSPROGRAHME DE CONSTRUCTION DE LA TAOL.E nOCE DE LOCV
C I.OCALISATJOIl D'UN EI.EHENT (NOHBRE DE DEGReS DE LIBERTE VARIABLE LOCV
C EN CHADUE NOeUD) I,OCV
C L&S D. L . . EI.EHCNTAIR&S ET CI.OBAU)( SONT ORCANISES sous LA rORHE : LOCY
C U1 VI .. U3 va .. 03 '1 3 .. ETC LOCY
C LOCY
c
C
C
C
C
C
C
C
C
ENTREES
)(COHEC TABLE DE CONHECTJVITE D'UN ELEHENT
"OLNe TABLE DES HOHBRES DE DEGRES oc LIBERTE: PAR NOEUD
(CUMULATIVE)
MHEL HOH8RE OC NOEUDS PAR ELCHENT
SORTIE
KLOCE TABLE OC LOCALISATION LOCE
LOCY
LOCY
LOCY
LOCY
ioDe v
i.oev
LOCV
LOCV
LOCY
c ___ _____ __ ______ ___ -_ . LOCY
IMPLICIT RE AL8CA M,O Z)
DIMENSION kCONtCCI),KDLNC(I),KLOCC(I)
J_'
C BOUCLE SUR LES NNCL. NOEUDS DE L' ELEKENT
DO 10 IN_l,HNEL
I1_kCOHEC(lN)
IDO.kDLNC( 1 1)
IDLH_KDLNC( 1 1.1) 100
C . BOUCLE SUR . LES JDLN DEGRES 0& LIBERTt DU NO&UD IN
ID
DO 10 ID_l,IDLN
kLOC&(1)_IO.IOO
R&TURH
LOCY
LOCY
LOCY
LOCY
LOCV
LOCY
LOCV
LOCV
LOCV
LOCY
LOCV
LOC';'
LOCV
tND LOCV
1
,
,
,
,
,
10
11
13
13
14
lB
"
"
"
"
" 21
" 23
..
..
..
.,
..
..
30
3)
32
"
Figure 4.8, Sous-programme de cration de la table de localisation
lmentaire LOCE (nombre variable de degrs de libert
par nud).
-'
Prsentation matricielle de la mthode des lments finis 253
EXEMPLE 4.14. Table de localisation pour un assemblage Il nombre
de degrs de libert variable.
Considrons J'assemblage de 2 lments Il 7 degrs de libert et
3 nuds:
" "
'. w,
w, w,
8,
"
8,
"
8,
,
2
,
,
.. ..
l ~ m . n l 1 ilf",,,,1 2
nombre de nuds total n - 5
nombre d'lments
n"
- 2
nombre de nuds par lment n,
-
3
nombre de degrs de libert par lment
.
ndt =
7 .
nombre de degrs de libert total
n. =
1 1 .
Table de connectivit (CON EC)
lments nuds
1
2
Table des nombres de degrs de libert par nud cumulative
(DLNC) :
<0347811>
Tables de localisation (LOCE)
lment 1
< 1 2 3 4 5 6 7 >
lment 2
< 5 6 7 8 9 10 11>.
4.6 Proprits des matrices globales
4.6.1 STRUCTURE DE BANDE
La matrice globale IK] est construite par addition des matrices l-
mentaires tendues [K'l qui comportent un grand nombre de zros:
[K] - L [K '] .
lmcnu
254 Mthode des lments finis
Conformment la rgle d' assemblage du paragraphe 4.5. les seuls
termes non nuls de [K'J sont tels que:
o :
K' - k'
IJ = fi
1 = LOCE (i) i = 1. 2 ... .. nd.
J = LOCE (i) i = 1. 2 ... n
d
(4.30)
Par consquent un terme KIJ n'est diffrent de zro que s'il existe un
lment qui fait intervenir simultanment les variables nodales u, et u
J
La rgle d'assemblage est symtrique en 1 et J; s'il existe un terme
non nul KIJ"" il existe donc aussi un terme non fJul KJI. Nous pouvons
donc tudier seulement la structure (topologie) de la moiti suprieure
de [K J pour laquelle J > 1.
Dfinissons la distance horizontale bIJ et verticale hIJ d'un terme
non nul KIJ par rapport la diagonale de [K] :
J
b
1J
= J.J
hlJ = b
1J
Compte tenu de (4.30). bIJ correspondant au terme k,) de l'lment e
s'crit:
b" = J - 1 = LOCE (i) - LOCE (i) J > 1 .
La largeur de bande lmentaire b
,
de la ligne 1 de [K'] est Max (bi,)
pour tous les termes non nuls de cette ligne 1: .
= 1,2, ... . n
de
1 = LOCE (i)
j=1,2.".,n
dt
'
\. b, = Max (LOCE (i) - 1) = Max (LOCE (j - 1 .
L-.-: ) )
(4.318)
De mme, la hauteur de bande lmentaire hj de la colonne J
de [K'] est Max (hl') pour tous les termes non nuls de cette colonne:
j = 1, 2, ... , n
de
J = LOCE (j)
1 i = 1. 2 . .... nd
hj = Max (J - LOCE (i = J - Min (LOCE (/).
; ,
(4.31b)
Prsentation matricielle de la mthode des lments finis 255
La largeur de bande b, de la ligne 1 de la matrice globale JK ] est:
b, = Max (bD
(4,32a)
,
pour tous les lments e, Sur la ligne 1. les termes K/J sont nuls pour
J > h, + 1, Sur la colonne 1. les termes K)/ sont nuls pour J > h, + 1,
La hauteur de bande h
J
de la colonne J de la matrice globale (K] est:
h
J
= Max (hj ) (4 , 32b)
,
pour tous les lments e, Enfin la largeur de bande b et la hauteur de
bande h de la matrice globale (K] sont :
b = Max (b,) pour toutes les ,lignes 1
,
h = Max (h
J
) pour toutes les colonnes J ,
J
En raison de la symtrie en 1 et J
b = h ,
(4,33)
Soulignons que les largeurs et hauteurs de bande dfinies ci-dessus ne
prennent pas en compte le terme diagonal. Ainsi pour une matrice dia-
gonale b = h = 0,
EXEMPLE 4 . 15, Largeur. et hauteurs de bande d'un 8ssemblage de
3 Mments 1 dimension.
Considrons les 3 lments il 2 nuds. avec 1 degr de libert
par nud:
2
,
1
, ,
Elment 1
LOCE =
<
1 2 >
bO )
,
- <
1 0 0
0>
h)11
- <
0 1 0 0>
Elment 2
LOCE =
<
2 3
>
b ~ l =
<
0 1 0 0>
h(l) -
J - <
0 0 1 0>
256
Mthode des lments finis
Elment 3
LOCE =
<
3 4>
bel) _
1 - <
0 0 1 0 >
h(J) -
J - <
0 0 0 1
>
Pour /a matrice assemble
b, -
<
1 1 1 0>
h
J
- <
0 1 1
1 >
b =h =
1 .
x x 0 0
x x x 0
[KI =
0 x x x
0 0 x x
La structure de bande de la matrice [K 1 est u ne caractristique importante
de la mthode des lments finis. Elle permet des conomies tant au
niveau du stockage de la matrice que de la rsolution du systme d'qua-
tions final. La largeur de bande b, de chaque ligne de [KI dpend de la
table LOCE de chaque lment, donc de la table de connectivit des
lments et par consquent de l'ordre de numrotation des nuds.
Bien que le nombre de termes non nuls de [KI reste constant, la largeur
de bande peut varier considrablement avec l'ordre de numrotation des
nuds.
EXEMPLE 4.16. Renumrotation des nuds de J'exemple 4.15.
2
,
2
,
X 0 0 x
0 x x x
0 x x 0
[KI =
x x 0 x
b=h=3.
La malrice [KI contient le mme nombre de termes non nuls que dans
J'exemple 4.15, par contre la largeur de bande est passe de 1 3.
Rgle pratique
Pour minimiser la largeur de bande, il faut minimiSer la diffrence
des numros des nuds appartenant un mme lment,
Prsentation matricielle de la mthode des lments finis 257
4.6.2 SYMTRIE
Dans de nombreux problmes ([ auto-adjoint) les matrices Ik] sont
symtriques: la matrice IK] l'est donc aussi:
Ku = KJJ '
Cette proprit permet galement des donomies importantes pour le
stockage et la rsolution du systme dquations.
4.6.3 MTHODES DE STOCKAGE
a) Matrice pleine non symtrique
Une matrice pleine, non symtrique, de dimensions (n x n). occupe n
2
nombres (ou mots) rels en mmoire dordinateur.
b) Matrice pleine symtrique'
il suffit de stocker le triangle suprieur de la matrice dans une table
VK. par exemple par colonnes descendantes
VK < Kil
. 1 J(J-1)
SI 2 + 1.
(4.34 )
J:;'/.
. n(n+1)
Il faut stocker 2 mots rels.
c) Matrice bande non symtrique
Nous stockons la matrice redresse dans une table rectangulaire VK
de dimensions n(2 b + 1)
,
,
l
,
-1
[, 1 '
,
VK:
Kil
,
J
0
'J
1-,-1
{
i 1
+b.
(4.35)
Il faut stocker n(2 b + 1) mots rels. incluant b(b + 1) valeurs nulles
inutiles.
258 Mthode des lments f inis
d) Matrice bande symtrique
Dans ce cas :
l
1
Vk :
'II
"
0
J
lb:,J
r = 1
KIJ -
VKIj si j=J-/+ 1
J 1 .
(4 . 36)
Il faut stocker n(b + 1) mots rels, incluant b(b + 1 )/2 valeurs nulles
inutiles.
e) Matrice ligne de ciel non symtrique
La mthode de stockage la plus efficace pour les matrices globales est
la mthode de la ligne de ciel . Elle consiste stocker les termes de [K]
par lignes et colonnes de longueurs variabl es. Nous choisissons d'utiliser
trois tables de stockage :
VKG D contient les termes diagonaux
VKGS contient les termes du triang le suprieur de [K] , organiss par
colonnes descendantes (sans les termes diagonaux)
VKGI contienl les termes du Iriangle infrieur de [K], organiss par
li gnes de gauche droile (sans les termes diagonaux).
Pour la malrice :
ligne de ciel
1
(4.37)
Prsentation matricielle de la mthode des lments linis 259
0 T'R;:': 0
0 0 0
.. --- ,
o K24 :, 9,.
o 22
0 0 0
[K] =
o 0 K"
+
0 0
K"
0 0
+
o 0 0 0'_______ 0
0 0 0
K44
0
0 0 o 0 0 0 0 0 0 K,
Termes placs Termes placs
dans VKGS dans VKGD
' 0 0 0 0 0
'----..
0 0
K2I
+
"0': K32 0 0 0
r---..1 ""
: r;;"-K
42
K43 0 0
---------... .........
o 0: K" 0
(4,38)
Termes placs
dans VKGI
VKGS
= < K
12
; K
23
; K
I4
K
24
K34 ;
K"
0 >
VKGI
=
< K
21
; KJ2; K
41
K
42 K43 ;
K"
0 > (4,39)
VKGD =
< KI,
K" K"
K44 K'H > .
La ligne de ciel est l'enveloppe des sommets des colonnes de
hauteurs variables, Elle est symtrique, par rapport la diagonale,
de l'enveloppe des extrmits gauches des lignes, que [K] soit symtrique
ou non, Elle est dfinie par la table des hauteurs des colonnes h
J
(4, 32b) ;
pour la matrice (4 . 37) :
h
J
= < 0 1 1 3 2 > . (4 . 40)
Les termes nuls de [K] extrieurs aux 2 enveloppes ne sont pas stocks ;
les termes nuls intrieurs sont stocks comme c'est le cas des termes
situs en positions (4,5) et (5,4) dans la matrice (4.37).
Pour dfinir la position d'un terme KI) dans les tables VKGS et VKGI,
nous utilisons la table de Localisation des Dbuts de colonnes
KLD, de dimension n + 1, dfinie par:
KLD (1) - 1 ; KLD (2) = 1
KLD (1) - KLD (1 - 1) + hJ(I - 1) 1 = 3, 4, .. " n + 1 ",
(4 . 41)
Dans le cas de (4 . 40)
KLD = < 1 1 2 3 6 8 > .
260 Mthode des lments finis
Alors un terme KIJ se trouve plac:
si 1 = J en VKG D (I)
-si I<J en VKGS(I) o I=KLD(J+1)-J+1 (4,42)
- si 1> J en VKGI (1) o 1= KLD (/+ 1) - 1+ J,
L'espace de stockage ncessaire est :
- pour VKG D : n mots rels
- pour VKGS ou VKGI : KLD (n + 1) - 1 mots rels
donc au total :
n + 2(KLD (n + 1) - 1) mots rels,
Ceci n'inclut aucune valeur inutile puisque les termes nuls situs sous
la ligne de ciel peuvent devenir non nuls au cours de la rsolution du
systme,
EXEMPLE 4,17, Stockage par ligne de ciel d'une matrice non symtrique,
La matrice [K] de l'exemple 4,16 est:
n = 4,
Dans ce cas
h
J
= < 0 0 1 3>
KLD = < 1 1 1 2 5>
VKGS =
< K"
K
L4
K
24
0>
VKGI - < K
32
K
4L
K
42
0>
VKGD =
< Kt!
K'2 K"
K44 >
D'aprs (4,42), le terme K
24
se trouve en
VKGS (1) o 1 = KLD (4 + 1) - 4 + 2 = 3,
L'espace requis est :
4 + 2(KLD (5) - 1) = 12 mots rels,
Prsentation matricielle de la mthode des lments finis 261
f) Matrice ligne de ciel symtrique
Le stockage est identique celui d'une matrice non symtrique pour la
diagonale et le triangle suprieur. La table VKGI n'est pas utilise, L'espace
de stockage ncessaire est :
n + KLD (n + 1) - 1 mots rels,
Remarquons que pour une matrice diagonale, il suffit de ne pas utiliser
la table VKGS, C'est souvent le cas pour les matrices masses,
g) Matrice ligne de ciel segmente sur disque
Lorsque la matrice [K] est trs volumineuse ou lorsque l'on utilise un
ordinateur de capacit rduite, il est ncessaire de dcomposer les tables
VKGS et VKGI en blocs qui sont stocks sur disque, Il suffit de conserver
en mmoire, un instant donn, un ou deux blocs de chacune des d,eux
tables,
La taille des blocs est dfinie par l'espace disponible dans la mmoire
de l'ordinateur, Chaque bloc contient un nombre entier de colonnes
(ou de lignes), variable d'un bloc l'autre, De plus il faut viter, si possible,
de placer dans des blocs diffrents des lignes (ou colonnes) correspondant
des degrs de libert d'un mme nud,
La table VKGD qui contient les termes diagonaux reste rsidente en
mmoire, Nous utilisons deux tables de pointeurs: la table KLD identique
celle des sections (e) et (f) prcdentes, et la table KEB qui dfinit
le numro' de la premire colonne ou ligne de chaque bloc;
elle a pour dimension' n, + 1 (n, est le nombre de blocs), et
KEB (n. + 1) = n + 1.
EXEMPLE 4.18. Segmentation d'une matrice,
Considrons la matrice ligne de ciel symtrique suivante:
---f-: 2 6 :
,_ - - 1
3:47: 15
,- --- '
5:8:10 16
,- - .'
9:11 17
1- ___ _
12 :13 18
'. - --
14 19 21
---..
Sym, 20: 22
.. - --
23
262
Mthode des lments finis
Si nous la segmentons en blocs de dimension 6, il faudra 4 blocs.
Les tables KLD et KEB s'criront
KLD = < 1 1 2. 3 6 8 9 14 16 >
KEB = < 1 5 7 8 9 > .
Les blocs successifs du triangle suprieur, stocks sur disque
contiendront les termes suivants de /a ligure ci-dessus
bloc 1
bloc 2
bloc 3
bloc 4
< 2 4 6
<101113
< 15 16 17
< 21 22 0
7 8 0 >
o 0 0 >
18 19
o 0
0>
o >
La table VKG 0 contient les termes suivants de la matrice ci-dessus:
VKG D = < 1 3 5 9 12 14 20 23 > .
Pour la matrice non symtrique de structure analogue suivante,
les tables KLD et KEB seraienl inchanges, ainsi que les blocs du
triangle suprieur :
:1 : 2 6
'i;':"3": 4 7 15
,---_.!_----
4' : 5 : 8 10 16
'._-_.!_-- -
6' 7' 8': 9 11 17
,
10' 18
13': 14: 19 21
- - - - - - - - - - - - - - - - - - - - - - - ! - - - - 1 - - - - ",
15' 16' 17' 18' 19', 20' 22
, ,
------------------------- -- --- -- --r----
21 ' 22', 23
,
Les blocs successifs du triangle infrieur, stocks sur disque,
contiendront :
bloc 1
<
2' 4' 6' 7' 8'
>
bloc 2
<
10' 11 ' 13'
>
bloc 3 <
15' 16' 17' 18' 19'
>
bloc 4 < 21' 22'
>
Dans tous les cas (matrice symtrique ou non symtrique, segmente
ou non), la diagonale est stocke dans la table:
VKG D = < 1 3 5 9 12 14 20 23 > .
Prsentation matricielle de la mthode des lments finis 263
4.7 Systme d'quations global
4 . 7 . ' EXPRESSION DU SYSTt:ME D'aUATIONS
Aprs assemblage, la forme intgrale globale s' crit (4 . 5b)
w = < bU. > ([K] { V. } - { F }} = 0 .
Le problme consiste trouver { V. } qui annule W pour tout < oV. > en
satisfaisant les conditions aux limites sur S, dfinies au paragraphe 3.3.2 :
Li = Lis et ou = O. Sous forme discrtise ces conditions s'crivent :
oV, = 0
Vi = U
f
pour tous les degrs de libert V, imposs dont la valeur est V,.
Donc le systme algbrique :
[K] { V. } = { F )
(4.448)
(4.44b)
(4 . 45)
doit tre rsolu en { V. ) aprs modification de la matrice [K] et du vecteur
{ F) pour tenir compte des conditions (4.44) .
4.7.2 INTRODUCTION DES CONDITIONS AUX LIMITES
Les conditions (4.44) peuvent tre introduites dans le systme (4.45)
de plusieurs manires :
a) Mthode du terme diagonal dominant
La matrice [K] est assemble sans tenir compte des conditions aux
limites ; puis chaque relation V, = VI est introduite en remplaant :
- Kil par K" + a, a tant un nombre trs grand par rapport tous les
termes K
j
) _
- FI par a VI
Kil KI. VI FI
KI. VI
= a VI (4 . 46)
K'I
V. F.
264 Mthode des lments finis
L'quation; s'crit
a V, + ( t Ku V
J
) = a Vi '
j'" 1
(4,47)
Elle admet la solution approche
En pratique dans les programmes, nous pouvons choisir a = la' ,Max 1 KI} 1
ou la", Max 1 K
ij
1 selon que l'ordinateur utilis a une prcision de 7 ou
15 chiffres dcimaux, Ceci conduit une erreur sur V, qui est du mme
ordre que la prcision de l'ordinateur,
Cette mthode est trs simple mettre en uvre car il suffit de changer
les 2 termes K" et F" mais elle peut poser des problmes lorsque la matrice
IK 1 est mal conditionne et lorsque certaines composantes de (V. 1
sont grandes, C'est cette mthode que nous adopterons au chapitre 6
pour le programme BBMEF,
b) Mthode du terme unit sur la diagonale
Elle consistell modifier, pour chaque relation Vi = V" le vecteur { F }
puis la matrice [K] :
K"
K, _t.I
0
K,,, .. ,
K"
Fj = Fj - K" Vi
Fi = V,
Ki) =
KJI
= a
Kif =
1
K"I _1
0
K" , .. ,
K' _I.I _1
0
K'_I.I.,
0 0
K1+1, 1_1
0
KI+ ", .,
0
1
j=I,2 . .. " n
j= 1,2, ... ,n j i
K"
U, F, - K" U
,
KI _
u,_, Fj _, - K,_I.I,
0 u,
-
[J,
KI t L_ U, .. 1 F
't1
- K,,, 1.1 ,
K,," U. F" - K", ,
(4,48)
Cette mthode ne pose pas les problmes numriques de la prcdente,
par contre elle est plus complexe programmer.
c) Mthode de suppression des quations
Elle consiste restructurer la matrice IKI de manire supprimer les
quations correspondant aux degrs de libert imposs Vi' Elle a l' avantage
Prsentation matricielle de la mthode des lments finis 265
de rduire le nombre d'inconnues du systme. Comme la restructuration
de (KI est une opration coteuse, il est prfrable de ne pas assembler
les quations inutiles. C' est cette technique Que nous adopterons au
chapitre 6 pour le programme M EF.
La restructuration de (KI et (F l correspondant Vi = V, conduit
l'quation (4.48) dans laquelle la ligne i et la colonne i sont supprimes,
EXEMPLE 4.19. Introduction de conditions aux /imites.
Le systme d'quations correspondant il l'exemple 4 , 16 s'crit :
Kil
0 0
K"
V,
0
K" K"
K14
V,
0
K" K"
0 V,
K"
K,. 0
K V.
La condition
V, = V, conduit aux 3
et ( F) suivantes .
terme diagonal dominant
Kil + 10" 0 0 K .. V,
V,
V,
V.
o K
Z2
K
2J
K
24
K" K" 0
K'4 0 K44
terme diagonal unit
1 0 0 0
o K" K" K"
o K" K" 0
o K14 0 K ..
suppression de l'quation
[
K" K"
K" K"
K14 0
4,7,3 RACTIONS
1
F,
F,
-
F,
F.
formes modifies
V,
F,
F,
10". V,
F,
F,
F.
F
4
- K
I4
VI
de (KI
V, - V"
Lorsque l'on impose la valeur d'un degr de libert V" le second membre
Fi de l'quation i devient une variable inconnue appele raction en
266 Mthode des lments finis
mcanique. Cette raction est calcule aprs rsolution du systme. par
l'quation :
,
Fi = L: Ki' V, .
(4 . 49)
,. 1
Une autre manire d'introduire les conditions aux limites consiste
inclure les ractions FI dans la liste des inconnues. L'quation (4 . 48)
devient :
K"
K.,l _'
0
KU+I K,.
v, F, -
Kil fi,
K. _
I
. Ki-L.l - l 0
Kr_I " L Ki_l," U'_I
Ft _ L
-
KI_I.I [J,
K"
Ku_ 1
-1
K
I
.
H
1 K,. F,
_.
-
Ku Ur
KI t 1,\ K'+l.l _ L
0
KI+l,I+! K, I , ~
U'+ I
FI t 1
-
KI+! 1 [J,
K"
K",, _, 0
Kft"" 1 K"
V. F. - K., V,
(4 . 50)
Nous pourrions rsoudre directement ce systme pour obtenir la
fois ( V, ) et les ractions. Il faut cependant remarquer que la matrice (4 . 50)
n'est pas symtrique, mme si [K] non modifie est symtrique.
4.7.4 TRANSFORMATION DES VARIABLES
Supposons qu'il soit ncessaire de transformer
et ( V,) de la manire suivante :
les variables < oV, >
( OU, ) = [R] ( oV; )
( V,) = [R] ( V; )
(4 . 51 )
o [R] est une matrice de transformation quelconque, ventuellement
rectangulaire. Reportons (4.51) dans la forme intgrale (4. 5b)
o
W = < OU; > ([K' ] ( V; ) - ( F' }) = 0
[K1 - [RF [K] [R]
( F' ) - [R l' ( F ) .
Une telle transformation peut tre utilise :
- pour changer de repre des variables nodales;
(4 . 52)
- pour exprimer une variable nodale en fonction d'autres variables.
ou plus gnralement pour introduire des relations linaires entre des
variables.
La transformation (4.52) des variables globales peut tre effectue
galement au niveau lmentaire; ceci permet en particulier d'utiliser
un repre local qui simplifie la construction de [k] et de ( f ).
Prsentation matricielle de la mthode des lments finis 267
EXEMPtE 4.20. Rotation des variables pour des lments de solide
deux dimensions.
Considrons un assemblage de deux lments dont les inconnues
nodales sont les composantes u, v du dplacement. Un changement
de' repre est ncessaire au nud 2 pour imposer que ce nud
glisse sur un plan inclin :
"
"
(l'
(2'
y
Le systme d'quations global s'crit
< VII > = < U
I
VI U
2
V
2
u) v) U
4
V
4
>
[K) {U,} = (F )
(8x8) (8x1).
La condition impose au nud 2 s'crit: v
1
= 0, o vi est la
composante de dplacement perpendiculaire au plan de glissement :
c = cos e
s = sin O.
La matrice de transformation de l'ensemble des variables s'crit:
1
[R) -
1
c
s
< u; > = < U
I
v.
-s
c
ui vi
1
1
1
1
U
3
v) U
4
V
4
>
Les matrices [K 1 et ( F' ) sont obtenues par (4.52). Il suffit alors
de rsoudre [Kl ( U; ) = ( F' ) avec la condition v; = o.
268
Mthode des lments finis
4.7.5 RelATIONS LINAIRES ENTRE LES VARIABLES
La transformation des variables (4 . 51) permet d'introduire des relations
linaires entre plusieurs variables :
(4.53)
Nous transformons les anciennes variables Vi. U" Vit, '" en Vi. U,. u. '"
par la matrice : .
i
i
1
1
. 1
[R] ~
_ a
j
1
(n x n)
a, a,
k
a,
.,
1
(4.54 )
1
en utilisant les relations (4 . 52) puis nous imposons la condition Vi ~ g.
La matrice [K] est modifie en deux tapes :
tape 1
[K"] ~ [K] [R]
colonne; de [K"] ~ .!. x colonne ide [K]
a,
colonne; de [K"] ~ colonne i de [K] - :l x colonne ide [K]
.,
colonne k de [K"] ~ colonne k de [K] - 8, x colonne; de [Kj .
. ,
(4.55)
autres colonnes de [K"] identiques aux colonnes correspondantes de [KI.
tape 2
[Kl ~ [R)' [K"] ~ [R)' [KI [R]
ligne; de (Kl ~ .!. x ligne i de [K"]
a,
ligne j de (K '] ~
a
ligne j de [K 1 - ~ x ligne ide [K"I
.,
8
ligne k de (K'] ~ ligne k de (Kl - ~ x ligne ide [K"] .
,
(4.56)
autres lignes de [Kl identiques aux lignes correspondantes de (K"].
Prsentation motricielle de la mMhode des M6ments finis 269
Le vecteur { F ] est aussi modifi,
(F'J = [R]T{FJ
Fi = .!. , F,
.,
F
' F a
J
j = J - 8
1
FI
F
' F a,
le = le - - Fi '
a,
(4.57)
autres termes de { F' J identiques aux termes correspondants de { F J.
EXEMPLE 4 . 18. Relations linaires entre d'un problme
une dimension.
Considrons l'assemblage de 2 lments suivant
u,
III
u
Le svstme d'quations global s'crit:
Pour imposer V, - V, = V;, u,(ijisons la transformation (4 . 54)
dans I.quelle a, = - 1, a
J
=, l, ., = 0 :
{
V, } { VI } ' [ 1
= [R] '. [R] = _
o 0]
, O.
-1
Alors d'aprs (4.55), (4.56), @t \4i ... :
270
Mthode des lments finis
La .relation (4.53) introduit un couplage entre les variables U,. U
I
U, ...
qui peut modifier la structure de la matrice [KJ. Pour viter de restructurer
[KJ. il faut tenir compte du couplage ds la cration de [KJ. c'est--dire
ds le calcul des hauteurs de bande partir des tables LOCE. Il suffit
de modifier les hauteurs de bande des colonnes i; 1. k pour ramener les
sommets de ces colonnes au niveau de la colonne la plus leve. Ceci
est illustr par les deux exemples suivants :
J
J
Ill!
"
. C'
1
n
, ,
, '
l '
, ,
, '
, ,
, .
. , , .
, .
1
q
Pour cela nous pouvons ajouter un lment virtuel pour chaque relation
(4.53) tel que:
LOCE = < i 1 k ... >
[kl = [OJ .
La transformation globale (4.55), (4.56), (4.57) peut aussi se faire
au niveau lmentaire. Il faut appliquer la transformation tous les
lments qui incluent la variable U" Si un lment e contient U, mais ne
contient pas les variables U
I
ou U" il faut cependant inclure ces dernires
dans la liste des variables de cet lment :
LOCE = < < LOCE'" >.1. k >
1
k
[k"'1
0 0
0 0
[kl =
0 0 6
(4 . 58)
0 0 0
La matrice de transformation au niveau lmentaire [rI est semblable
(4.54), mais ne transforme que les variables inclues dans LOCE (voir
exemple ci-dessous). Grce la modification effectue sur LOCE, la
matrice [KI aura automatiquement la structure voulue.
Prsentation matricielle de la mthode des lments tinis 271
EXEMPLE 4.22. Prise en compte des relations linaires au niveau
lmentaire.
Dans l'exemple 4 . 21, les tables de localisation sont:
LOCE'" < 1 2 > LOCE'" < 2 3 >
L'lment virtuel 3 destin il prendre en compte V, - V, = V;
est dtini par :
LOCE'" < 1 3 > .
Seul l'lment 2 contient la variable V,; par contre il ne contient
pas V,; il taut donc /'inclure :
LOCE(2) < 2 3; 1 >
l {t(2'} } .
La transformation lmentaire est :
2 3 1
------------
0
[rI -1 [k(2)'1 [rI' [k'''1 [r]; { t'l)' } [rI' ( t'" )
0
[ kIl
-k
12
kil ] { t,}
Ik(2'1 = -k
21
k"
-k" ; (t(2',) .
k"
-k
22 k" - t,
Les matrices [K1 et (F') de l'exemple (4.21) sont ensuite obtenues
par assemblage standard de [k"'1 avec [k" et de ( t'''') avec
{ t") }.
4,8 Exemple d'application : quation de Poisson
Considrons le problme dj tudi dans l'exemple 3.17 : rsolvons
par lments finis l'quation
02U oZU
ax' ay'
272
Mthode des lments finis
dfinie sur un carr de ct 2, et associe aux conditions aux limites
u = sur les 4 cts du carr.
,
, ,,0
.
-,
,
,
'0 ,'0
-,
,'0
Ces quations peuvent correspondre un problme d'quilibre ther-
mique ou d'quilibre de membrane. La forme intgrale lmentaire a t
obtenue dans l'exemple 4.1 et peut s'crire:
W' = Iv. < o(au) > {au 1 dV - f.,. ou fv
dV
< o(au) > = < o ~ ~ ) o ~ ~ ) >
< au>
au
=<-
Jx
au
ay>'
Pour obtenir une solution par la mthode des lments finis. effectuons les
oprations suivantes :
8) Choix du maillage
Nous utilisons l'lment triangulaire 3 nuds dcrit au para-
graphe 4.3.1. Compte tenu des symtries, nous choisissons le maillage
suivant correspondant un huitime du domaine:
,
4
'N'--..t
,
La table des coordonnes est:
Nuds 1 2 3 4 5 6
CORG
x
0,5 0,5 1,0 1,0 1,0
Y
0 0,5
1,0 0,5 0
Prsentation matricielle de la mthode des lments (i"is 273
La table de connectivit est:
Elments 1 2 3 4
nud 1 3 5 2 6
CONEC nud 2 2
4
3 5
nud 3
1 2 5 3
b) Conditions aux limites
V. = Vs = V. = 0 ,
c) Sollicitations
Nous pouvons supposer Iv = constante sur tout le domaine, ce qui cor-
respond par exemple :
pour un problme d'quilibre de membrane une pression transver-
sale rpartie de valeur constante
- pour un problme d'quil ibre thermique une source de chaleur
rpartie de valeur constante.
d) Matrices et vecteurs lmentaires
Toutes les matrices [k) sont identiques la matrice (4,19) avec d = 1,
car nous avons choisi le premier nud de chaque triangle au sommet de
l'angle droit comme dans le paragraphe 4 , 3 , 1,
1 [ 2
[k) = '2 - 1
- 1
-1 -1]
1 0 ,
o 1
Par ailleurs d'aprs (4 , 21) :
( ( ) = ~ { ~ }
e) Assemblag e'
L'assemblage des 4 matrices [k) et l'utilisation des conditions aux limites
condui sent au systme final :
274 Mthode des lments finis
D'o aprs rsolution:
30
V, = 96 fv = 0,3125 fv
17
V, = 96 fv = 0,187 5 fv
22
V, = 96 Iv = 0,2292 fv
Considrons le cas d'une sollicitation concentre au nud " de valeur
f
c
' Ceci correspond:
- pour un problme d'quilibre de membrane une force concentre
au nud 1
- pour un problme d'quilibre thermique une source de chaleur
concentre au nud 1.
La matrice du systme reste inchange, par contre le vecteur second
membre devient :
( F) =
La solution correspondante est :
Forme intgrale
V, = 3,0 fe
V, = 0,5 fe
V, = 1,0 fe.
RSULTATS IMPORTANTS
' ..
W = LW' = 0,
,-1
Forme intgrale lmentaire discrtise:
W' = < ou, > ([k] ( u, ) - ( f ) ) ,
Forme intgrale globale discrti se :
W = < liV, > ([K] ( V, ) - ( F)) = 0 .
(4 . 2a)
(4.4)
(4. 5b)
Prsentation matricielle de la mthode des lments finis 275
Matrice masse lmentaire :
lm] f {N) < N > dV .
v.
(4.6b)
Matrice lmentaire (ou rigidit)
Ik] L.IB.)' ID] (B] dV (voir aussi 4 . 16a) .
(4.10b)
Vecteur lmentaire des sollicitations:
{ f) L. {N) f
y
dV + t. {N) fsdS (voir aussi 4.16b). (4.10c)
/
Transformation de la matrice lB] :
lB] lo]IB,].
(4.12)
Rgle d'assemblage :
1 LOCE (i)
J LOCE (i) .
(4 . 29a)
Transformation des variables:
b,h
lB]
lB,]
IBj]
ID
e
{f)
{ F }
{P}
Ik]
IK]
IK1
(m]
[K'] = (R)' (K] (R] { F' } [R]' { F} . (4.52)
NOTATIONS
largeur et hauteur de bande de (K]
matrice reliant les gradients en x aux variables nodales
matrice reliant les variations des gradients aux variations des
variables nodales
matrice reliant les gradients en aux variables nodales
matrice des proprits physiques
indice d'un lment
vecteur lmentaire des sollicitations (ou second membre ou
forces quivalentes)
vecteur global des sollicitations
vecteur lmentaire tendu
matrice lmentaire (ou rigidit) d'un lment
matrice globale
matrice lmentaire tendue
matrice masse d'un lment
276
n,
n"
[Q)
[T), [R), [rI
{ u, }
{ U, }
W
W'
{ bu, }
{bU, }
e" W,.
Mthode des lments finis
nombre de nuds total
nombre de.blocs d'une matrice globale segmente sur disque
nombre de degrs de libert total
nombre de degrs de libert par lment
nombre de degrs de libert par nud
nombre de nuds par lment
nombre d'lments total
matrice de transformation des gradients
matrices de transformation des variables nodales
variables nodales d'un lment
ensemble de toutes les variables nodales
forme intgrale globale
forme intgrale lmentaire
variation des variables nodales d'un lment
variation de l'ensemble des variables nodales
coordonnes et poids des points d'intgration numrique.
RIFIRENCES
11J B. M. IRONS and A. A. RAZZAQUE, Experience with the Patch Test , in M8rhemstcal
Foundations of the Finite Element Method, pp. 557587, Academie Press, 1972.
12) G. STRANG and G. FIX. An Analvsis 01 Finite Element Method. Prentice HIIII. 1973.
(3) K. WASHIZU. Vaflalion81 Methods in EJaslicily and Plasticity, Second dition. Perga-
mon Press, 1975. .
CHAPITRE 5
Mthodes numriques
5,0 Introduction
La mise en uvre effective de la mthode des lments finis dcrite
dans les chapitres prcdents ncessite l'utilisation de mthodes num,
riques varies pour construire' les matrices lmentaires et rsoudre les
systmes d'quations algbriques qui en rsultent (fig, 5,1), Ce chapitre
regroupe les descriptions des diverses mthodes numriques couramment
employes, sans pour autant faire une prsentation complte de toutes
les mthodes disponibles,
Nous prsentons tout d'abord les mthodes d'intgration numrique
qui permettent de construire les matrices et vecteurs lmentaires par
intgration sur l'lment de rfrence, Des formules d'intgration num,
rique sont propOS"es pour des domaines varis une, deux et
trois dimensions.
Le second paragraphe est consacr la rsolution de systmes linaires,
La mthode d'limination de Gauss et les techniques de dcomposition
correspondantes sont ensuite dcrites puis adaptes aux matrices stockes
par la technique de la ligne de ciel ,
Les mthodes de substitution et de Newton -Raphson permettent
de ramener la rsolution de systmes d'quations non linaires la rso,
lution de systmes d'quations linaires, '
Puis nous dcrivons les mthodes de rsolution des problmes non
stationnaires du premier et du second ordre, Celles-ci, grce une
discrtisation par rapport au temps, ramnent la rsolution d'un systme
non stationnaire la rsolution d'un systme' stationnaire, linaire ou non
linaire, dans chaque intervalle de temps,
Enfin le dernier paragraphe est consacr au calcul des valeurs et
vecteurs propres par des mthodes itratives telles que les mthodes
de l'itration inverse et du sous-espace,
278
Problme
non stationnaire
Mthode des lments finis
Systme
physique
Problme
stationnaire
Discrtisation
par rapport
(pour un pas de temps)
au temps
(paragraphe 5 .4)
Problme
non linaire
Problme
linaire
,- - -
1
_ __ J
'Problme
de, valeurs
propres
(linaire)
Rsolution
de systmes
non linaires
itrations 1 Construction do (k), { , } ... 1 itrations
Calcul des
valeurs et
vecteurs propres
(paragraphe 5.5)
(paragraphe 5.3
1 Intgration 1
1 numrique 1
(paragraphe 5 ,1) 1
1 1
1 Assemblage 1
1 Rsolution de 1
1 systmes linaires 1
1 (paragraphe 5 . 2) 1
1 1
-----,-----
Figure 5.1. Mthodes numriques utilises dans la mthode des
lments finis.
5.1 Intgration numrique
5.1.1 INTRODUCTION
Dans la mthode des lments finis, la matrice lmentaire [k] et le
vecteur des sollicitations lmentaires (f) s'expriment sous forme
d'intgrales une, deux ou trois dimensions (4.10b) (4,10c), dfinies
sur l'lment rel V :
[k] = L [B,Y [0) [B] dV
{ f } = f {N} f v d V + f {N} fs dS .
V Si
(5 . 18)
-'
Mthodes numriques 279
Sur l'lment de rfrence, ces inlgrales deviennent (4 . 16a) (4 . 16b) :
[kl = L [B,(!;' [D()] [B()] det (J( dV'
{ f} = L { N() } f
y
det (J()} dV' + Li { N(!;s) } fs dS
(5 . 1b)
o : v' est le volume de l'lment de rfrence
Sr est la partie de la frontire de l'lment de rfrence sur laquelle est
applique la sollicitation fs
s reprsente les coordonnes sur le contour SI
dS = Jsds, ds, est explicit au paragraphe 4.2 . 3 . 4
[J] est la matrice jacobienne de la transformation gomtrique (1 .5.2).
soit encore :
[kl = L Wl dV'
{ f} = f {f:} dV' + f {ft} dS
SI
(5.2)
o : [k*] = [B,(' [D(!;)] [B()] det (J()}
{ f: } = { N() } fv det (J()}
{ ft ) = { N(!;s) ) fs.
Les termes de [k*I, { f: } et { ft } sont des polynmes ou des fractions
rationnelles compliqus. Leur intgration explicite n'est facile que s'ils
sont constitus de termes polynmiaux. Nous prsentons ci-dessous les
intgrales explicites des monmes sur les lments de rfrence classiques :
Une dimension
Deux dimensions
Elment de rfrence carr
4
si i est impair
si j est pair.
f
' fi {O
- , -, U+l)(j+l}
si i ou j est impair
si i et j sont pairs.
(5 . 3a)
(5 . 3b)
280 Mthode des lments finis
Elment de rfrence triangulaire :
J
' f' -"
1 . 1
O 0
e IJi d '1 = -;-c--,'-'.;. ' -,'-',;",
(i + j + 2) 1 .
(5.3e)
Trois dimensions
Elment de rfrence cubique
f
' J' f'
{' 'II r: d{ d'l d =
-1 - 1 - 1
si i ou i ou k est impair .
- {
(i + 1) (j + 1) (k + 1)
si i et i et k sont pairs. (5. 3d)
Elment de rfrence ttradrique :
f
'J'-'f'-<-' ' 1 ' Ikl
{' ql r: de do, d{ = ( ' ' . ' k 3) l'
00 0 1+/+ +
(5.3e)
Il est en gnral prfrable d'utiliser une intgration numrique de (5.2)
de la forme:
,
[k] = L w,[k*(;,)]
l "" 1
, (5.4)
( f J = L w,( ft(;,) J
i '" 1
o : {, sont les coordonnes des r points d'intgration
w, sont les coefficients de pondration (ou poids) correspondants.
Pour les lments compliqus, en particulier curvilignes, l'intgration
numrique (5.4) ne donne qu'une expression approche de (k] et { f J.
5.1.2 A UNE DIMENSION [1, 2, 3]
5,1,2,1 Mthode de Gauss
La mthode de Gauss est une mthode d'intgration numrique trs
utilise dans laquelle les r coefficients w, et les, abscisses 1;, sont dter-
mins de manire intgrer exactement des polynmes d'ordre
Mthodes numriques 281
Remplaons l'intgrale d'une fonction polynomiale y() par une
combinaison linaire de ses valeurs aux points d'intgration j :
L, y() d = w, y(,) + w, y(,) + ... + w, y(';,) + ... + w, y(,)
,
= Lw,y(';,). (5.5)
i '" 1
Dterminons les 2 , coefficients de manire ce que (5.5) soit vrifie
exactement pour le polynme suivant :
Portons cette expression dans (5.5) :
a, f' d'+a, f' .; d + ... + a" f' "-' d=a,(w,+w, + ... + w,)+
-1 -1 -1
+ B
2
(W, 1 + w
2
+ ... + + ... +
+ a (w t:Zr-1 + W + ... + w <::2r-')
2r 11,\ 2':02 , ... ,
(5.6)
Pour que (5.6) soit identiquement vrifie pour tout a,. a, . .... a,,,
il faut
a = 0, 2, 4, .. ., 2 , - 2
f
i <'f d; = 0 =
-,
,
L w,f
j "" 1
(5.7)
a - 1, 3, 5, .. ., 2 , - 1 .
Soit
2
-
w,
+
w,
+
...
+
w,
0=
w, .;,
+
w, ,
+
... +
,
w, c",
2
w, f w
2
i
W, ;
3-
+ +
...
+
0= w,
y' - 1
+
W .l:2r- t
,,,
+
... +
W t2r-1
, "
Ce systme de 2, quations est linaire en w, et non linaire en e,;
il dtermine les 2 , paramtres de (5.5) sous les conditions:
. w, > O} .
1
' 1 1 = 1, 2, .. ., , ..
- < Si <
282 Mthode des lments finis
EXEMPLE 5.1. Calcul des coefficients de la mthode de Gauss
deux points.
Dans ce cas , = 2: l'exp,ession (5.5) s'crit :
r, y() d = w, y(,) + w, y(,) .
Pour que cette approximation soit exacte pour un polyn6me de
deg, 2 , - 1 = 3. il faut que les ,elations (5.7) soient satisfaites:
2 = w
1
+ w]
o = W, ~ I + w
1
i
2 1:2 ~ l
3'= W I ~ I + W l ~
o = w, l + w, ~ .
La solution de ce systme est :
1
w, = w, = 1: , = - , = fi'
Les abscisses ;. solutions de (5 . 7) sont aussi les racines du polynme
de Legendre d'ordre, (voir Davis et Rabinowitz [1), page 88) :
P,() = 0
dfini par la formule de rcurrence:
Po(} = 1
P, (0 =
2k-1 k-1
p,m = k P,-,W - k P, - ,W: k=2.3, .... ,.
Les poids w, s'crivent :
i = 1. 2 .... , , .
L'erreur d'intgration est de la forme :
2"+'(,1)4 d"y
e = "'(2;-'-'+=---;17) 7["';(2-,7) ""'1]'" d.2'
(5.8)
(5.9a)
(5.9b)
Mthodes numriques 283
EXEMPLE 5.2. Calcul des coefficients de la mthode de Gauss
deux points (polynmes de Legendre).
Retrouvons les valeurs de :; et Wj obtenues dans l'exemple 5.1 en
utilisant le polynme de Legendre d'ordre 2. Dans le cas Ou r = 2,
les polynmes (5 .8) sont:
Po = 1
P
- ,
1 - ,
P, = ~ '
Les racines de P2 - 0 sont
Les poids sont, d'aprs (5. 9a) :
1
2'
Intgrons par la mthode de Gauss 2 points le polynme
y= 1 +.;' + ';' +';4 :
(
1 1 1 )
I. pp = 1 + - + J- + - +
3 3 3 9
L'erreur d'intgration est, d'aprs (5. 9b) :
En effet :
1 d'y 1 8
e = 135 d';4 = 135 ' 24 = 45 .
1
130 _
138
1
45 45
La figure 5 .2 donne les coefficients Wf et ~ pour des intgrations
1, 2, .... 7 points {3J . Les abscisses .;, sont symtriques par rapport
.; = 0; les poids w, correspondant 2 points symtriques sont gaux.
,
1;, w, Erreur
1 d
2
y
1 0 2
6 d'
2 0,5773502691 89626( 1/)3) 1
d
4
y
::::: 0,7 x 10-
2
-u
d,
0 0,888888888888889(8/9)
-4 d
6
y
3
0,7745966692 41483( j3i5)
'" 0,6 x 10 dl;'
0,555555555555556(5/9)
0,33998 10435 84856 (
J3-2/6/5)
+
2 6 6/5. dB
4
0,86113 63115 94053 (
'" 0,3 x 10-' J.
. Cl) 0,3478548451 37454 - - .j6i5
2 6 6/5
J
' ,
_, y(') = ,f:, w, y(',)
Figure 5,2, Intgration numrique de Gauss une dimension.
4
Degr
maximum
des
polynmes
intgrs
exactement
1
3
5
7
'"
Q:)
...
r , w,
0
0.568888888888889(128/225)
5
0.538469310105683 ( 0.478628670499366 C 61 +
. 450 180 5/14
0.906179845938664 ( P.23692 68850 561 89 C 61 -
450 180 5/14
0.23861 9186083197 0.46791 3934572691
6 0.66120 93864 66265 0.36076 1 5730 48139
0.93246 9514203152 0.171324492379170
0 0.417959183673469
7
0.405845151377397 0.381830050505119
0.741531185599394 0.279705391489277
0.94910 79123 42759 0.129484966168870
Figure 5.2 (Suite).
Erreur
d'Oy
::::::0.8 x 1
d"
1510-" y
::::: . x d';12
d"
-21 10-" y
- . x d';'4
Degr
maximum
des
polynmes
intgrs
exactement
9
11
13
'"
00
'"
286
Mthode des lments finis
EXEMPLE 5.3. Intgration de [k) et 1 f } par la mthode de Gauss
une dimension.
Utilisons la mthode de Gauss 2 points pour intgre; les
expressions (5 . 1 b) :
[k) '" [B,(,))' flD).w,.det +
+ [B,I';,)]' [[D).w,.det
1 f y ) '" 1 (w,,ty .det +
+ ) (w,,ty.det
o:
.:, = - .;, = fi; w, = w, = 1 .
II est galement possible de construire des mthodes d'intgration
numrique qui font intervenir une fonction de pondration p() :
f
' ,
plO y({) d'; = 1:: w, Y(';,) .
- 1 1 1
(5 . 10a)
Par exemple la mthode de Gauss-Jacobi correspond
= ( 1 - . (5.10b)
1
En choisissant sous la forme (t t )GI ' nous pouvons ainsi
'- - 1,,0
construire des mthodes adaptes l'intgration de fonctions singulires
au point o-
5.1.2.2 Mthode de Newton-Cotes [1. 2J
Si nous fixons a priori les abscisses des points d'intgration, il reste
, coeffiCients w, . .... w, dterminer de manire ce que (5 . 5) intgre
exactement un poly.nme de degr r - 1. Dans la mthode de
Newton- Cotes les points r sont rgulirement espacs et symtriques
par rapport = 0 :
'. = 2 i - 1 _ 1
1, . r 1
(5 . 118)
Pour calculer les coefficients w,. reprsentons y() par un polynme
de Lagrange de degr r - 1 qui prend les valeurs y(';,) aux r points
' Mthodes numriques 287
d'intgration Les fonctions d'interpolation de Lagrange Niant t
obtenues au paragraphe 2,2,2,3
,
L N,(O y(,)
(5 , 11b)
i = 1
Alors:
f
' y(t,) t (f' N,(t,) y(t,,) t w, y(U '
- 1 / - 1 _1
Les poids w, sont donc les intgrales des fonctions d'interpolation de
Lagrange Ni :
w, f' N,({,) dt, ,
-,
(5 , 11c)
Les poids correspondant deux points symtriques par rapport 0
sont gaux. '
L'erreur d'intgration est de la forme:
e
(
2 )'" d'+ty
C'r_1 d'+'
C ( 2 )'" d'y
r r _ 1 d'
si r est impair
(5,12)
e si , est pair.
Il est donc prfrable d' utiliser un nombre de points d'intgration impair,
Le coefficient Cr peut se calculer en intgrant "erreur d'approximation
de l'interpolation de Lagrange donne par (1,68),
La figure 5,3 prsente les coefficients de la mthode de NewtonCotes
pour 2, 3, "" 7 et 9 points,
Pour un nombre de points d'intgration donn, le degr maximum des
polynmes intgrs exactement par la mthode de Newton- Cotes est
'bien infrieur celui obtenu par la mthode de Gauss (voir les comparaisons
faites sur la figure 5,4), Cependant la premire mthode permet parfois
de faire concider les points d'intgration et les nuds d'interpolation,
L'intgration de termes contenant les fonctions d'interpolation N, est
alors simplifie puisque N, s'annule en tous les points d'intgration
autres que Cette technique peut tre utilise pour les matrices
masses :
[ml f (N) < N > d V
v'
et pour les vecteurs des sollicitations :
288
2
3
4
5
6
7
9
1
o
1
1/3
+ 1
o
1/2
1
+ 1/5
3/5
+ 1
o
1/3
2/3
1
o
1/4
1/2
3/4
1
Mthode des lments finis
w,
1
4/3
1/3
3/4
1/4
12/45
32/45
7/45
50(144
75(144
19/144
272/420
27/420
216/420
41/420
- 4540(14 175
10496/14 175
- 928(14175
5888(14175
989/14175
Erreur
1 d'y
6 d'
1 d
4
y
90 d4
06 10
-,d6y
,x d
6
3,7
32 10
-,d'y
,x d'
dlO
__ y
, dlo
f
i ,
_1 y() d = w, He,)
Degr
maximum
des polynmes
intgrs
exactement
1
3
3
5
5
7
9
Figure 5,3, Intgration numrique de Newton-Cotes une dimension.
Mthodes numriques 289
Newton-Cotes Gauss
d'i ntgration
r 2 3
4 5 1 2 3
4 5
MonO- Intgrale
m exacte
f l , d{- 2
-
, ,
1
:?
2 2 2
. : 2
2 2 2 2
- . , ,
0
:0
. 0 0
0
'0
0 0 0
0
,
,
' 2/3
' .. -
2 : 2/3 2/3 2/3
'-6 -: 2/3
2/3 2/3 2/3
,
,
' 0 0
' 0 0
0 o ' 0 0
0 0
,------------.-
. '--_.-
{' 2/5 2
2/3 14/27
,
2/5 0 2/9 : 2/ 5 2/5 2/5
,
, ,
' 0 0 0 0
,
0 0 0
,
0 0 0 , ,
' 2/7 2 2/3
-------
122/243 1/3 0 2/27
--s/if; : 2/7
,
2/7
Figure 5,4, Comparaison des intgrations numriques des monmes
une dimension, entre - 1 et 1, par les mthodes de
Newton-Cotes et de Gauss,
Remarques
Les mthodes d'intgration numrique ont t prsentes pour l'lment
de rfrence, Il est facile de les transposer sur l'lment rel en
utilisant (1,44)
r y(x) dx = x, ; x, L y() d
(5. 13)
o :
1 -
x = 2 Xl
1 +
+ 2 x"
La mthode de Gauss r points intgre exactement un polynme d'ordre
2 r - l , La mthode de Newton-Cotes r points intgre exactement un
polynme d'ordre r - 1, Dans la pratique nous sommes amens intgrer
des polynmes d'ordre lev ou des fonctions non polynomiales (fractions
rationnelles). Par les mthodes prcdentes, nous obtenons alors une
intgration approximative d'autant plus prcise que le nombre de points
d'intgration est lev.
290
Mthode des lments finis
EXEMPLE 5.4. Intgration d'une fonction non polynomiale par les
mthodes de Gauss et de Newton.
La valeur exacte de
est
1 =f'
_, 1
1 d'
+,:' '
n
1 = 2: ~ 1,5708.
Les mthodes de Gauss et Newton-Cotes donnent les valeurs
suivantes de 1 :
Nombre
Gauss Newton- Cotes
de
points valeur
erreur
valeur
erreur
relative relative
1 2 27 % 2 27%
2 1,5 4,5 % 1 36%
3 1,583 3 0,8 % .1,666 6 6%
4 1,5686 0,1 % 1,6 2%
Plutt que d'utiliser une mthode d'intgration nombre de points
d'intgration important, nous pouvons dcouper le domaine d'intgration
en plusieurs sous-domaines; nous utilisons ensuite une mthode d'int-
gration simple dans chaque sous-domaine. Cette technique est surtout
utile pour des fonctions y() continues par sous-rgion.
5.1.3 INTGRATION NUMRIQUE A DEUX DIMENSIONS
[1, 2]
a) Mthodes produit
Elles consistent utiliser dans chaque direction et ~ une intgration
numrique une dimension. Si nous utilisons'l points dans le sens et '2
points dans le s e n s ~ la mthode de Gauss intgre exactement le produit
d'un polynme en d'ordre 2 r, - 1 et d'un polynme en ~ . d'ordre
2 r, - 1.
Mthodes numriques 291
La mthode produit utilise r = r, . r, points ; elle intgre tous les
monmes
tri te ls que O.:s;; i :::;; 2" - 1
0 :::;; i 2'2 - 1 .
b) Mthodes directes
Il est possible galement d'tendre directement deux dimensions les
mthodes du paragraphe 5.1 .2 :
f {,v (1;, dl; = ,t, w, y( " .
(5.14 )
Nous pouvons en particulier construire des mthodes de type Gauss qui
intgrent exactement tous les monmes d'ordre m :
'i 1Jj tels que i + i m .
De tell es mthodes utilisent souvent moins de points que les mthodes
produit. Ell es sont prsentes en dtail par Stroud (2].
Pour les lments de rfrence carrs, les mthodes produit sont les
plus souvent utilises, alors que pour les lments triangulaires les mthodes
directes sont plus courantes.
5.1 . 3.' Elment de rfrence carr
La mthode produit) s'exprime :
f f y(, dl; = J, J. w, w) y(e"
(5.15)
o: w" w,sont les coefficients donns sur les figures 5.2 (Gauss) ou 5.3
(Newton-Cotes)
sont les coordonnes des points d'intgration correspondants.
La figure 5.5 prsente quelques formules bases sur la mthode directe.
EXEMPLE 5 . 5. Intgration de [k) par la mthode de Gauss deux
dimensions et organisation des calculs.
Utilisons la mthode produit de Gauss r = 2 x 2 points pour
intgrer l'expression (5 . 1 b) de (k) :
(k) '" [ B, (e, '1,)y [(O).w,.w, ,det (J(, [B( , +
+ [B,,,, (J(, [B(e, +
+ [B,(e, [[0). w" w, ,det (J(e, [B(e, +
+ [ B, (e, [(0). w,. w, .det (J( , 'l,))] [B(';,
292
Mthode des lments finis
o:
1
- ~ , = fi'
Remarquons que, pour une raison d'efficacit, il est prfrable de
multiplier la matrice [0] par le scalaire w, w; det (J), plutt que de
multiplier [B,V [0] [B] par ce scalaire. En effet [0] est de dimensions
plus faibles que [k].
Considrons un lment 8 nuds correspondant l'quation
de Laplace. [B] est de dimensions 2 x 8, et [0] est de dimensions
2 x 2 et symtrique. Alors pour chaque point d'intgration il faut
un nombre de multiplications gal :
2 pour
c = w, . w, . det (J)
+ 3 pour
[O. c]
+ 32 pour [D .c][B]
+72 pour
[Br' ([D, c] [B]) (symtrique)
109 au Total
Pour 4 points d'intgration il faut donc 4 x 109 = 436 multiplica-
tions, sans tenir compte de la construction de [B], [0] et det (J).
Ce nombre d'oprations peut tre rduit si l'on tient compte des zros
prsents dans [B] et [0].
De plus, la matrice [0] tant dfinie positive, nous pouvons la
dcomposer en triangles suprieur et infrieur (5.38) :
[0] = [L] [LV
puis calculer:
([LV [B))' ([LV [B]) .
Ceci diminue encore le nombre d'oprations ncessaires.
. ~
Mthodes numriques 293
Ordre Nombre Coordonnes Poids
m de points,
"
tl i w,
,
.2
2 3
fia
0 4/3
,
1
+ _1_
4/3 --
.' fi
-.fi
,
.2
2 3 1 1 4/7
-5/9 2/9 27/14
.'
1/3 -2/3 3/2
.
.2
,.
3 4
(Mthode produit 1 1
1
2 x 2 points)
+- +-
.,
4.
-fi -fi
,
3 4 1 0 2/3
2
,
1
0
+- 4/3
4 -.fi
,
2
,
3 4
fii3
0
0
fia
1
4
.f 1 fi d!; '" t w, y(!;" .
- 1 - 1 f"" 1
Formules intgrant exactement des polynmes d'ordre m (incluant
des mOnmes 1;' tels que i + j'; ml.
Figure 5,5, Formules directes d'intgration sur Un carr.
294
Mthode des lments finis
Ordre Nombre Coordonnes
m
de points,
"
2
"
5 7 0
,
0
.'
,
'.
) 3/5
5 7 0
- ,
+ ,
"
"
+s
- s
., ,
+ t
4'
- t
.'
.'
,
fi5
s =
J7 + )24
15
t
l-fo
15
Figure 5 , 5, (Suite) .
5,1,3,2 Elment de rfrence triangulaire
a) Mthode de Gauss-Radau [4J
0
) 14/16
) 3/5
0
- ,
+ ,
- t
+ t
-s
+ s
'" 0,683
'" 0,89
'" 0,374
La mthode produit consiste transformer tout d'abord
sur le triangle:
f
I r
'
-'
1 = 0 Jo 'y(t ii) di; de
Poids
w,
8/7
20/63
20/36
8/7
fl00/168
} 20/48
l'intgrale
(5.16)
en une intgrale sur un carr (5.15) par un changement des variables.
Utilisons la transformation gomtrique qui transforme les points
de l'lment carr en les points ii) de l'lment triangulaire :
1
1
-1
-1
>
{
,
1
'i
o
= < N > ( il, )
Mthodes numriques 295
o
< , > - < 0 1 1 0 >
< t7n >
<0001>.
< N > sont les fonctions donnes dans l'exemple (1.16).
Soit:
- 1 +
= .
. 2
_ 1 - 1
= 2 2
= = 1"2 (5.17)
L'intgrale (5.16) devient:
1 1
1 = ; f (1 - ) f y(;:(). i(, dl; .
- 1 -1
Intgrons numriquement en par la mthode de Gauss:
1 = fi (1 - 1;) y(ZW, ii(I;, dl; .
- 1 j "" 1
(5.18)
Intgrons maintenant en par la mthode de Gauss-Jacobi (5.1 Ob)
dont les poids sont wi et les abscisses des points d'intgration sont ; :
(5.19)
Cette mthode, dite de Gauss-Radau, est peu utilise car ses points
d'intgration ne sont pas localiss de manire respecter les symtries du
triangle. Par contre elle peut tre efficace lorsque les variations de
sont trs fortes au voisinage du nud A du triangle.
,
La figure 5.6 donne les poids et coordonnes des points d'intgration
de la mthode de Gauss-Radau.
296 Mthode des lments finis
Ordre
Nombre
d';nt-
de points RI WI SJ AJ
gration
en i ou tJ}
r x r
1 1 x 1 0,5 1,0 0,3333333333 0,75
3 2 x 2 0,2113248654 0,5 0,1550510257 0,3764030627
0,7886751346 0,5 0,6449489743 0,5124858262
5 3 x 3 0,1127016654 0,2777777778 0,0885879595 0,2204622112
0,5 0,4444444444 0,4094668644 0,3881934688
0,8872983346 0,2777777778 0,7876594618 0,3288443200
7 4 x 4 0,0694318442 0,1 739274226 0,0571041961 0,1437135608
0,3300094782 0,3260725774 0,2768430136 0,2813560151
0,6699905218 0,3260725774 0,5835904324 0,3118265230
0,9305681558 0,173927 4226 0,8602401357 0,2231039011
9 5 x 5 0,0469100770 0,11 84634425 0,0398098571 0,1 007941926
0,2307653449 0,2393143353 0,1980134179 0,2084506672
0,5 0,2844444444 0,4379748102 0,2604633916
0,7692346551 0,2393143353 0,6954642734 0,2426935942
0,9530899230 0,11 84634425 0,9014649142 0,1598203766
r f' , , V(, ry) dry d = L L WJ(j) , WI(i) , V(j' ry/j)
00 }""II"'1
o :
WJ(j) = AJ(j) (1 - SJ(j))
j = SJ(j)
ry" = RI(i) (1 - SJ(j)) ,
RI et WI sont les coefficients de l'intgration numrique de Gauss sur
l'intervalle (0, 1) :
r '
o V() d = J, WI(i) y(R/(i) ,
Figure 5,6, Formules Produit d'intgration sur un triangle (Gauss-
Radau),
h) Mthode directe [2,5]
La figure 5,7 donne des formules d'ordre m = 1,2, ... , 6 qui intgrent
exactement des monmes i Il' pour lesquels i + j m. Ces formules
sont souvent dites formules de Hammer .
Mrhodes numriques
297
Ordre Nombre
Coordonnos
Poids
m de points (
{,
q,
w,
~
1 1 1/3 1/3 1/2
{
~
"".
2 3 1/2 1/2
,
: ~
0 1/2 1/6
1/2 0
{
~
~
2 3 1/6 1/6
2/3 1/6 1/6
1/6 2/3
{
~ I
,
'l,
~
3 4
1/3 1/3 - 27/ 96
115 1/6
3/5 1/6 26/96
1/5 3/6 , ,
y,
1 {
f
' f'- (
y({, ~ d'I d{ "" t w, y({" ~ , .
o 0 1"" 1
Formules intgrant exactement des polynmes d'ordre m ({' 'Ii avec
i+j,;;,m) .
Figure 5.7. Formul es directes d'intgration sur un triangle (Hammer).
"
1
"
,
0
298
Mthode des lments finis
Ordre Nombre
Coordonnes
Poids
m de points,
,
",
w,
,
4 6 8 8
} 0,111690794839005
a = 0,445948490915965 1 - 2 a a
a 1 - 2 a
7\
b 0,091576213509771 b b
} 0,054975871827661 1 - 2 b b
b 1 - 2 b
'(
5 7 1/3 1/3 9/8JL
k\
6 + }1.5
a a
} 155+}15
a
A" 2400
21 1-2a a
0,470142064105115 a 1 -2 a " 0,0661970763942530
A
4 b b
} 31 b=--a"
1 -2 b b
- -A,
,
7 240
,
(
0,101286607323456 b 1 -2 b " 0,0629695902724135
6 12 8 8
}
8 = 0,063089014491502
1 -2 8 8 0,025422453185103
8 1-28
b b
}
b 0,249286745170910
1 -2 b b 0,058393137863189
b 1-2 b
c - 0,310352451033785 c d
d c
d 0,053145049844816
l-(c+d) c
0,041425537809187
l-(c+d) d
c l-(c+d)
d l-(c+d)
Figure 5,7, (Suite),
5,1,4 INTGRATION NUMRIQUE A TROIS DIMENSIONS
[2, 5, 6, 7]
5,1 ,4,1 Elment de rfrence cubique
La mthode produit s'crit :
LLL
, rI 'l ')
0 dl; dl = L L L
l=t )=t k=1
W, W
j
w, y(I;" (,) (5.20)
o : w" W
j
, w, sont les coefficients des figures 5,2 (Gauss) ou 5,3
(Newton-Cotes)
1;" 1. sont les coordonnes des points d'intgration des figures
5,2 ou 5.3,
\
Mthodes numriques 299
La m3thode de Gauss '1 X '2 X ' ) points intgre exactement les
monmes t7i (k tels que i 2'1 - 1, j 2 '2 - 1, k .:s:;; 2 ') - 1.
La fig Jre 5.8 prsente quelques formules d'ordre m 2,3,5,7 obtenues
par la mthode directe, qui intgrent exactement des monmes ' ('
tels que i + i + k " m.
Ordre Nombre Coordonnes Poids
m de points f ,
{, w,
0
,l,
1
--
2 4
,,3
fi
2
A
1
0
fi
1 1 1
) 2"
--
J6 J3
1 1 1
3 6
- J6 J2"
fi
4/3
-A
1
0
--
fi
A
0
1
fi
1
0 0
}
3 6 0
1
0
4/3
0 0 1
a
0 0
}
0
a 0 320/361
0 0
a
5 14
b b b
121/361
a
30
b
33
a 0 0
} 0,29574 75994 7 34 0
a 0 51303
0
a
a a
0
} 0,0941 0 15089 16324 a = 0,92582 00997 72552 0
a a
1
a
b 0,33081 49636 99288
b b b } 0,41233 38622 71436
c 0,73411 25287 52115
c c c
0,22470 31747 65601
J
'f'J' , _, _, _, Cl dl; d( = "', y(" (,) .
Figure 5.8. Formules directes d'intgration sur un cube.
300 Mthode des lments finis
5,1 ,4,2 Elment de rfrence ttradrique
La mthode produit, extension 3 dimensions de la mthode de
Gauss- Radau, est rarement utilise.
La figure 5 , 9 prsente des formules d'ordre m = 1, 2, 3, 5 obtenues
par la mthode directe,
,
Ordre Nombre Coordonnes Poids
m de points r 1;,
~ ,
{, w,
1 1 1 1
1 1
4 4 4 6
2 4 a a a
_ 5 - fi
a a b
1
- 20
b N
b=5+3j5
a a
b a a
20
3 5
2
a 8
--
15
1
. -
4
b b b
1
b b c
b = -
3
6
b c b
40
1
b b c = - c
2
5 15
1 133
a 8 a
6670
1
b, b, b,
= -
b, b, c,
w, } = 2665 14 ,f5
4
= 1, 2
b,} 7 15
b,
c, b,
w, 226800
b, = 34
c, b, b,
c, }= 133,f5
d d e
c, 34
d e d
d=6-,f5
d d
10
34
d e e
567
=5+,f5
e d e
e
d
20
f
If I-'f
l
-'-'
y ( , ~ , 0 dl ~ do; . t w, y(';" ~ l,) ,
o 0 0 I-l
Fig ure 5.9. Formules directes d'intgration sur un ttradre,
Mthodes numriques 301
5.1.5 PRCISION DE L'INTGRATION
L'intgration exacte des matrices lmentaires et des vecteurs solli-
citation ncessite l'intgration exacte de chacun de leurs termes. Ceci
n'est possible, avec les mthodes d'intgration prsentes ci-dessus,
que si ces termes sont des polynmes, ce qui est en gnral le cas lorsque
la matrice jacobienne est constante,
EXEMPLE 5.6. Choix du nombre de points d'intgration pour un
lment rectangulaire 8 nuds correspondant
l'quation de Laplace.
,
lb
2,
,
[k) = [BV [D) [B) det (J) dl;
1
[B) = det (J)
aN
b<->
al;
aN
a < >
l det (J) = ab.
Les fonctions < N > sont celles du paragraphe 2.4.3.2; elles
contiennent les 8 monmes
1 1; 1;2 1;2
L es fonctions
aN aN .
al; et M contiennent
donc les monmes
aN
Pour a[ 0 1 0 2 1; 0 2
aN
Pour 'iN 0 0 1 0 1; 2 2 2
Le produit [BV [D) [B) contient donc tous les monmes jusqu'au
4' ordre (1;' if; i + j" 4). Par la mthode d'intgration de Gauss
il faut 3 x 3 points pour intgrer exactement [k). Cependant cette
302 Mthode des lments linis
mthode est un peu (rop prcise puisqu'elle intgre des termes
~ i 1Jj; i .:s:; 5;j 5, Trs souvent on utilise une intgration 2 x 2 points
pour cet lment; celle-ci donne d'excellents rsultats. L'intgration
est alors dite rduite .
Considrons un vecteur sollicitations de la forme:
( f 1 - f 1 f 1 ( NIf det (J) d ~ d ~ .
Si f est constant, il faut utiliser 2 x 2 points de Gauss ou une mthode
directe du 3
e
ordre pour intgrer exactement,
Pour un vecteur sollicitations correspondant f donn sur le ct
= 1 de J'lment, qui concide aveC la frontire du domaine :
(f 1 = LI N ~ = 1,1/l) fbd,/ .
1/ suffit alors d'utiliser 2 points de Gauss.
Dans le cas o l'lment est dform (quadrilatre, cts curvilignes),
la transformation gomtrique n'est pas linaire et la matrice jacobienne
est une fonction polynomiale de ~ . Les termes intgrer pour obtenir [k]
sont des fractions rationnelles. Il n'est plus possible d'intgrer exactement
ces termes. Pour un nombre donn de points d' intgration, la prcision
d' intgration diminue lorsque la dformation de l'lment augmente. En
effet nous pouvons dvelopper l'inverse du dnominateur en une srie
i nfinie qu'il faut tronquer un ordre d' autant plus lev que la dformation
est forte. Chaque terme intgrer est alors le polynme produit du num-
rateur par la srie tronque.
EXEMPLE 5 . 7. Expression de (k] pour un lment dform.
Dformons /' lment de /' exemple prcdent par une transfor-
mation dans laquelle la matrice jacobienne est une fonction linaire
de , ~ .
y
7
8
2
,
,
Mthodes numriques
303
La matrice jacobienne est donne dans l'exemple 1 . 18
(J)
[
J" JI2] [al + b
l
a, + b"I]
J
11
J
22
a
J
+ b
3
8
4
+" b
4
det (J) Ao + AI l, + A, '1 .
Alors
,w
J"
N
- J
I2
aN
<->
< Dl, >
< ->
(B)
ilx 1
'1
-
det (J)
N
-J
11
N
+ JI.
N
< - >
< 01; >
< ->
y
-
det \J) (B'I
(k] LI LI det\J) (B'V (D](B ' j dl, d'I .
Les termes de (k) sont des fractions rationnelles : le numrateur
contient des termes jusqu' el 1]4; le dnomnateuI est linaire en
, 'I , Le terme det\J) peut se dvelopper comme suit :
1 1 1 (
det (J) - A. + AI + A, Ao 1
AI A, )-1
+:;r +:;rry
(1
,
AI A, )
A. A.
La prcision de /'intgration numrique est influence par et ,
qui caractrisent la dformation de l'lment,
L'exemple suivant montre l'influence de la dformation de l'lment sur
la prcision de l'intgration numrique,
EXEMPLE 5 , 8, Intgration numrique sur un lment trapzodal
quatre nuds,
Considrons l'lment dform suivant :
y
. ' ,
4
,
,
,
304 Mthode des lments finis
La matrice jacobienne de la transformation gomtrique, donne
dans l'exemple 1.18, s'crit ici :
J = Ao -1- A, -1- A, ry
, " -1- 1
Ao = a 8
A, =
1
A
' " , = a -'8"--
Intgrons numriquement
J
'J' 1 16f' 1 d
1= _, _,det(J)d
dry=8 _,(.-I-1)-I-(.-1)ry ry
16 1
- -, 1 Log".
a a-
Les valeurs de ~ : sont les suivantes, pour diffrentes valeurs de "
et pour un nombre r de points d'intgration:
~
2 3 5 10
1 0,66666 0,50 0,33333 0,181 82
2 0,69231 0,54545 0,391 30 0,23404
3 0,693 12 0,54902 0,40067 0,24962
exacte 0,693 15 0,54931 0,40236 0,25584
5,1,6 CHOIX DU NOMBRE DE POINTS D'INTGRATION [8, 9]
Le choix du nombre de points d'intgration dpend du type d'lment
utilis et de la matrice lmentaire que l'on construit ([k] ou [ml par exemple).
En pratique on choisit le plus souvent un nombre de points aussi faible que
possible pour diminuer le volume de calcul. L'exprience a montr [8]
que l'intgration rduite peut donner de meilleurs rsultats que l'int-
gration exacte. Par contre il existe, pour chaque type d'lment, un nombre
minimum de points d'intgration en-dessous duquel la matrice [K] reste
singulire malgr l'introduction des conditions aux limites. Pour un lment
quadrilatral isoparamtrique 8 nuds (paragraphe 2.4.3.2), il faut un
minimum de 2 x 2 points d'intgration pour calculer [k] et de 3 x 3 points
pour calculer [ml. Pour un lment quadrilatral de type Hermite 4 nuds
(paragraphe 2.4.4.1), il faut 3 x 3 points pour calculer [k]. D'aprs
Mthodes numriques 305
Zienkiewicz [BJ, pour les lments isoparamtriques, le nombre de points
d'intgration doit permettre l'intgration exacte de det (J) , c'est--dire
du volume de l'lment rel. Ce critre peut tre insuffisant dans certains
cas, par exemple il conduit utiliser un seul point pour le quadrilatre
isoparamtrique 4 nuds (paragraphe 2.4.2), ce qui peut rendre [K]
singulire lorsque le nombre d'lments est faible.
En fait chaque point d'intgration d'un lment sont associes une
ou plusieurs relations entre les variables nodales de l'lment . Pour que la
matrice globale [KI ne soit pas singulire, le nombre total de points d'int-
gration doit tre tel Que le nombre des relations correspondantes soit au
moins gal au nombres d'inconnues du problme, compte tenu des
conditions aux limites.
5.1.7 PROGRAMMES O'lNnGRATION NUMIOAIOUE
Il est souhaitable d' organiser les programmes d'intgration numrique
de manire ce qu'ils soient valables pour les mthodes produit
ou pour les mthodes directes, et pour les divers types d'lments une,
deux ou trois dimensions. Mettons toutes les formules d'intgration
numrique sous la forme gnrale :
A une dimension
wl - wj.IPG=r.
A deux dimensions :
mthodes produit
mthodes directes :
A trois dimensions :
mthodes produit
mthodes directes :
w,=w,w}.IPG=rl.,z
w, ~ w" 1 PG ~ r.
: w, = w, w) w" . IPG = 'l.f
l
.T
3
w
1
= w
j
IPG = r
(5.21 )
o : , reprsente les coordonnes du {-ime point d'intgration,
correspondant w,
w, est le poids correspondant au point d'intgration numro {
IPG est le nombre total de points d'intgration.
Le calcul de l'intgrale se rduit alors dans tous les cas une simple
boucle :
Intgrale ~ 0
[Pour ~ 1
L-Intgrale ~
IPG
Intgrale + w" y ~ , ) .
306 Mthode des lments finis
Dans les programmes, nous plaons les poids w, dans la table des
Coefficients de Pondration VCPG de longueur 1 PG, et les coor-
donnes .; , dans la table des coordonnes des Points d'irtgration
VKPG de longueur IPG x NDIM o NDIM reprsente le nombre de
dimensions du problme (une, deux ou trois) .
VCPG - < w, w,
VKPG = C,; 1:, 'l, C,;
'lIPG 'IPG > .
Les figures 5.10 et 5.11 prsentent deux sous-programmes de calcul
des tables VCPG et VKPG. Le premier (GAUSS) utilise la mthode
produit une, deux ou trois dimensions. Le second (GAUSST) met en
oeuvre les formules de la figure 5.7 destines aux lments triangulaires.
SUBROUfIHE CAUSS(IPCKED,HOIH,VKPC,VCPC, Ire) CAUS
C CREt DE COORDONNEES ET DE POIDS DES POINTS OC CAUSS CAUS
C (1,2 ET 3 01I'lCN510H5)(I ,2,3 ou 4 P.C. PAR DIHENSJOH) CAUS
C EHTRf:E;S CAUS
C IPCICEO HOHBRE: DE POINTS DANS LES DIRECTIONS KSI,CfA,DZET.\ CAUS
C
C
C
C
C
NOIH
SORTIes
vue
Vere
IPC
NOHBRE DE DIHENSIONS (l,a OU 3)
COORDONNEES DES POINTS DE GAUSS
POIDS OES POINTS DE GAUSS
HOHORE TOTAL DE POINTS DE GAUSS
CAUS
CAUS
CAUS
CAUS
CAUS
CM ________ ___ _ __ OAU5
IHPLI CI T REALO(A N,O Z) CAUS
OINENS 1 ON 1 r eno( 1), YKPe( 1 ) , vepe(l ), cn 0) , P( 10),1 NDICC 4 ) CAUS
DATA INOI C/ 1,2 , 4,7/ CAUS
OAT AGIO. 000 , .. 1117 350 26 9189 6 2600 , . 5713502691896 2 600 , CAUS
1 . 7741196116924148300,0.000, .17 459666924148300, GAUS
2 _.86113 8311594011000,.33998104358486000, GAUS
3 .33 998104358486000,.861136311594090001 CAUS
DATA P/ 2. 000,1 . 000,1.000, CAUS
1 0.995559959556656 00,0.68888888888888900.0.88685888888556600,CAUS
2 .34165464513745000 . 615214518486398000, GAUS
3 6821 4 !!II BI, 8 8 255000 , .347 8548 4513 746000 / G A US
C _ ... ... ..................................... , .... ....... ............ CAUS
1I-1PCI<&D(i) GA US
IHIN_IN0 1C(II) CAUS
IHAX-ININ+IIl CAUS
Ir ( NOIN2) 10,20,30
c 1 DIMeNSION
10 IP(;-O
DO 1 8 I_IHIN,IHAX
IPC-IPC+l
YIr:PG ( IPG) .. C( 1)
IS Yo PC( IP(l).P(I)
RUUR"
o a DIMENS IONS
20 11_IPOI<&0(2)
JHIN-INOIO( Il )
JHAX_JHIN+II!
Ire_a
CAUS
CAUS
CAUS
CAUS
CAUS
CAUS
CAUS
GA US
CAUS
CAUS
CAUS
CAU5
CAUS
2
,
6
7
6
,.
\1
"
\3
14
16
..
17
16
\9
20
21
" 23
24
25
" 27
"
" 30
3\
"
" 34
36
" 31
36
3.
..
Figure 5.10. Sous-programme GAUSS pour le calcul des coordonnes
et poids correspondant aux points d'intgration de la
mthode produit une, deux ou trois dimensions.
Ce sous-programme est utilis par le programme MEF
du chapitre 6.
L.l
DO 25 I_II1IN,IHAX
DO 25
IPCaIPC+I
YKPG(L)_C(I)
YKPG(L+I)-G(J)
L_L+&
26 YCPG(IPC)-P(I)P(J)
RETURN
C 3 DIHEIISIONS
30 II.dPCKED( 2)
JHIN_INDIC(II)
JH"'X_JHIN+II_I
ll_IPGKED(3)
KHIN .. INDIC(II)
KH"'X .. KHIN+I JI
IPG-O
DO 35 I .. IHIN,IHAX
DO 35 J .. JHIN,JH"'X
DO 3H K_KHIN,KH"'X
IrG_IPG+1
YKPG(L) .. G(I)
YKPG(L+l)-G(J)
YKPG(L+2) .. G(K)
L_L+3
Mthodes numriques
36 VGPG(IPG)_P(I)P(J).P(K)
RETURN
END
Figure 5.10. (Suite).
SUBROU11NE
307
c"'us 4J
C"'US 4Z
C ... US
" C ... US H
c ... us 45
C ... US ..
C ... US 47
C ... US ..
C ... US 49
C ... US 50
C ... US 51
C ... US 52
c ... us
" C ... US 64
C ... US
"
c ... us
"
C"'US 57
c",us
" C ... US 69
C ... US 60
C ... US 51
C ... US 62
C ... US 63
C ... US 64
C ... US 66
C ... US 66
C ... US 67
C ... US 68
C ... US
"
G"'UT
c
c
c
c
c
c
c
c
c
CREE LES T"'BL DE COOROONNEE:S E:1 DE: POIDS DE:S POINTS 0 INTEGR.... G"'UT
1
2
3
4
,
TION POUR LES E:l.EHENTS TRIANCUL"'IRES G"'UT
ENTREES G"'UT
IPGKED(l) NOHBRE DE POINTS O'INTEGR"'TION C"'UT 6
7 IPGKED(2) .EO.l SION'" 3 POINTS "'UX HILIEUX DES COTES GA UT
SORTIES GAUT
VKPG COORDONNEES DES POINTS D'INTEGRATION G"'UT
VCPG
IPG
POIDS DES POINTS D'INTEGR"'TION
NOMBRE TOTAl. DE POINTS O'INTEGR ... TION
GAUT 10
GAUT Il
G .... ____ .. ___ .... ________ .. ______ .. _______ .. ____ .. ____ .. __ .... ________ .. _ ...... ________ G ... UT 12
IHPLICIT REAL6( ... N,0Z)
OIHENSION IPCKED(1), YKPG( 1), YCPC(l)
O"'TA ZERO/O.DO/,UN/I .DO/,DEUX/2.00/,TROIS/3.DO/,CINO/5.DO/
O"'TA SIX/6.DO/
SORT(X)_DSORT(X)
IPG .. IPCKED(l)
C 1 POINT AU CENTRE DE GR ... YJTE
IP(IPC.HE.1) CO TO 10
VCPG( 1 ) .. UN/DEUX
VKPG(I)_UH/TROJS
VKPG(2)_UH/TROIS
GO TO 100
GAUT 13
GAUT 14
GAUT 15
G,I,UT 16
GAUr 17
GAUT 18
GAUT 19
C,I,UT 2:0
C,I,UT 2:l
G"'UT 22
CAUT 23
GAUT 24
Figure 5.11. Sous-programme GAUSST pour le calcul des coordon-
nes et poids correspondant aux points d'intgration
d'un triangle (mthode directe).
308 Mthode des lments finis
c 3 POINTS
10 rp(IPC.NE.3) GO TO 20
CI .. UN/SIX
verGe 1 ) .. Cl
verG(z)-cl
VerG(3l-CI
c....... 3 POINTS AUX MILIEUX DES COTES
lP(IPCKED(2).NE.I) CO TO Il
VKPG( 1 ) .. UN/DEUX
VKPG(Z)_UN/DEUX
VKPG(3) .. ZERO
VKPG(4)_UN/DEUX
VKPG(6)_UN/DEUX
VKPG(6)_ZERO
CO TO 100
c ....... 3 POINTS AUX TIERS DES MEDIANES
Il VKPG(l) .. Cl
VKPG(Z) .. Cl
VKPG(3)_OEUX/fROIS
VKPG(4) .. Cl
VKPG(5)_Cl
VKPG(6)_OEUX/TROIS
GO TO 100
C 4 POINTS (AUX TIERS DES MEDIANES ET A LEUR INTERSECTION)
20 11"(IPO.NE.4) GO TO 30
CZ_0.2812600
C3_0.3604166666666687DO
verG( 1 ) .. CZ
VCPG(Z) .. C3
VerG(3)_C3
VCPC(4) .. Cl
VKPG(I)_UN/TROIS
VKPG(Z)_UN/TROIS
VKPG(3)_UN/CINO
VKPG(4)_UN/CINO
VKPG(6)-fROJS/CINO
VKPG(6) .. UHfCINO
VKPC(1)_UN/CINO
VKPC(8)_TROIS/CINO
GO '1'0 100
C- - ... 6 POINTS
30 IP(JPC,NE,S) GO TO 40
CI_0.111690194839006DO
C3_0,06491661163166IDO
C3_0,44694649091696600
C4.0,091616213609111DO
VCPGn )_Cl
vCPG(a)_CI
VCPG(3)-CI
VCPG(4)_Ca
VCPG(6)_C3
VCPG(a)-ca
VKPG(I)_C3
VKPG(a)_C3
VKPG(3)_UNDEUXC3
VKPG(4)_C3
VKPG(6).C3
VKPG(6)_UNDEUXC3
VKPG(1).C4
VKPG(6).C4
VKPG(9)_UN_DEUXC4
VKPG(l0)_C4
VKPG(ll ).C4
VKPG(12)UN-OEUXC4
Figure 5.11. (Suite).
CAUT
" CAur
" GAUr
" GAUr
" GAUr
" GAUr 30
CAUT 3.
GAUT
"
GAUT 33
GAU1 34
CAU1 36
GAU1 36
CAUT 37
CAur 38
GAur 36
GAUT 40
GAU1 4.
GAUT
"
GAU1 43
GAUT ..
GAUf
" GAUT ..
CAU1 41
CAU1
" GAUr ..
GAU'!' 60
G.\U1
,.
C.\UT
"
GAU1
" CAUT
,.
GAU1
" GAU1
"
GAU1
"
GAUT
"
GAUT
" GAU'!' 60
GAU'!' 6.
GAU'!' 62
GAUr 63
GAU'!' ..
GAUr
"
GAUT
"
GAU'!'
" GAU'!'
"
GAU'!'
" GAU'!' 70
CAur 7.
CAU'!'
" GAU1 73
GAU1
,.
GAU'!'
"
GAUT
"
GAUT 77
CAUT
"
GAU'!'
".
GAUT 60
GAUT
,.
CAur
"
GAUT 83
GAU'!'
,.
C.\U1
" CAU'!'
" GAU1
" GAUr
"
Mthodes numriques
e 7 POINTS
40 IF{IPG.NE.7) GO TO Il
CI_9.DO/8D.DD
C2_(IB5.DD+SORT(IS.DOj2400DO
C3 ..
.00
C6 .. 4.D0I7_00-C4
VePG( 1 )"Cl
VCPG(2) .. CZ
VCPG(3)_C2
VCPG(4) .. C2
VCPG(6) .. C3
VCPG(6) .. e3
VCPG(7)-C3
VKPG(I) _UNjTROIS
VKPG(2)_UNjTROIS
VKPG(3) .. C4
VJ(PG(4) ..
VKrC(S) .. UN-DEUXC4
VKPC(6) .. C4
VKPG(7)-e4
VI::PG(9)_CS
VI::PG(lO) .. CB
VKPG (lI ) .. U N _ DEUX C5
VKPG(12) .. C5
VKPG(13) .. C5
VKPG(14)_UN_OEUXC8
100 RETURN
Figure 5.11. (Suite).
309
GAUT
" GAUT
" GAUT 91
GAUT 92
CAUT
"
CAUT
,.
CAUT 96
CAUT
"
GAUT 97
CAUT SB
CAUT SB
CAUT 100
CAUT 101
CAUT 102
GAUT 103
GAUT 10.
GAUT
10'
CAUT 106
CAUT 101
CAUT lOB
CAUT 109
CAUT 110
GAUT III
CAUT 112
GAUT IIJ
CAUT Il.
CAUT
"'
CAUT Ils
CAUT 117
GAUT Ils
5.2 Rsolution de systmes d'quations linaires
[10,11]
5.2.1 INTRODUCTION
La rsolution du systme d'quations
[K] { U, ) = { F ) (5.22)
est une tape importante de la mthode des lments finis. Ce systme
est linaire lorsque [K] ne dpend pas de { U, }.
Le nombre n d'inconnues U, est proportionnel au nombre total de nuds
d'interpolation et au nombre de degrs de libert par nud. La prcision
et le champ d'application de la mthode des lments finis sont limits
par la dimension des systmes d'quations que nous pouvons rsoudre
conomiquement sur les ordinateurs disponibles. A l'heure actuelle (1979)
des systmes de quelques milliers d'quations sont rsolus couramment
alors que des systmes de quelques dizaines de milliers d'quations sont
encore exceptionnels.
310
Mthode des lments finis
Les mthodes de rsolution de systmes linaires peuvent tre classes
en deux catgories :
a) Les mthodes directes qui conduisent la solution en un nombre
d'oprations connu a priori
oprral ion ~ I OPI!rolian
2
l Olut ion
b) Les mthodes itratives qui conduisent la solution par une suc-
cession d'amliorations d'une solution approche, le nombre d'itrations
ncessaires tant difficile prvoir et dpendant de la structure de la
matrice [KJ.
JoluUon
opplo<:lI".
I-
-r-l Al1jQlllhme, 1---<'
,olu!!!)n omeUor ie
Les premiers programmes bass sur la mthode des lments finis
ont utilis des mthodes itratives (Gauss-Seidel) , car elies sont plus
simples programmer et demandent moins d'espace en mmoire que les
mthodes directes (voir paragraphe 5.3) .
La grande majorit des programmes actuels utilisent des mthodes
directes drives de la mthode d'limination de Gauss car elles n.cessitent
en gnral beaucoup moins d'oprations que les mthodes itratives.
Par contre elles sont en gnral plus sensibles aux erreurs d'arrondis
dues la prcision limite avec laquelle l'ordinateur effectue les oprations
arithmtiques. Nous ne prsenterons dans ce chapitre que les mthodes
directes.
De nouvelles mthodes de rsolution vont probablement se dvelopper
avec l' apparition de processeurs de tableaux (en anglais: array pro-
cessors ), de cal culateurs parallles et de rseaux de micro-calculateurs.
5.2.2 MTHODE D'LIMINATION DE GAUSS
Cette mthode trs souvent utilise est constitue de deux tapes
0) Triangularisation
Cette tape consiste transformer le systme d'quations (5.22)
en un systme triangulaire:
[ ~ { V,l = ( F' ) .
(5.23)
Mthodes numriques 311
b) Rsolution du systme triangulaire suprieur prcdent
Cette tape consiste calculer les inconnues VII' de la dernire la
premire. par rsolution du systme triangulaire (5.23) (en anglais :
).
5.2.2.1 Triangularisation
K12
K
22
KI"
K,"
U,
U,
F,
F,
KIII K
II2
KIIII Un Fil
(5.24 )
La triangularisation consiste liminer successivement les inconnues
U" s = 1. 2 ..... n - 1 dans les quations s + 1 n. L'limination de U,
se fait de la manire suivante:
- exprimer V,I' en fonction de V1i+I' V
s
+
2
, "" U
II
et F
s
en utilisant
l'quation s; ,
- reporter l'expression de U, prcdente dans les quations s + 1.
s + 2 ..... n,
Aprs limination de U, cette inconnue n'apparat plus dans les quations
s + 1 n; il y a donc des zros dans la colonne s sous la diagonale.
Aprs limination des inconnues U
I
U",_I. la matrice [K] est triangulaire
suprieure. puisqu'elle ne comporte plus que des zros sous la diagonale.
L'limination de chaque inconnue U, modifie [K] et {F J. Notons
[K'] et { F' ) la matrice et le second membre aprs limination des inconnues
1. 2.3 ..... s. la matrice [KO] tant la matrice [K] initiale:
[K] = fKO] et {FO) = { F) SYSTME ORIGINAL
1 VI dans les quations 2 n
fK 1] et {F 1 )
1 liminer U, dans les quations 3 n
[K'] et {F')
1
l liminer U, dans les quations s + 1 n
[K'] et {F' J
J
1 liminer U"_, dans l'quation n
[S] = [K"-I] et {F"-I J = {F') SYSTME TRIANGULAIRE.
312
Mthode des lments finis
Pour limi ner la variable U, du systme (5.24), nous utilisons la premire
quation sous la forme :
1
U, -K (F, - K" U, .. . - K,. U,)
Il
et reportons cette expression de U, dans les quations 2, 3, .. . , n :
Kil
o
K"
0
K"
ce que nous
o
Kil
K"
- -Kil
Kil
Knt K
- - "
Kil
notons
Kil
0
o
K"
Kl
2
K"
K - K" K
2n Kil ln
K"
_ Kn' K
K " Il
K"
V,
K
2
'n
V,
U,
U,
U,
U,
=
=
F,
Fl
F'
. '_ 3
F
' _ F _ K K - 1 F l, J - 2, , ... , n .
'-i "'11'\
Aprs limination de U
I
U,
Kil
o
o
o
o
o
o
o
o 1
M
Aprs limination de V,
. ,
[K'l ( U, ) - ( F' )
U
,
U,
U,
U,
F,
F, _ K" F
Kil 1
F - ,
Kilt F
- 1
Kil
F,
Fl
-
Mthodes numriques
313
les termes modifis tant :
= _ KS,-I
I} 1) SS SJ
.... n. (5.25)
Le systme final triangulaire s'crit :
soit
Kil
o
0
Kiz
o
0
. . . . . . . . . . . . . . . . , . . . . .
. . .. . . . . . . . . . . . .
o
0 0
KII-t
""
{ U, ) { F' -1 )
{ U, ) = { F' ) .
U,
U,
U,
U,
U,
F,
Fi
Ff
F
rr
-
1
,
En pratique nous construisons les matrices successives [K'], [K'], ... dans
la matrice originale [K]. L'algorithme est le suivant
Remarque
s = 1.2, .... n - 1
i = s + 1, s + 2, ... , n
c = K
is
K;; 1
FI = FI - cF
s
1 i s + 1, s + 2 .... , n
KJj = Ki) - cK
sJ
(5.26)
Pour un systme symtrique l'indice i varie de i n. De plus Kj' = Ku.
EXEMPLE 5.9. Triangularisation d'un systme non symtrique
4
11
18
=
46 U,
[K] { U, ) - { F ) .
{
1 .
180
314 Mthode des lments finis
Aprs limination de VI :
2
o
o
11 -
4
4
24= 3
6
18 - 24 = 6
8
4
25 - 28 =
9
6
46 - - 8 - 22
2
Aprs limination de V, et V, :
2 4 8 V,
0 3 9 V,
=
0 0
6
22 - 3" 9 = 4 V,
soit
V,
V,
v,
101
=
34
4
- 234 = 33
6
180 - 234 = 78
34
33
6
78 - 3" 33
=
12
[ ~
4
;] { ~ } = n ~ }
3
0
[5] { V, } = { F'} .
L'algorithme (5,26) ne fonctionne plus si en cours de tri angulari sation,
le pivot K" est nul. Il faut alors changer la ligne s avec une autre ligne
i > s telle que K,. #< O. Dans le cas d'un systme symtrique, nous
pouvons conserver la symtrie condition d'changer galement les
colonnes i el s, ce qui implique une modificati on de l'ordre des inconnues ;
pour que ceci soit possible il faut que le terme diagonal Kil soit non nul ,
Si, lorsque K., = 0, tous les termes K" (i > s) ou tous les termes
K,., (i > s) sont nuls, la matrice K est singu li re; le systme ne peut tre
rsolu,
Le dterminant de K est le produit des termes diagonaux de la matrice
triangularise [5] ,
EXEMPLE 5 , 10. Recherche de pivot non nul :
4
o
6
Mthodes numriques
Le premier pivot tant nul, changeons 1 re et 2
e
ligne
o
4
6
315
Cette matrice n'est plus symtrique. Nous ne pouvons, dans ce cas,
changer les colonnes 1 et 2 car ceci redonnerait un pivot nul en
premire ligne.
Aprs limination de VI
o
4
6
-1 l -{!}
Apres limination de V, et V, :
o
4
o
Le dterminant de [K] est :
4 x 4 x (- 24) = - 384.
5.2.2.2 Rsolution du systme triangulaire suprieur
La rsolution de (5.26) se fait partir de la dernire quation, en calculant
successivement Un U"_I ... VI' d'o le nom anglais de back substi-
tution :
Un = Sn: 1 F;
U
n
_
1
= - Sn-l.n U")
V, = S,'(F; - SIl V, - Sil V, - ... S" V,).
L'algorithme pratique travaille directement sur les matrices [K] et { F}
modifies par la triangularisation :
(5.27)
316 Mthode des lments finis
EXEMPLE 5 . 11 . Rsolution d'un systme triangulaire.
Rsolvons le systme triangulaire obtenu dans l'exemple 5 . 9
~
4
3
o
12
VJ = If 3
1
V, = 3 (33 - 9 x 3) = 2
V, = ; (34 - 4 x 2 - 8 x 3) = 1 .
5,2 , 2,3 Programme
Lorsque la matrice IKI est stocke dans une table deux dimensions
VKG. la mthode de Gauss conduit au programme de la figure 5 . 12. La
table VFG contient le vecteur ( F 1 en entre. et le vecteur solution ( V. 1
en sortie.
5.2.3 DECOMPOSITION
5,2,3.1 Introduction
Nous allons reformuler matriciellement les oprations d'limination
de Gauss qui transforment la matrice IKI en une matrice triangulaire
suprieure ISI . Ceci permettra:
a) de montrer qu'en fait la mthode de Gauss dcompose IKI sous la
forme:
IKI = N N = ILIISI (5 . 28)
o : IL 1 est une matrice triangulaire infrieure termes diagonaux units
[SI est la matrice triangulaire suprieure obtenue par limination de
Gauss au paragraphe 5 . 2 . 2.1;
b) de faire sparment les oprations qui portent sur IKI et ( F ) pendant
l'limination. Ceci permet. aprs triangularisation de [KI, de rsoudre
successivement le systme avec plusieurs seconds membres;
c) de construire des algorithmes de rsolution adapts au stockage de
IKI par la mthode de la ligne de ciel introduite au paragraphe 4.6.3.
Mthodes numriques
317
SU8/10UTIHE RESQ
____ _ _._ _______ ____ ._ ________ lIc50 2
C
C IItSOLV1ION
C METHODE oc
C
C tNTRECS
c NSYH
C
""
C
'"' c
'" C
c SORTlE
C VFe
C
D'UN SYSTEME D' EQUATIONS NON SYMETRJOUE PAR LA
GAUSS
. to. 1 SYSTEME NON SYMETRIQUE
NOHBRE D'EQUATIONS (.G&.3)
HATRICE K STOCKEE DANS UNE TABLE Il a OHtENSIONS
SECOND MEHBRE
SOLUTION
IIE50
IIE50
RESO
RESO
REsa
RESQ
RESC
REsa
RESO
REao
RESO
RESQ
RESc
3
,
7
,
,
10
11
13
13
14
"
c._ _____ ______ ____ ._. _________ RE50 16
IMPLICIT R&ALS(A-H,Q-Z)
DIMENSION VKC(NEO,NEQ),VrC(NEO)
C- TRIANGULARISATION
DATA ZERO/D . DOI
"U_NEO _ )
DO 50 15 _) ,NI
P'V.'1KC(IS , IS)
IrC,lv) aD,lO,ao
10 VRJf&(&,aooo) 15
2000 rORHAT(' PIVOT HUI., &OUIITIOH' ,18)
STOP
30
!S1_15.)
0080 I1_18I,NEO
CL_VrC(I I . I S)/PIV
If( CI..EO . Z&RO)GO TO 80
YfC(lI).vrC(II)CL-VtC(18)
rp(HSYM.HE.I) GO TO 32
DO 30 JJ_18I,N&O
VKC(Il,IJ).VKC(JJ,JJ)CL-YKC(IS,IJ)
CO TO 80
32 DO 40 IJ_TI,NEO
YKC ( IJ , IJ)_VKC(II.IJ)CL_VKC(IS,IJ)
40 VICC(IJ,II).VKC(II,IJ)
80 CONTINUE
C RESOLUTION DU SYSTEME TRIANCUI.AIRE
YPC(HEO)-VrC(HEOI{VKC(HEO,HEO)
80
70
DO 70 IJ.I,NI
JSl.JSIl
CL. ZERO
IJI_18141
DD 60 IJ-lJl,HED
CLCI. 4VKC(I S) ,Il).vrC( Il)
vrC( 151 )_(VrC(ISI) ,CI.I/VICC( 151, ISl)
RCTUJlH .
CNO
RESO 17
RC80 18
RCSO 19
RCSO 20
RCSD 31
RCSO 22
ItESO 23
RE5Q 24
JlESQ 29
RE5Q 16
RESQ a7
RESO 28
RESO 29
R&SO 30
R&SO 31
R&SO 32
R&80 33
R&50 34
RESO 38
U:SO 36
RE:SO 31
RESO 38
RC80 39
R&50 40
RE:SO 41
RE:SO 4Z
RESO 43
RESO 44
RE50 45
Reao 415
RESO 47
RESO 48
USD 49
RE50 50
RESO SI.
Figure 5.12. Sous-programme RESOL de rsolution d'un systme
d'quations linaires, symtrique ou non, dont la matrice
est stocke dans une table deux dimensions. Ce sous-
programme est utilis par le programme BBMEF prsent
au chapitre 6.
318 Mthode des lments finis
5.2.3.2 Forme matricielle de l'limination de Gauss
L'opration d'limination (5.25) de l'inconnue V, transforme [K' -IJ
en [K']. Cette transformation s'crit matriciellement :
0
0
0
[K'J =
( [IJ +
- 1
.{ -+ 1 . f
0
) [K'-IJ = [l'J [K'-IJ (5.29)
- '",S
0
o [IJ est la matrice unit
1
. = K ~ - I K , - I ) - I . = + 1 2
" I.!' .U 1 S ,S+ , .... n .
La matrice [/"] est triangulaire infrieure, ses termes diagonaux sont
gaux 1, et seule la colonne s n'est pas nulle.
L'limination des inconnues V" V" .... V. _
I
(algorithme 5 . 26) quivaut
appliquer successivement l'opration (5 . 29) avec s = 1, 2, .... n - 1.
D'o :
[l') [K)
N = ~ [KJ = [/J [KJ
(5.30)
EXEMPLE 5 . 12. Dcomposition de la matrice de J'exemple 5 . 9.
Vtilisons J'expression (5.29)
s = 1
4
11
18
[K ') = [l') [K)
s = 2
Mthodes numriques 319
a
l [K'] U
4
2n
[l'] 1
3
-3 a
6
[l']
a a
J [K']
4 8
[S]
1 a 3 9
-2
1 a 4
a
[1] 1
-2
La dcomposition (5,28) de K est obtenue en inversant la matrice
triangulaire [1] dfinie par (5,30) :
[K] [W' [S] [/']-' [1']-' .. , [/'-']-' [S]
[L '][L '] .. , [L -'][S]
N
o
[S] (5,31)
5,2,3,3 Proprits des matrices triangulaires [/']
Nous prsentons ici les proprits des matrices triangulaires [1'] et [L'] qui
apparaissent dans (5,30) et (5,31) :
- Le produit de deux matrices triangulaires infrieures (ou suprieures)
est une matrice triangulaire infrieure (ou suprieure), '
- Le dterminant d'une matrice triangulaire est g'al au produit de
ses termes diagonaux.
- L'inverse d'une matrice triangulaire infrieure (ou suprieure) est
une matrice triangulaire infrieure (ou suprieure),
- La topologie (largeur de bande, ligne de ciel) de [S] (ou de [L]) est
identique celle de la partie suprieure (ou infrieure) de [K],
- L'inverse des matrices [1'] (5,29) s'crit :
[/']-' [L'] - [/'] + 2[1]
ce qui revient changer le signe des termes sous la diagonale,
Le produit de deux matrices [L '] rU], o i .; j, s'crit
[L HU] [L i] + [U] - [1]
(5,32)
(5,33)
ce qui revient ajouter les termes non diagonaux des deux matrices, en
'conservant les termes diagonaux gaux 1,
320 Mthode des lments finis
EXEMPLE 5 . 13. Matrices [L] et [5] de l'exemple 5 . 12.
Appliquons les relations (5 . 31) aux matrices obtenues
dans
l'exemple 5.12 en utilisant les proprits (5 . 32) et (5.33)
[K] = [L 1] [L ' ] [5] = [L] [5]
o
[ ~
0
~ ]
[L 1] = [/1] - 1
=
1
0
[ ~
0
n
[L '] = [/' ]- 1
=
1
2
U
0
n
[L J = [L IJ [L '] = 1
2
[5] = [K'] = [ ~
4
;] .
3
0
D'o la dcomposition finale :
U
4
~ ] = [ ~
0
~ ] [ ~
4
;]
11 1
3
18 46 3 2 0
[KJ [L] [5]
5.2.3 . 4 Diverses formes de la dcomposition de [Kj
Nous utiliserons systmatiquement la dcomposition (5.31) de [K]
dite de Doolittle
[K] = [L J[5] .
(5 . 34 )
Trois autres dcompositions sont parfois utilises
-
Mthodes numriques 321
a) Forme LOU
Dcomposons [SI en le produit d'une matrice diagonale (0) et d'une
matrice triangulaire suprieure coefficients diagonaux units rU] :
Alors
b) Forme de Crout
o :
Vii = 1
Vi) = Si)/ Su j > i
Dii = Sij .
[K) = [L) (0) [V) ,
[KI = [L ' ) [V)
[L ' ) [L)[D).
(5.35)
(5.36)
Pour les matrices symtriques [K) = [KI': la relation (5,35) devient
[K) = [L) (0) [V) = [KI' = [VI' [0] [LI'
d'o
[V)=[Ll'
[K) = [L) (0) [LI' . (5.37)
c) Forme de Cholesky
Lorsque [K] est dfinie positive (Sil > 0) nous pouvons crire (5,37)
sous la forme de Cholesky :
[K) = [L,) [L,I' (5 , 38)
o
[L,) = [L)
6 , 2,3, 5 Rsolution d'un systme par dcomposition
Le systme rsoudre
[K] ( V, ) = ( F )
322
Mthode des lments finis
s'crit en utilisant la dcomposition (5.34)
(L) (S) ( U. ) = ( F ) .
Ce systme se rsout en 2 tapes :
(L) { F ' 1 = { FI Systme tri angulaire inf rieur
j (5.39)
(S] { U. 1 = { F' 1 Systme tri angulai re suprieur.
Remarquons que ( F' 1 est identique au second membre obtenu aprs
l'liminat ion de Gauss (5.26).
EXEMPLE 5.14. Rsolution par dcomposition.
Rsolvons le systme de /' exemple 5 .9 en utilisant la dcompo-
sition de (KI obtenue dans /' exemple 5.13 :
systme triangulaire infrieur
0
1 ( F ' ) - ",.{ F ' I
=
2 180
(L ] { F 1
tape 2 : systme triangulaire suprieur
.------- --
4
{U
3
{ U. 1 = = { U. 1 -
0
(S] { F ' 1
5.2.3.6
Algorithmes de dcomposition
Un algorithme de dcomposition permet de calcul er les termes de (L]
et (S) partir des termes de (K] ; ces termes sont stocks dans (K] sous la
forme :
(5.40)
-='
Mthodes numriques 323
L'algorithme d'limination de Gauss (5.26) peut tre considr comme
un algorithme de dcomposition condition de stocker les termes L"
dans la partie infrieure de [K] :
. s = 1. 2 ..... n - 1
i = s + 1. s + 2 ..... n
K,. = Ki' K'; 1 (colonne s de L)
(L ,,)
.j=s+1.s+2 ..... n
L K" = KI} - K" K"
L ~ = = = = = (L,,) (S,,)
Pour une valeur s donne, cet algorithme
cre la colonne s de L (sous la diagonale)
- cre la ligne s + 1 de S ( droite de la diagonale)
- modifie les termes Kij i, j> s.
(5.41 )
Nous pouvons- construire d'autres algorithmes en identifiant les termes
du produit [L] [S] avec les termes de [K]. Nous pouvons par exemple
obtenir un algorithme qui construit successivement une ligne de L et une
colonne de S. Cet algorithme est bien adapt au stockage de [K] par la
mthode de la ligne de ciel dcrite au paragraphe 4 . 6 .3 (voir para-
graphe 5 . 2.4 . 1 ) .
1
Sil
S"
S13 Kil Ku Kil
LlI
1
S" S"
= K
21
Kn K
2
)
L3I
L"
1
S ~
Xli K
32
K3)
..... , .. ,
(5.42)
s = 1 : 1 . Sil = Kil
s = 2: L2I Sil = K2I LlI = K,dSII)-1
1 .S" = K" S" = K"
L
21
Su + 5
22
= K
22
5
22
= K
22
- L
21
SI2
S = 3: L3I Sil = K3I L,! = K
3I
(SII)-!
L3I Sil + L" S" = K" L" = (K" - L3I Sil) (S,,) -!
1,S
13
= K13 S13 = K13
L
2t
Sil + 5
23
= K
2l
S2l = Ku - Lli Sil
L
31
S'3 + L
32
5
23
+ 5
33
= Kl 3 Sn = K33 - L31 SI) - L
32
5
23
.
324 Mthode des lments finis
Pour s quelconque
L" - (K,; - if L.m sm,)
m' ,
S
- ,
H
1 ~
1, 2, .'" s - 1
j ~ 1, 2, ... , s .
Les matrices L et S tant stockes dans [K) sous la forme (5.40) ,
l'algorithme prcdent s'crit
s = 2, 3 . ... , n
i ~ 1, 2, ... , s - 1
. m ~ 1, 2, ... , i - 1
L
Ksi = Ksi - . K
sm
Kmi
K" ~ Ki. - Kim Km'
'--__ K . i - = Ksi K/ j 1
. m ~ 1, 2, ... , s - 1
L KifS = Ku - K
sm
K
mJ
L-__
ligne de L
colonne de S
normaliser la ligne de L
terme diagonal.
(5 . 43)
EXEMPLE 5.15. Dcomposition de 18 matrice de l'exemple 5 . 9 par
l'algorithme (5.43).
[
2 : 4:
[K) ~ . - ~ - - - - i ~ -
Aprs l'tape s ~ 2
Aprs l'tape s ~ 3
4
3
2
8 ] [Sil
9 = L2I
4 L3I
S"
S"
L"
S" ]
S23 '
S"
Aprs dcomposition par l'algorithme (5 . 43), la matric" [K) contient les
termes de [L) et [SI. Il faut alors rsoudre les deux systmes triangu-
laires (5.39) :
-
Mthodes numriques
- Etape 1 (systme triangulaire infrieur)
li=2,,,,,n
j - 1
Fi = Fi - L K {j Fj .
- Etape 2 (systme triangulaire suprieur)
Fn = Fn
1 i n - 1, n - 2, ... , 1,
F,=K"I(FI- L
j=i+l
{ F ) contient alors la solution { U, } du systme.
325
(5.44 )
(5.45)
5.2.4 ADAPTATION DE L'ALGORITHME (5.43) AU CAS
D'UNE MATRICE STOCKE PAR LIGNE DE CIEL
5.2.4.1. Matrice ligne de ciel rsidant en mmoire centrale
Lorsque r on dsire viter les oprations portant sur les termes nuls de
[K] extrieurs la ligne de ciel (voir paragraphe 4.6. 3e). Ialgo
rithme (5.43) doit tre modifi ae la manire suivante:
. s = 2, 3, . '" n
1 = JOlI'''' S - 1
1 m = (io" '0,), "., i - 1
- Ksi - K,m Kmi
K
is
= K
is
- Kim Km.
i = K.; Ki i 1
lm io.",,,s-1
Ks. = K,u - K
sm
K m.
(5.47)
O ;0/ et iO$ sont les numros de ligne des termes suprieurs des colonnes
i et s (ou galement les numros de colonne des termes de gauche des
lignes i et s).
Compte tenu de (4.32b) et (4.41) :
iOI = i - hJ(i) = i - KLD (i + 1) + KLD (i)
io, = s - hJ(s) = S - KLD (s + 1) + KLD (s) .
(5.48)
326
Mthode des lments finis
La figure 5.13 montre la position des diffrents termes de [K] qui
interviennent dans l'algorithme (5.47). Pour utiliser la mthode de stockage
vectoriel de [K] du paragraphe 4.6. 3e. il suffit de calculer les positions
dans les tables VKGS. VKGD. VKGI des termes de [K] qui apparaissent
dans (5.47). Ceci fait intervenir la table de pointeurs KLD (4.42).
m s
1"
,L
los
Kios ios
1 Kt
m
'"
r
;
~
K
Io
,;
l-
I::-- Icc-
~
Kml
~ r-=
l-
I
1 IKlml
Klj
Kis
~
1--
sH 1
IKsml
Ksi 1
Kss
1
1 1 1 1
Figure 5.13. Position des termes de [K] intervenant dans l'algorithme
(5.47).
Dans le cas d'un systme symtrique. l'algorithme (5.47) est modifi
pour viter les oprations sur le triangle infrieur de [K] et le stockage des
termes correspondants :
s = 2. 3 ..... n
li i
o
,+1 ..... s-1
lm ~ a x (iOI. io,) .... i - 1
K,s - K;s Kim K m ~
c=o
lm = i
o
.. ... i - ~
c = c + Kms/Kmm
Kms = Kms/Kmm
K.. = K,. - C .
'-----=--
(5.49)
La figure 5.14 dfinit les variables FORTRAN utilises dans le sous-
programme SOL qui met en uvre les algorithmes (5.47) et (5.49). Ce
sous-programme. list sur la figure 5.15. s'applique la rsolution des
Mthodes numriques
327
problmes symtriques (NSYM. EO . 0) ou non symtriques (NSYM.
EO . 1) dont la matrice est stocke par ligne de ciel dans les tables VKGS,
VKGD et VKGI (si NSYM . EO . 1) .
lM IN
JMIN
1
IJ
IMAX
lK
""
"'"
-1.
IJ
1""
-
VKGS
,
,
,
f-
r;-
1
... 1 1--'
1. 1 1
VKGl (JHK)
"'-VKGIIJCK)
IK
VKGS(JHKI)
,
1
1 C
1
-
1
I
L
VKGSIJCK)
HK=LHKI+I
1
1
1
r--
:----' VKGO(lK)
Figure 5.14, Variables FORTRAN du sous-programme SOL
(fig. 5.15).
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
sueROUTINE
RESOLUTION D'UN SYSTEME LINEAIRE SYMETRIOUE OU NON . LA HATRICE
STOCKEE PAR LIGNE DE CIEL,EN HEHOIRE DANS LES TABLES
VKCS ,VKGD,VKGI
ENTRf.:ES
YKCS , VKCD , YKCI HATRICE DU SYSTENE ; PARTIES SUPERIEURE ,
o UCONALt. 1 Hft:RI CURt
vrc
Kt,
HE'
HP
IrAC
ISOL
HSYM
SORTIES
VICGS,VICGD,VkCI
vrc
ENtRG
s eCOND HEHBKE
POINTEURS VERS LES HAUTS DE COLONNE
NOHBRE D'COUATIoNS
UNITE LOGIOUE D'IHPRES310N
SI IHC.ED . I TltI"tlGULARISATJON DE
LA HnRICE
SI 180L . EO . 1 CALCUL DE LA SOLUTION A
PARTIR DE LA HATRI CE TRJANCULARI5EE
IHDICE DE PR08LEHE HOK SYMETRIOUE
MATRICE TRIAHGULARISEE ( SI IrAe . EO.I)
SOI.UTION (St 180L.EO.I)
ENERGIE DU SYSTEME (SI M5YM.&0.0)
tSTSOI.
SOL
SOL
SOL
SOL
SOL
,
,
1
SOL 9
SOL. 10
SOL. II
SOL 12
SOL 13
801. 14
SOL. 15
SOL Je
SOL 17
SOL 18
SO L 19
SOL. 20
SOL. 21
Figure 5,15, Sous programme SOL de rsolution d'un systme linaire
matrice stocke par ligne de ciel, symtrique ou non.
Ce sous-programme est utilis par le programme MEF
du chapitre 6.
328 Mthode des lments finis
IHPLICIT 11:&0\1.+8 (A - II ,D-Z)
DIHENSION VlCes ( 1), H e D( 1), VKCI (1). vrC(l ) , !<LO( 1)
DATA ZERO/D.ODOI
SO L
SOL
SOL
c ............... . ...... ................ .. . .. . 501.
Hm\ SOI.
JF'(VKCD(l) .&Q .Z &RO ) GO TO BO SOI.
ENERe_ZERO SO L
e
C _ POUR CHAOUE COLONNe u " MODifIER
SOL
SOL
SOL e
JJlK.1 SOL
DO 100 U .. 2 , NEO SOL
C - POINTEUR DU HAUT DE LA COLONNE SUIVANTE lK+1 SOL
JHKI_ICLD(U .. I) S OL
C_- -- HAUTEUR DE LA COLONN!: lK (HORS TERNES SUPERIEUR ET OIACONAL ) SO L
t,HK_JHKlJHIC SOL
I.IIKI_I.HICI SOL
C I.JGNE DU PRENI&R T&R"!: A HODIfIER DANS LA GOLONNE: IIC SOL
IHIN-J)(LHICI SOL
IHINI_IHIN}
c t.ICNE DU D&RNIER TEII:Hf: A HODInel!: DANS L.A COLONNE II(
SOL
SOL
'OL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
e
IHU_JI()
1f' (LHIO . LLO) GO TO 100
If(IF'AC . NE . I) GO TO 90
If(HSYH . EO . I)
If(l.HkI.EO . O) GO l O 40
C. - HODrrIER l.CS TERHES HON DIACONAUX DE I.A COLONNE 11(
e
SOL
SOl.
C POUR CHAOUE TCRME Pl.ACE EH JCI::, CORRESPONDANT A LA COLONNE IJ SOL
DO 30 IJwIMIH ,JMAX SO I.
JHJl_nD(IJ+I) SOL
C ... MOMBRE OC TERMES MOOlflCATIFS DU TERME PLACE EN JCK SOL
le.M 1 MOPCK - JHK. JMJl - JMJ ) SOI.
IF(IC. I.E . O. AHO.NSYM . EO . O) GO TO ZO SOL
CI _ZERO SOL
If(JC.I.E .O) CO Ta Il SOL
Jl .. JIIJI-IC SOL
J Z .. JCX IC
If(NSYH.EQ.l) GO TO 15
VKGS(JCK) .. VKGS(JCK) 8CAI.(VKGS(Jl),VKG8(JZ),IC)
GO TO 20
18 VKCS(JCK) .. VKGS(JCk )SCAI.(VKGI(Jl) , VKCS ( J2),I C)
Cl.SCAI.(VKCS(JI),YKGI(JZ),lC)
17 VkCJ ( JCK)w (YI::G I(J CK)Cl)/ VKGD(IJ)
20 JCK .. JCK+ 1
30 JHJ.JIUI
e
c _. HOOIrIER I.E TeRME DIAGONAL
e
40 JCKwJHK
..
.0
10
COIAC_ZERO
DO 70 IJ .. IHIHl,IHAX
Cl .. VKGS(JCK)
Ir(HSYM.EO.l) GO TO 80
C2_Cl/VKGO( IJ)
YKGS(JCK) . ca
GO TO 60
CZ.VKCI(JCK)
CDIAG.CDIAC+CICZ
JCK.J CIC+I
VKGD(lk, .. YXCO(Ik) COIAC
Figure 5.15. (Suite).
SOL
SOL
'OL
'OL
SOL
SOL
'OL
SOL
SOL
'OL
'OL
SOL
SOL
'OL
'OL
SOL
SOL
SOL
SOL
'OL
80L
SOL
SOL
SOL
" 24
"
"
" 28
"
30
31
" 33
34
35
35
37
38
39
40
41
42
43
..
..
..
.,
..
..
.0
.1
"
=
83
..
"
"
" ..
..
60
'1
"
"
..
65
"
" ..
"
10
71
72
73
,.
" 76
77
76
79
80
81
" 83
..
..
..
Mthodes numriques
If(VKCD(IK 90,80,90
80 VRITC(HP,ZOOO) 11(
3000 pORMATe' ERREUR,PIVOT EOUATION ',J8)
STOP
c
c- RESOL.UTION DU SYSTEHe TRIANGULAIRt INfERIEUR
C
90 IP(JSOL.NE.I) CO TO 100
trINSYM. NE . 1) 'Ir 0 1 Ile ) .. rr'cc U:) - SCAL( VICOS(JHIC) HG (HIINI ) LNK)
If(NSYM. EO , I) VrC(IX)"VrC(IIC)SCAL(VICCI(JHIC),VfC(IHJNI) , LHIC)
100 JHl .. JHU
IP(ISOL.HE . I) RCTVRN
c
c- RESOLUTION DU SYSTEME DIAGONAL.
c
110
C
c- .
c
If(NSYH.EO.I) CO TO 120
DO 110 lK_l,NEO
CI-VkGD(IK)
CB_VPG(IIC)/Cl
VfG(U)"Ca
ENERG_ENERC. Cl +CZ+C3
RESOLUTION OU SYSTEHE TRIANGULAIRE SUPERIEUR
120 U_NI:O_l
JHICI_ICLD(IK)
130 lle.IICl
If(NSYH .EO.l) VrO(IK) .. VPC(IK)/VICeO(IIC)
Ir(IIe.EO.l) RETURN
Cl .. VfG(I!()
JIIK .. KLD(IIC)
JBIC_JHICIj
IFeJHIC.GT.JBIC)GO 10 160
IJ"II(J8K.JHK!
DO 140 JCK"JHK , J8K
VrC(IJ)_VrC(IJ)VICS(JCI)CI
140 1J"lhl
160 JHK1_JHK
c
c
CO TO 130
EHD
rUNCTION
PRODUIT DES VECTEURS X ET Y Dt N
(rONCTION A ECRIRE EH
DIHENSION X(I) . Y(I)
DATA ZERO/O . DDD/
SOL
SOL
SOL
'CL
'CL
SOL
SOL
SOL
'CL
'OL
SOL
'OL
SOL
SOL
'CL
'CL
'CL
SOL
SOL
SOL
'CL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SOL
SCAL
329
"
"
89
90
91
" 93
94
" ..
" ..
..
100
101
10'
103
104
lOS
106
107
108
109
11 0
III
112
113
Il<
115
116
117
118
110
120
121
1 Z2
'"
1"
!aS
la,
2
3
6
SCAL 8
SCAL 7
SCAL 8
C- _ . ... ..... - - _ .. . ...... _ .... . ...... .... _ ........ . . _ .... . . . SCAL
10
SCAL"ZERO SC AL 10
11
12
13
DO 10 1"I ,H
SCAL_SCAL.X(J)Y(J)
RETURN
END
Figure 5.15. (Suite).
SCAL
SCAL
SCAL 14
5.2.4.2 Matrice ligne de ciel segmente sur disque
L'algorithme (5.49) s'applique encore lorsque la matrice symtrique est
segmente sur disque selon la technique du paragraphe 4.6. 3g. Cet algo-
rithme modifie successivement les termes des colonnes s = 2, 3, .. " n,
Comme les colonnes sont stockes par bloc, nous lisons sur disque,
modifions puis rcrivons successivement sur disque les blocs 1, 2, .. " no.
330 Mthode des lments finis
blOC 1 bloC 2 blOC 3 bloc 4
D--'--- I"
Pour modifier les termes d'une colonne s dont le terme suprieur est en
ligne i03' l'algorithme utilise les termes des colonnes ~ 3 + 1, .... S - 1 :
par consquent, pour modifier toutes les colonnes d' un bloc donn, il faut
utiliser les termes des blocs prcdents connects celui-ci. La table
KPB contient le numro du Premier Bloc connect chaque bloc, Par
exemple dans le schma ci-dessus:
Blocs
1 2 3 4
. "
Numro du premier bloc connect 1 1 1 2
" .
D'o:
KPB = < 1 1 1 2 ". > .
La table KPB est construite en utilisant les tables KLD et KEB dfinies au
paragraphe 4.6.3. Un bloc J est connect au bloc J si
KEB (1 + 1) - 1 > Min (io,)
blocJ
soit d'aprs (5.48) :
KEB(l+ 1) -1 > Min(i- KLD(i+ 1) + KLD(i (5 . 50)
f
pour i variant de KEB (J) KEB (J + 1) - 1.
Mthodes numriques 331
Nous utilisons deux blocs rsidant en mmoire tout instant, et placs
dans la.able VKGS : le bloc contenant les colonnes modifier et un des
blocs c,mnects ce dernier. Les termes diagonaux et le vecteur {F}
restent en mmoire dans les tables VKG D et VFG.
Pour une matrice non symtrique {algorithme (5.47)) il faut utiliser
galement deux blocs du triangle infrieur placs dans la table VKGI.
La figure 5 . 16 prsente le sous-programme SOLO qui permet la rso-
lution de systmes symtriques ou non dont la matrice est segmente
sur disque.
c
c
c
c
t
c
c
c
c
c
e
c
c
c
c
c
c
c
c
c
c
c
c
SUBROUTINE SOLD(VKOS,VKGD,VKGI,VPG,KLD,N&O,HP,IPAC,ISOL,NSYH,&NERGSOLD
I,KED,ICP8 ) Sal.O 2
RESOLUTION D'UH SYSrCHE LINEAIRC SYMETRIOUE OU NON . LA "ATRIGE
CST STOCKEE PAR LICNE DE CIEL SUR LE PICHIER "4 . APRES 'RI"MeULA
RISATIDN ELLE EST PLACEE SUR LE PICHIER H8
SOLD
SOLO
SOLO
SOLO
SOLO
SOLO
SOLD
SOLO
SOLO
,
ENTREES
VICGS,'III!CD,VKGI
He
KLO
NEC
IF' AC
ISOL
MSYM
'"
KPB
SORTIES
VKCS,VKCD,YKCt
HG
ENERG
HATRIeE DU SYSTEME : PARTIES SUPERIEURE,
DIAGONALE, INFeRIEURE
SECOND NEMIIIE:
POINTEURS VERS LES HAUTS DE COLONNE
NOHBRE D'EDUATIONS
UNITE LOGIQUE D'INPRESSION
SI IrAe.EO.I TRIANGUL ARISATION DE
U . NATRICE
SI ISOL .EO.1 CALCUL DE LA SOLUTION l
PARTIR DE LA "ATRICE TR1AHGULAR1S&E
7
,
10
Il
12
SOLO 13
SOLO 14
SOLO 18
S OL O 18
SOLO l'
INDICE DE PROBLEKE HON SYMETRIOUE SOLO 18
NUNERO DE LA PRENIERE EOUATION DE CHAouE SOLO 19
BLOC SOLO 30
NUNERO DU PREHIER BLOC CONNECTE A CHAOUE SOLO 21
BLOC SOLO 22
SOLO 23
HATRICE TRIANGULARISEE (SI IF'AC.EO.I) SOLO 24
SOLUTION (SI ISOL .EO. I) SOLO 2!!!
ENERGIE DU S'tSTEME (SI N5'tM.EO.0) SOLO 26
IHPLJCJT REALS ( " H,OZ) SOLO 28
COMHON/LINO/NLBL.NBLH SOLO JO
COHHON/E5/ H,HR,HPI , Ml,HZ.H3,H4 . HIl SOLO 30
DIMENSION VICCS(I),VKGD{I) . VkGI(I),vrC(I),ICLD(I),II:EB(I),':PB(I) SOLO 31
DATA ZERO/O.ODOI SOLO 32
C,, ,, ,,,,,,,,,, 50LO 33
c
REVINO "4 SOLO 34
REVINO MS SOLO 38
1K .. 1 SOLO 36
IF'(VKCO(I).EO .ZERO) GO TO 80
ENERC.ZERO
SOLO 37
SOLO 36
SOLO 39
C POUR CHADUE BLOG A TRIAHCUL"RISER BOLO 40
e SOLD 41
Figure 5.16. Sous-programme SOLO de rsolution d'un systme
linaire matrice stocke par ligne de ciel et segmente
sur disque, symtrique ou non. Ce sous-programme est
utilis par le programme M EF du chapitre 6.
332
JlHIN_Nt.BL+1
JI HU.NL8t.."', 6t.
DO IDS 18_I,H8I."
Mthode des lments finis
c !.lItt UN BLOC " TRUNCIH.AR I SER
REAO("4) (VICCS(I) , I_I.Ht.81.)
If (NSVH . tO . I) READe"") (VKC1(1),I .. I,NI.81.)
C PARAtlnRtS DU BLOC lB
UO_ICEB( 18)
11(1 .. 1(1:8 ( 18.1)\
lBO .. I(P8(J8 )
JO_ kLD( J KO) .)
IPeIBO . Ea.JB) GO TO 11
c 8ACICSPACE SUR LES BLOCS CONNECTES
11-18tBO
00 10 '_J.U
BACKSI'",CE H6
1f'(NSYH . EO.I) BACKSPACE: MS
10 CONTINUE
C POUR 81.0C COHNECTE(INCt.UANT LE BLOC 18 LUIHEHE)
Il DO 103 t8C_l80,IB
1'(18C. 1:0.18) GO Ta 12
RtACCHS) (VkeSel),l _J)HI",JI""X)
Jf'(NSY".EQ .l) READ(HB) (VKCI(I),I _JIHIN,JIHAX)
C PAR,I,HETRES DU BLOC CONNECTE
12 iJO_ kE:8(UC)
c
IJI-I(&8 ( 18C+I))
Jco_no{ 110) 1
IrelaC. NE . IB) ICa_JCOIlLBt.
C POUR CHAOUE OU 18 A HOOlrlER
c
00 100 IIC.UO,!KI
JHK.ICI.D( !K)JO
C POINTeUR DU HAUT DE l.A COl.ONNE SUIVANTE IK+l
C HAUTEUR DE LA JI( (HORS TERHES SUPERIEUR ET DIAGONAL)
LHIC ... JHKI J HIC
LHICI.LNK 1
C LICHE DU PREHIER TERHE A HODIfIER DANS LA COLONNE IK
IHIN.U.LHKI
IHINI_tHI"l
C l.tOtu:: DU DERNIER TERNE A NODtPIER DANS LA COLONNE IIC
IHAX_JK ' 1
If(l.HICI . LT . O) GO TO 100
If(lfAC. HE.l) GO TO
If(NSYH . EO.O) GO TO 14
IB1"JB
If(ININl .LT.IKO) IBI.IBO
If(lBC .&Q,IBI) YICOJ(JHIC).VKOI(JHIC)/VKGD(IHIHI)
lot If(lBC.&O.IB.AHO . IK.EO.IICO) GO TO 40
00 TO 40
C TROUVER LA PREHIeRC CT LA DERNIERC LIGNE DE LA COI.OHMC II(
C PAR BLOC CONNECTE l!lC
c
'"IHC"HAIO(I"IH,IIO)
I"AXC_HIHO(IHAX.III)
IF(IHIHC . CT . IHAXC) CO TO 40
C MODifIER LES TERHES HON DIACOHAUX DE LA COLONNE IX
C
J CIC.JHX+IHINCIMIHI
JHJ_ICl.O(IHINC)JCO
C POUR CHAOUE TERME A HODlfIER PLACE EN JCK
0030 IJ_IHIHC,IHAXC
JHJI"XLD(IJ+l)JCO
Figure 5.16. (Suite).
" SOLO
" Sal.O ..
SOLO
" SOLO ..
" SOLO ..
SOLO ..
SOl.O
"
SOLO 51
SOLO
"
SOLO
"
SOLO
" SOLO 86
SOLO
" SOLO 61
SOLO
"
SOLO
" SOLO 60
SOLO 6l
SOLO
" SOLO 63
SOLO
" SOLO
" SOLO ..
SOLO
" SOLO ..
SOLO ..
,.
SOLO 11
SOLO 12
SOLO 13
SOLO
,.
SOLO
" SOLO
" Sal.O 11
SOLO
" SOLO
" SOLO BO
SOLO 81
Sal.O
" SOLD 83
Sal.O ..
SOLO 86
SOl.O 86
SOLD 81
SOLO 88
SOLD ..
SOLO
SOLO
"
SOLO
" SOLO
"
Sal.O ..
SOLO ..
SOLO ..
SOl.O
" SOLO ..
SOLO ..
SOLO
, ..
SOLO
,.,
SOLO
, "
SOLO
'03
SOLO
, ..
SOLO
10'
Mthodes numriques
.. _.. NOtlllRE oc TERMES HODIrICATIPS DU TERME PLACE EN JeK
IC_HINOpCKJHK,JHJlJIIJ)
rp(IC.LE.O.AND.NSYH.EO.O) GO TO 20
CI_ZERO
rr(JC.LE.D) co TO 11
JI .. JHJ1IC
Ja_Jel( le
IP(NSYH.EO.l) GO TO 16
VKCS(JCK) .. VKCS(JCK)SCAL(VKGS(Jl),VKCS(J2),IC)
GO TO 20
15 VKGS(JCK) .. VKeS(JCK). SCAL(VKCI(Jl), VKCS(J2). le)
Cl_SCAL(VKCS(Jl),VKGI(J2"IC)
17 nG! (Jel()- ('KG 1 (Jel<) . Cl) l'KOB( IJ)
20 JCK .. JCK+I
30 JMJ,,}HJI
C
..... HODlfIER LE TERHE DIACONAL
C
40 rp(18C.NE.IB) co TO 90
JCK"JHK
Cil lAC_ZERO
DO 70 IJ_IMINI,IHAX
CI_VKGS(JCX)
IP(HSYH.EO.I) GO TO 50
CZ .. C1/VKGD(IJ)
VkCS(JCK) .. C2
GO TO 60
50 CZ .. VKGI(JCK)
60 CDIAG_CDJAG+CI_C2
70 JCK_JCK+l
VKGD(IK)_VKGD(IK)_CDIAG
rp(VKGD(IK 90,80,90
80 YRITE(HP,2000) II(
3000 fORMAT(' ERREUR,PIVOT NUL EOUATION ',lB)
STOP
C
C RESOLUTION OU SYSTEME TRIANGULAIRE INfERIEUR
c
90 If(ISOL.NE.l) GO TO 100
If(IBG.NE.IB) GO TO 100
rr(NSYM. NE.1) vrG( lIo.vrG( II() SCAL(VKGS( JHK) ,vrG( IHINl), LIllO
rr(NSYH. EO.1) vrG( IK ) .. VPG( II(). SCAL( VKGI (JHK) ,vrG( IHINl) ,LHK)
100 CONTINUE
C - -. PROCHAIN BLOC CONNECTE
103 CONTINUE
C----- rIN DE L'ELIMINATION OU BLOC
If(IB.EO.NBLH) GO TO 105
'i'RITE(MB) (VKCS(I),I .. l,NLBL)
Ir(NSYH.EO.l) 'i'RITE(M5) (VKGI(I),I .. l,NLBL)
lOB CONTINUE
If(ISOL.NE.l) RETURN
c
C- - RESOLUTION DU SYSTEHE DIAGONAL
C
c
IP(NSYH.EQ.l) CO TO 130
00 110 IK_I,NEO
Cl .. VKGD(IK)
ca.vrG(IK)/CI
vrG( 1K) .. ClI
C- RESOLUTION DU SYSTEME TRIANGULAIRE SUPERIEUR
C
Figure 5.16.
(Suite) .
333
SOLO
1"
SOLO 107
SOLO 108
SOLO 1 09
SOLD 110
SOLO III
SOLO
"' SOLO 113
SOLO II<
SOLO 118
SOLO 116
SOLO 117
SOLO 118
SOLO 118
SOLO 120
SOLO 121
SOLO
1"
SOLO 123
SOLO 124
SOLO
12'
SOLO
12'
SOLO 127
SOLO
1"
SOLO 128
SOLD 130
SOLO 131
SOLO ln
SOLO 133
SOLO
1"
SOLO
136
SOLO 136
SOLO 137
SOLO 136
SOLO 136
SOLO 140
SOLO 1< 1
SOLO
1"
SOLO 1<3
SOLO 1<4
SOLO 1<8
SOLO 148
SOLO 147
SOLO 148
SOLO 148
SOLD 150
SOLO 1 SI
SOLO
18'
SOLO 183
SOLO 18.
SOLO 188
SOLO 188
SOLO 187
SOLO
1"
SOLO 188
SOLO 180
SOLO 181
SOLO 182
SOLO 163
SOLO 16.
SOLO
1"
SOLO 168
SOLD 187
SOLO 188
334 Mthode des lments finis
120 I B- NBLH
(l(O-K&II(II1))
JO .. KL.D(IKO+I).)
IIC .. H&O.I
JHIO .. UO(U) JO
C POUR CHAOUE &OUATIOH DE NCO ... 1
130 IK.IK)
c CIRE UN BLOC SI NECESS AIRE
If (IK,HE , llCO) CO Ta 136
BACKS PACE H9
IP(NSYH.EO.l) IlACKSP ACC H5
REAO(HB) (VKeSel),l_) ,HL8L )
IF(tfSYILEO . I ) READ(HS ) ( VI(CI(I),I_I,NI.II1. )
BACkSJ'ACE HS
1f'(HSYH.EO . I ) 8ACKSPACt HS
III _ IB)
lKO .. KEB( IB) - )
JO .. KL.D( IKO+l ) . )
JHK1_ KLD(IK.I) J O
C HOO lrJER LE V&CTEUR Des INCONNUES
13e IF(HSYH. EO.l) vrC(I10 - VFU(IK1/VICGD(IK)
1f' (IK.EO.l) RtTURN
Cl" YPG(IK)
JItK .. Kt,D(lK)JO
JlUC.JHKll
IP(JU".GT.JBK)GO TO 160
IJ-lI( . J8"+J"" \
DO 140 JC" .. JHK,J8K
YPC(lJ) .. VPC(JJ)VKCS (JCK) Cl
140 IJ_IJ+I
180 J"IO_J"I(
GO fO 130
'"0
Figure 5.16. (Suite).
5.3 Rsolution de systmes non linaires
5 . 3 . 1 INTRODUCTION
SOLO
1"
SOLO 170
SOLO 171
SOLO 17.
SOLO 173
SOLO 114
SOLD
116
SOLD
'" SOLO 117
SOLO
'"
SOLO 170
SOLO 180
SOI.D
181
SOLO
1"
SOl.O 183
SOLO 18.
SOLO
18'
SOL.D
1"
SOLO
18'
SOLO
1"
SOLO
1"
SOLO 100
SOLO
"1
SOLO
1"
501.0
1"
SOLO ...
SOLO
1"
SOLO 1 ..
SOLO
1"
SOLO
1"
SOLO
1"
SOLO
300
SOLO
'01
Des non-linarits apparaissent dans la formulation de probl mes
physiques pour deux raisons:
- Les paramtres physiques supposs indpendants de U, dans un
modle linaire, t els que le module d'Young, les coefficients de conducti-
vit et viscosit, etc ... , deviennent des fonct ions de U, . C'est par exemple
le cas dans la plasticit, dans les coulements non newtoni ens, dans les
coulements en mi lieux poreux non saturs.
=
Mthodes numriques 335
- Des termes non linaires par rapport aux inconnues du problme
apparaissent dans les quations aux drives partielles, mme lorsque les
proprits physiques sont indpendantes de U .. Par exemple dans les
quations de Navier Stokes (exemple 3.2) apparaissent les termes
ou au
u-+v-+
ax ay
et en lasticit avec grands dplacements (exemple 4.5) :
au 1 (av)'
f.
x
= ox +"2 x
La mthode des lments finis conduit une formulation discrtise des
problmes non linaires qui peut s'crire sous la forme (4.5b) :
w = < oV, > ([K(V,)] {V,} - (F}) = 0 pourtout < oV, >
ou en remplaant Un par U pour simplifier les notations:
[K (V)] { V } = { F} ou (R (V) } = {F} - [K (V)] { V} = 0 .
(5.51)
Dans certains cas (plasticit), seule existe une forme incrmentale de
(5.51) :
[K (V)] { AV} = { AF } .
(5.52)
Rsoudre le systme non linaire (5. 51), c'est chercher un vecteur { V}
qui rende le rsidu (R(V)} aussi proche que possible de zro, La solution
exacte rend (R(V) } nul.
La recherche de la solution { V} se fait de manire itrative:
prdlcllon
nlimollon
Ir
ltfol
luol
correction
AIQorllhme.
wlullon omellOt"
dlverQflICt
c h n ~ t r l'olvorlthme
- chonQer 10 !ollillon Inltiole
solullon iul
336 Mthode des lments finis
La majorit des algorithmes conduit rsoudre un systme d'qua-
tians linaires chaque itration. Le choix d'un algorithme de rsolution
doit tenir compte de plusieurs facteurs :
- le type ' de non-linarit: localise ou non, prpondrante ou non
- l'existence de une 'ou plusieurs solutions;
- la disponibilit d'une mthode de construction d'une solution
approche
la prcision et la rapidit de convergence dsires ;
- le risque de divergence.
En pratique il n'existe pas de mthode gnrale valable pour tous les cas;
la stratgie de rsolution doit s'adapter, par exprience, une classe de
problmes donne, en faisant appel une combinaison des trois mthodes
de base suivantes :
-. Mthode de substitution
Mthode de Newton-Raphson
- Mthode incrmentale.
5,3.2 Mt:THODE DE SUBSTITUTION
Cette mthode consiste construire une suite de solutions [V}.
[V' ) ... [V'); [V') tant calcule partir de [V
'
-
I
) en rsolvant le
systme linaire
[K (V' - 1)] [ V' ) = { F } ; i = 1, 2, 3 ...
(5.53)
ce qui peut s'crire sous forme incrmentale en introduisant le rsidu
( R') :
(R') = {R(V'"') } = (F) - [K(V'-I)] (VI-I )
[K(VI-I )] {I!.V'} = (R')
( V') = ( V i-I ) + ( I!.V' ) .
(5 . 54)
Le vecteur ( V'-l ) tant connu, nous pouvons construire les matrices
lmentaires [k(ui-l)). puis les assembler pour obtenir [K(V'-I)] et
enfin rsoudre le systme linaire (5 . 54) en ( I!.V' ) par l'une des mthodes
du paragraphe 5.2.
L'algorithme correspondant 5.54 est le suivant :
Mthodes numriques 337
Algorithme de substitution
Calculer une solution approche { VO l, ventuellement nulle.
Construire {F 1 par assemblage des vecteurs lmentaires { f l
i = 1,2, ". (pour chaque itration)
. Pour chaque lment
Extraire les valeurs { u'-, 1 de { V'-, 1
Calculer [k(u'-')]
Calculer le rsidu lmentaire {r 1 = { f } - [k] { u
'
-, 1
Assembler comme dans un problme linaire:
[k] dans [K]
{ r 1 dans {R' 1 .
(5.55)
Rsoudre comme dans un problme linaire: [K] { "V' 1 = { R' 1
Construire la nouvelle estimation de la solution:
{ V' 1 = ( VH ) + w { "V' 1
Calculer la norme Il n Il de { "Vi 1 ou Il m Il de ( R' l.
Test de convergence utilisant Il n Il ou Il mil.
Remarques
a) Sur-relaxation
Le facteur de sur-relaxation ru, utilis dans (5.55), permet souvent
d'amliorer la vitesse de convergence, Sa valeur optimale dpend du pro-
blme; elle est dtermine par exprimentation numrique. Dans les
problmes de plasticit par exemple elle se situe entre 1 .7 et 1.9. La
mthode sans sur-relaxation correspond co = 1.
b) Normes
Pour le test de convergence l'itration i, nous pouvons utiliser soit la
norme du maximum:
Il n Il = ~ x l "Vj l'ou Il m Il = ~ x 1 Rj l'
J J
(5.56)
soit la norme des moindres carrs:
Il n Il = J < "V' > {"V' 1 ou Il m Il = J < R' > {R' l
(5.57)
338 Mthode des lments finis
KIU)UP
u
U'
0) convergence b) dlverljenCe
MTHODE DE SU8STITUTION : (Algorithme: 5.55)
U
METHODE DE NEWTON-RAPHSON MODIFIE: (Algorithme: 5.62)
U
MTHODE DE NEWTON-RAPHSON: (Algorithme: 6.66)
Figure 5.17. Reprsentation graphique des algorithmes dans le cas
d'une variable.
Mthodes numriques 339
p
p,. F =F
P='\ Fo
u, u, u
ME:THODE INCRtMENTALE A UNE ITERATION DE NEWTON-RAPHSON : (Algorithme: 5.78).
Figure 5.17. (Suite).
En pratique nous utilisons souvent des normes relatives :
Il n Il = Miax 1 . ~ j r
(5 . 58)
(si Vi est trs petit par rapport la valeur moyenne des termes de { V} ou
gal zro. on peut remplacer V
j
par 1 )
ou bien :
Il n Il = J < I!.V
I
> { {lU 1 }
J < Vi> { VI }
Le processus itratif est arrt lorsque
Il n Il < r.
avec, par exemple, pour la norme (5.59) : = 0,05.
(5.59)
Dans un problme une variable, l'algorithme (5.55) est prsent
graphiquement sur la figure 5.17, de manire souligner les possibilits
de divergence.
EXEMPLE 5 .16. Ressort non linaire : mthode de substitution.
Considrons un ressort soumis une force F = 0,2, dont la rigidit
k dpend de l'allongement V du ressort (non-linarit physique)
soit :
k.V = F
(1 - V).V= F.
340 Mthode des lments (inis
Choisissons comme estimation initiale UO = 0 et utilisons /' algo-
rithme (5.55):
Itra-
U
i
-
I
k ~
R
i
= AU
I
= U'=
Il n Il
tion i
1 ~ U i 1
F-k(Ui-').U
i
-'
k-
'
Ri
U
i
-
l
+ I1U
i
(5.58)
1 0 1 0,2 0,2 0,2
1
2 0,2 0,8 0,04 0,05 0,25 0,2
3 0,25 0,75 0,012 5 0,0167 0,2667 0,06
4 0,2667 0,733 0,0044 0,006 0,272 7
0,02
Solutions exactes: 0,5 + JO,05 = 0,2764 et 0,7236.
Reformulons (5.54) en dcomposant [KI en une somme d'une matrice
[K,l constante et d'une matrice [K"l fonction de V :
([Kil + [K,,(U
i
-'))) (/;,V
i
J = (Ri). (5.60)
Dans l'algorithme (5.55). il faut assembler et dcomposer [KI chaque
itration, ce qui est trs coteux .. En ngligeant [K"I dans (5.60), nous
obtenons :
[K,l{ /;,V i J = { Ri 1
(5.61)
{V'} = {V'-' } + { /;,U
'
} .
La matrice [Kil peut tre dcompose une seule fois; dans chaque itration
il suffit de calculer { Ri} puis d'valuer ( /;,V
'
) partir de [Kil dj dcom-
pose. L'algorithme correspondant (5.61) est le suivant:
Algorithme de Newton-Raphson modifi
Calculer une solution approche ( VO J, ventuellement nulle.
Construire ( F J par assemblage des vecteurs lmentaires ( ( ).
Construire [Kil par assemblage des matrices lmentaires linaires
[k Il.
Dcomposer [Kil.
i = 1,2,... (pour chaque itration)
Pour chaque lment
Extraire (u
i
-') de (V
i
-')
Calculer le rsidu (R i) par assemblage des rsidus lmen-
taires :
( r J = ( ( ) - [k) ( u' -, ) .
Rsoudre [K,] ( /;,v' ) = (R' J partir de [Kil dcompose
Calculer ( V') = (V
'
-') + (/;,V' J (en supposant w = 1)
Calculer Il n Il
Test de convergence utilisant Il n Il.
(5.62)
Mthodes numriques 341
Cet algorithme est prsent graphiquement dans le cas d'une variable
sur la figure 5.17.
EXEMPLE 5.17. Ressort non linaire mthode d,,""Newton-Raphson
modifie.
Dans l'exemple prcdent:
k = (1 - V) = k, + k,,(V)
o: k, = 1
k
n
/ = - U.
Vtilisons l'algorithme (5,62) :
Itra-
U
'
-
I
k,
k= R
i
= t1U
i
= U
i
=
Il n Il
tion i 1
- U
'
-
I
F_k.,U
i
-
1
k,-I RI
U'-l + U
i
(5.58)
1 0 1 1 0,2 0,2 0,2 1
2 0,2 1 0,8 0,04 0,04 0,24 0,166
3
0,24 1 0,76 0,0176 0,017 6 0,257 6 0,068
4 0,2576 1 0,7424 0,0087 0,0087 0,2663 0,032
Dans l'algorithme (5,62) la matrice [K,) est assemble et dcompose
une seule fois, alors que dans l'algorithme (5.55), il faut assembler et
dcomposer [K) chaque itration. L'algorithme (5,62) est souvent
employ dans le cas de non-linarits faibles. Par contre pour les problmes
fortement non linaires, la mthode de Newton-Raphson, prsente au
paragraphe suivant, est plus souvent utilise que (5,55) car elle converge
en gnral plus rapidement.
5,3,3 MTHODE DE NEWTON-RAPHSON
Supposons qu' l'itration i - 1 nous ayons obtenu une approximation
Vi -, de la solution telle que le rsidu ne soit pas nul.
(5,63)
A l'itration i nous cherchons une approximation V' de la solution telle.
que:
(R(V') } = (R(VI-I + t1V') } '" 0,
(5.64 )
342 Mthode des lments finis
L'algorithme est obtenu en dveloppant ce rsidu en srie de Taylor au
voisinage de U
i
-
l
:
{R(V
H
+ !1V')) = {R(V'-I)} + [OR] {!1V' l + H' = 0,
au U""UI-I
D'o, en ngligeant les termes d'ordre suprieur 1 :
ou:
- {!1V') = (R(V'-') l
[K,(V
H
)] {!1V' l = {R(V'-I)}
{ V' l = { V ,- 1 l + { !1V 1 l '
(5,65)
(5,66)
L'expression de la matrice tangente [K,( V' -1)] s'obtient en drivant
l'expression (5,51) du rsidu:
(5,67)
Dans le cas o F est indpendant de U :
[K, (V)] = [K(V)] + { V l] (5,68)
ou encore, si (K,)I) et KI} sont les composantes des matrices [K,] et [K] :
K;,
(K,);} = KI} + av} V, '
L'algorithme correspondant (5,66) est semblable l'algorithme (5,55).
cependant [K] est remplace par [K,]. Il est reprsent graphiquement sur
la figure 5,17, dans le cas d'une seule variable,
EXEMPLE 5,18, Ressort non linaire: mthode de Newton-Raphson.
Dans l'exemple prcdent :
k
k, = k + ?V V = (1 - V) + (- 1) V = 1 - 2 V,
Itration
U
I
-
L
k, = k=
R'= ,16U'=
U
l
=
i
1-2U'-11
.:.. U
l
-
l
F-kU
I
-
'
k
,
-
1
R
i
U
I
-
I
+ AU
I
1
1 1 0,2 0,2 0,2
2 0,2 0,6 0,8 0,04 0,0667 0,2667
3 0,2667 0,466 0,7333 0,0044 0,0095 0,2762
Il n Il
(5,58)
1
0,25
0,3
Mthodes numriques 343
Construction de [K,]
La matrice tangente globale [K,] est obtenue en pratique par assemblage
des matrices lmentaires tangentes [k,]. Cependant l'utilisation d'une
expression de type (5.67) pour construire [k,] est difficile car il faut driver
l'expression explicite de [k(u)] par rapport aux variables nodales { u), Il
est plus simple de partir de la forme intgrale non discrtise (4,3) :
W(u) = L: W' = L: f o(u) R(u) dV = O.
e e ~
(5,69)
Dveloppons W en srie de Taylor au voisinage de u'-' pour obtenir une
expression correspondant (5,65) :
(5.70)
o Ii(W) est la premire variation de W.
En utilisant une approximation par lments finis de u, nous obtenons
des expressions discrtises de W(u'-') et de t5(W) qui peuvent s'crire:
W(Ui-I) = < oU" > ([K(Ui-i)] (U,:-' 1 - (F Il
- - < oU" > {R(Ui-i))
W(U'-') = < oU" > [K,(U'-')) ( !J.U' ]
(5.71)
(5.72)
o { !J.U' 1 remplace la variation (oU") de ( U") au cours d'une itration,
La relation (5,70) s'crit sous forme discrte:
ce qui est identique (5,66).
pour tout < oU., >
(5,73)
Nous pouvons donc obtenir [K,] en discrtisant directement
figure 5.18 souligne les deux mthodes de construction de [K,].
Fonctionnelle Ir
si elle existe
01 (variation)
Forme intgrale
0
Premire variation
de la forme intgrale
W = 0 = on
oW = o2n
discrtisation discrtisation
(lments finis) (lments finis
[K(UI)(U) ~ {F}
0
[K,(U}) { AU} = (R(U) 1
Figure 5,18, Mthodes de construction de [K,],
ow. La
344 Mthode des Mments finis
EXEMPLE 5 . 19. Matrice [kJ et [k,J pour une poutre.
La forme in({;grale lmentaire d'une poutre en grands dplBce-
ments a t obtenue dans l'exemple 4.5 :
W = f & > [DJ { ,} - < ou ow> { } ) dx
o:
o:
puisque:
{
"Km} =
{,} = -
d'w
- dx'
[DJ=[E:
O(W') = f Or. > [DJ {oR) + < 0', > [DJ (,})dx
+
{ br.} = _ o(
{ O', } =
o
o'u = o'w = O.
En discrtisant par lments finis :
u = < N, > {u,}
w = < N. > { w.}
{e} = ([B,J + [B.,ll = [BJ {u'}
[B,J =
[
< N,.> > 0 ]
o - < N
w
.:
u
>
1
_ [0 2: N ... , > (w.}) < N . > >]
[B.,] - O 0
{ 0' } = ([B,J + 2[B.,1l ( ou' ) .
Mthodes numriques 345
Alors : W' = < bu' > (\kl { u' } - ( f ' })
(kl = JUB'I + 2(B.,))''IOI (lB,1 + (B.,)) dx .
Cette matrice non symtrique peut tre rorganise sous forme
symtrique (voir exemple 4.5) :
(kl = (k,1 + (k!,1 + (k;,1 + (k.1
(k,1 = J [B,l' (O](B,I dx
(k!,1 = J (lB.,V (DI [B,I + [B,lr [DI [B.,)) dx
(k;,1 = f (B.,r (DI (B.,I dx
(k.1 = [: J{ N . . ,) (EA:) < N .... , > dx J
bW' = < bu' > (k'l { bu' }
(k,l = (k,l + 2[k!,1 + 4(k;,] + [k.1 .
= [kl + [k!,1 + 3[k;,1 .
S'il existe une fonctionnelle n, les matrices [k,1 et [K,l sont symtriques;
en effet, si
n = n(V" V" .... V.)
o V" V" ... , V. sont les variables nodales
et
6W = 'n = < JV. > (K,I (bV. 1
a
2
n
2
n
(K,L) = av. av. = (K,)), = av) av ..
, J ,
5.3.4 Mf':THODE INCRf':MENTALE (OU PAS A PAS)
(5.74)
(5.75 )
La solution initiale joue .un rle important dans les mthodes itratives
prcdentes. Selon le choix de cette solution, les mthodes peuvent diver-
ger ou converger vers une solution non acceptable.
La mthode incrmentale consiste remplacer la rsolution de
[K(V)]{V} = ). {Fo} = {F} (5.76)
346 Mthode des lments finis
par la rsolution successive de
o:
[K(V)] (V
j
) = ).j{ Fo)
).j = " " ... , .
(5.77)
La solution initiale utilise pour calculer V
j
est la solution V
j
_, obtenue
l'tape prcdente. Chaque tape constitue un problme non linaire
qui se rsout avec une ou plusieurs i'trations de la mthode de Newton-
Raphson ou de Newton-Raphson modifie.
La mthode incrmenta le, utilisant une itration de Newton-
Raphson chaque tape, s'crit pour un niveau donn de sollicitations , :
{R(V
j
_ ,)} = ,lj_, (Fo) - [K(V
j
_, )] (V
j
_ ,)
[K,(V
j
_,)] ( t!.V
j
) = [R(V
j
_ ,) ) + (j -
j
_ ,) (Fo)
(5.78)
Cet algorithme est prsent graphiquement pour une variable sur la
figure 5.17.
La mthode incrmentale utilisant plusieurs itrations de Newton-'
Raphson s'crit pour un niveau donn de sollicitations j
[K,(Vj-')] (t!.Vj) = [R(Vi-') + (j -
j
_,) (F
o
)
(Vn = (Vj-') + (t!.Vj) i= 2,3, ...
Pour i = l, on utilise directement (5.78).
EXEMPLE 5.20. Ressort non linaire: mthode incrmentale.
(5.79)
Appliquons le chargement F = 0,2 de l'exemple prcdent sous la
forme de deux accroissements :
)., = 0,5 , = 1 Fo = 0,2 .
Vtilisons l'algorithme (5.79) :
Itra- U
j
-
l
Pasj J.
j
Fo
tion ou
r(V
j
- ,)
R k,(V
j
_,) t!.V
V'
j
i (Vj-')
,
1 0,1 1 0 1 0,1 1 0,1 0,1
2 0,2 1 0,1 0,9 0,11 0,8 0,137 5 0,2375
0,2 2 0,2375 0,7625 0,019 0,525 0,0362 0,2737
Mthodes numriques 347
5.3.5 CHANGEMENT DES VARIABLES INDEPENDANTES [12J
Jusqu'ici nous avons suppos, les sollicitations donnes, les inconnues
tant les variables nodales { V,). Dans certains problmes, il existe plu-
sieurs solutions {V,) correspondant un vecteur sollicitations .\ { Fo )
donn:
F' fo
E
,
Les mthodes prsentes jusqu'ici, par exemple celle de Newton- Raph-
son, peuvent fournir la solution dans les rgions OAB et EDC. Pour obtenir
la solution dans le domaine BC, nous pouvons considrer une compo-
sante U
I
comme connue et le niveau de sollicitation comme inconnu.
En effet entre B et C il existe un seul vecteur .\ { F) qui correspond une
valeur donne V, de V,.
L'algorithme (5.79) s'crit:
[K,J { I1V ) = { R) + 11.\ { Fo ) .
(5.80)
Transfrons 11.\ dans le vecteur des inconnues, et imposons I1V, = 0
colonne 1
l
I1V,
K'm
AV,_,
A.l
-
{ R ) (5.81 )
AU'+1
K,,,,,
11 V,
et:
V, = V,.
Le remplacement de la colonne 1 de [K,J par {Fo ) change la structure
de cette matrice : elle devient non symtrique et sa largeur de bande
change. Pour viter cet inconvnient, nous pouvons rsoudre (5.80).
348 Mthode des lments finis
deux fois, avec des seconds membres diffrents, en utilisant la mme
matrice [K,].
[K,] ( 6V
R
) ~ (R )
[K,] ( 6V
F
) ~ (Fo ) .
La solution de (5.80) est alors :
( 6V) ~ ( 6V
R
) + 6.1. ( 6V' ) .
L'inconnue 6.1. est obtenue en crivant:
6V, ~ 0 ~ 6V," + 6.1. 6Vt
L'algorithme correspondant s'crit
Pas de charge i
Modifier la composante 1 de V
j
_,
(V
j
_,), ~ V,
Itration i
Calculer le rsidu ( R )
Calculer la matrice [K,]
Rsoudre [K,] ( 6V
R
) ~ (R )
[K,] ( 6V' ) ~ (Fo )
6V
R
Calculer 6), ~ - ~
6V,
(V) ~ (V) + (6V
R
) + 6.1. {6V'}
.1. ~ .1. + 6.1.
Test de convergence.
(5.82)
(5.83)
(5.84)
(5.85)
Mthodes numriques 349
5.3.6 STRATGIE DE RSOLUTION
Toutes les mthodes prcdentes peuvent se ramener un seul algo-
rithme qui. un niveau de sollicitation donn, est schmatis ainsi:
:
choix de la solution approche
CORRECTION
amlioration de la soluton
- calcul du rsidu t fi 1 1
- rsolution de
IK,116U'I-IR'j
_ {UHl}={U'}+w{IlU'}
convergence
Solution
Ouelle que soit la mthode utilise, l'expression du rsidu ( fi ) reste la
mme car elle est caractristique de l'quation rsoudre. Par contre
l'expression de la matrice [K,] varie d'une mthode l'autre et influence la
vitesse de convergence:
[K,] '" [K] pour la mthode de substitution
[K,] '" [K,] pour la mthode de NewtonRaphson modifie
[K,] '" [K,] pour la mthode de Newton- Raphson.
350
Mthode des lments finis
En choisissant d'autres expressions de [K,] nous pouvons retrouver les
mthodes itratives utilises pour rsoudre les systmes d'quations
linaires, Le facteur de sur-relaxation w permet souvent d'amliorer la
vitesse de convergence.
Par exemple
pour la mthode de Jacobi
o
IK,] = pour la mthode de Gauss-Seidel.
o
. .. 'Knn
La figure 5.19 dtaille l'algorithme commun aux diffrentes mthodes,
dans lequel il faut choisir:
- le nombre et la grandeur de chaque accroissement (ou pas) de solli-
citation ~ i
- le nombre maximum d'itrations par pas de sollicitation, ainsi que le
critre de convergence (type de norme et prcision dsire) .
- le type de matrice utilise chaque itration pour calculer la correc-
tion ( !1U ); selon la valeur de IMETH; on peut utiliser par exemple [K,] de
(5.61), [K(U' Il] de (5.54), [K,(U
H
)] de (5.68)
- la technique de prdiction utilise au dbut de chaque accroissement
de sollicitation
- le coefficient de sur-relaxation w.
Toutes les dcisions prcdentes dpendent du problme trait: il est
parfois ncessaire d'utiliser des pas de sollicitation trs petits pour des
raisons de convergence ou parce que la formulation du problme est de
nature incrmentale comme en plasticit; il peut alors suffire d'un nombre
rduit d'itrations par pas. Remarquons que l'algorithme de la figure 5.19
est pratiquement identique celui de la figure 5.21 qui correspond la
rsolution de problmes non stationnaires et non linaires.
Mthodes numriques
Choix de w, 6,l, 1 M ETH
IKT 1
.1. 0
Pas de sollicitation j : .1. .1. + 6.1.
Prdiction : { V
j
} { V
j
_
1
} ou extrapolation de
{V
j
_
1
}. {V
j
_
2
}, ".
i 0
Itration: i i + 1
. Elments:
351
1.,
[J] 0
;., " 0].
-:."
(5.214)
Les valeurs propres Il constituent des approximations des valeurs
propres du systme original (5.170). Ces approximations sont d'autant
meilleures que les vecteurs de Ritz gnrent un sous-espace qui contient
les vecteurs propres cherchs .. De plus, les valeurs propres approches J,
et exactes ,li vrifient une relation semblable (5 . 194)
(5. 215)
De manire obtenir rapidement les plus petites valeurs propres, nous
pouvons choisir comme vecteurs de Ritz les solutions de
(5.216)
o (F,) sont des vecteurs units qui sollicitent les degrs de libert i
Kil
correspondant aux plus petites valeurs de - .
Mu'
0
0
( F, )
1 +-ligne i
0
Les vecteurs propres approchs de (5.170) sont obtenus partir des
vecteurs (A, ) grce (5.211 J.
5 . 5.3.4 Mthode du sous-espace
Cette mthode est trs largement utilise pour calculer les p premires
valeurs propres d'un systme de grande dimension. Elle consiste appli-
Mthodes numriques 403
Quer plusieurs foi s la mthode de Ritz en amliorant les vecteurs de Ritz
par itration inverse. La mthode de Ritz force les vecteurs ( X ) rester
orthogonaux entre eux, alors que l'itration inverse ajuste la base
tarielle de Ritz, de manire assurer la convergence vers les vecteurs
propres correspondant aux plus petites valeurs propres.
La mthode du sous-espace en chaine les oprations suivantes
a) Choisir p vecteurs initiaux:
[X] = [(X,) (X,) ... (X,)]. (5.217)
b) Excuter une itration inverse (fig. 5.23) pour calculer simultanment
les p vecteurs de Ritz ( Q, l en rsolvant:
[K] (q, ) = [M] {X,} = (F. , ) i = 1,2, .. " P
[K} [0] = [M] [X] .
(5.218)
c) Appliquer la mthode de Ritz pour chercher les vecteurs propres
dans le sous-espace de Ritz :
o:
([K] - '-dM]) (A,) = 0 (Jacobi)
[K] = [01' [K] [0]
[M] = [OIT [M] [0]
{X;] = [0] (Ad.
(5.219)
d) Tester la convergence de 1, et rpter si ncessaire les oprations
b, c, d.
La mthode converge vers les p plus petites valeurs propres, condition
que les p vecteurs initiaux {X,} ne soient pas M-orthogonaux l'un des
p vecteurs propres cherchs. Nous pouvons nous assurer que les p valeurs
propres trouves sont bien les p plus petites en utilisant la proprit
(5 . 195) des suites de Sturm. Pour cela, il faut dcomposer la matrice
[K] - (oi, + e) [M) et vrifier qu' il existe p pivots ngatifs dans la dcom-
position (e de l'ordre de 10-
2
10 - ') . La mthode du sous-espace sera
mise en uvre dans le programme M EF du chapitre 6 (bloc 'VALP').
Remarques
- Les matrices (K] et [M) tendent vers des matrices diagonales, ce
qui augmente l'efficacit de la mthode de Jacobi.
- Si nous dsirons calculer p valeurs propres, il est plus rapide d'uti-
liser un de dimension q suprieure p, en ne vrifiant que
la convergence des p plus petites valeurs propres. Nous pouvons utiliser
la valeur q = Min (p + 8, 2p) propose dans [11].
404
Mthode des lments finis
- Dans la pratique, les vecteurs initiaux sont souvent choisis de la
manire suivante: {XI} est un vecteur alatoire; les autres vecteurs
sont:
o o
0
1 -ligne il
{X
3
} =
0
{ X, } =
0 0
etc.
0 1 -ligne 1
2
o o
O i,. ;2, ... sont les indices j correspondant aux plus petites valeurs
K ..
successives de Ni: ..
"
RSULTATS IMPORTANTS
Intgration numrique
LL
ou
LLL
,
[k] = l
i = 1
,
(5.4)
{fI = l w,
1'" 1
f
' ,
_, y() d = ,f:, w, y(,)
(5.5)
,
y(, d = l w, y(" (5.14 )
j = 1
r1
= L l w, w) y("
(5.15)
i=1 J=I
"
l w, w
j
w, y(" (,) .
,= ,
(5.20)
Mthodes numriques
Rsolution de systmes d'quations linaires
[K]{ V, } = { F} .
Algorithme d'limination de Gauss
[K] = [L] [S] (dcomposition)
[K] = [L] [D] rU].
405
(5.22)
(5.26)
(5.28)
(5.35)
Algorithme de dcomposition pour matrice stocke par la mthode de
la ligne de ciel
matrice non symtrique,
- matrice symtrique.
(5.47)
(5.49)
Rsolution de systmes d'quations non linaires
{Ri) = {F) - [K(V
i
-')] {V
i
-').
(5.54)
- Mthode de substitution
[K(V
i
'
I
)] {V
i
} = {Ri}.
- Mthode de Newton-Raphson modifie
[K,] { V
i
} = { Ri} .
- Mthode de Newton-Raphson
[K,(V
i
-
I
)] {V
i
) = {Ri} .
Algorithme gnral.
Rsolution de systmes non stationnaires
[Cl {} + [K] { V} = {F(t) }.
(5.54)
(5.61)
(5.66)
(fig. 5.19)
[M] { } + [Cl {} + [K] [ V} = {F(t) } .
(5.86)
(5.87)
- Systmes du premier ordre
Mthode d'Euler explicite.
Mthode d'Euler implicite.
Mthodes de prdiction-correction.
Mthodes de Runge-Kutta.
Mthode de superposition modale.
(5.101)
(5.105) et (5.109)
(5.124) et (5.127)
(5.134)
(5.135) et (5.141)
406
Mthode des lments finis
Systmes du second ordre
Mthodes directes pour les systmes du second ordre, (fig, 5,22)
Mthode de superposition modale, (5,164)
Calcul des valeurs et vecteurs propres
[K] {X;} = ,[M] (X,),
[X]' [K] [X] = [],
[X)' [M] [X] = [1]
Ouotient de Rayleigh,
Mthode de l'itration inverse,
Mthode gnrale de Jacobi,
Mthode de Ritz ,
Mthode du sous-espace,
NOTATIONS
(5,166)
(5,1768)
(5,176b)
(5,186)
(fig, 5,23)
(fig, 5,24)
(5,214)
(5,217) (5,219)
Intgration numrique
C,
dV', dV'
[0]
e
f, f
s
, fv
( f ), ( fs ). ( fv )
(fs'),(f:)
[J]
[k]
[k*]
[ml
[N], < N>
coefficients d'un polynme
matrices liant les gradients aux variables nodales.
ainsi que les variations de ces grandeurs
constante dans j'expression des erreurs
volume diffrentiel de l'lment rel et de l'l-
ment de rfrence
matrice des proprits physiques
erreur
sollicitations
vecteurs des sollicitations lmentaires
vecteurs intgrer pour construire ( fs) et ( fv )
matrice jacobienne
matrice lmentaire
matrice intgrer pour construire [k]
matrice masse lmentaire
matrice et vecteur constitus de fonctions
polation
polynme de Legendre
nombres de points d'intgration et ordre de poly-
nmes
yW
~ = < '; '1 >
~
Mthodes numriques 407
coefficient de pondrati on de l'intgration num-
rique
fonction intgrer numriquement
coordonnes d' un point de l'lment de rfrence
coordonnes d' un point d' intgration numrique.
Rsolution de systmes d'quations linaires
[D]
{ F 1
,
{ F ' 1
{ F' 1
IK)
IK' )
Il]
Il 'l
IL]
IL ']
IL,]
15]
{ V,l
[V]
matrice diagonale de la dcomposition'
vecteur global des sollicitations
composante i de ( F l
vecteur { F} aprs limination de Gauss
vecteur (F 1 aprs limination des s premires
variables
h auteur de la colonne J
numros de ligne du terme suprieur des colonnes
i et s
matrice globale
matrice globale aprs limination des s premires
variables
matrice triangulaire infrieure gale IL 1- 1
matrice triangulaire infrieure correspondant
l'limination de fa variable i
matrice triangulaire infrieure de la dcompasi-
tian
inverse de Il ']
matrice de la dcompositibn de Cholevski
matrice triangulaire suprieure de la dcomposi-
tion
variables globales.
triangle suprieur de la dcomposition [L] [D] [V]
Rsolution de systmes d'quations 'non linaires
( F 1
{ Fo 1
( Ml
IK]
IK,]
IK,]
IK",]
IK,]
Il m Il, Il n 1
( R )
( R' )
( V l, U, { V. }
vecteur global des sollicitations
vecteur global des sollicitations de rfrence
. accroissement de [F 1
matrice globale
matrice utilise pour le calcul de { 6.V 1
matrice globale, partie linaire
matrice globale, partie non linaire
matrice globale tangente
norme de ( R 1 et de ( 6.V 1
rsidu
rsidu correspondant {U' - ' 1
vecteur global des variables nodales
408
[ U
i
}
{ f1V ), { oV, )
W, W', IiW
li
r.
, f1
w
n
Rsolution de
a, b
8
0
_ 8
1
, a
2
IA),IB)
b,
[Cl
f
(FJ,{F'J
IK], IK), IK,,], IK,)
Mthode des lments finis
vecteur { V ) l'itration i
accroissement et variation de { V )
forme intgrale globale et lmentaire, premire
variation de W
symbole de variation
erreur admissible sur une norme
paramtre de sollicitation, accroissement cor-
respondant
coefficient de 'sur - relaxation
fonctionnelle.
systmes non stationnaires
coefficients de la mthode de Newmark-Wilson
coefficients intervenant dans les mthodes
directes pour systmes du second ordre
matrices utilises dans les calculs de stabilit
coefficients des mthodes de prdiction-correc-
tion et de Runge- Kutta
matrice d'amortissement
second membre de l'expression standard
du
dt f(u, t)
vecteur global des sollicitations l'instant t
matrice globale, matrice modifie, partie non
linaire de IK), matrice tangente
lm" plus grande valeur propre (en valeur absolue)
lM) matrice masse globale
{ R J, { R, }, { R J, { R" J rsidus
t, t
o
, M temps, temps initial, accroissement de temps
{ V J, { V
O
J, { Vi) variables nodales, valeurs l'instant initial, valeur
{U}'{J
( V J
(X,},[X)
, " l)
,
roi
p(A)
T, 0
l'instant t aprs l'itration i
premire et seconde drives de V par rapport
au temps
solution des quations dcouples
vecteurs propres et matrice modale
valeurs propres
facteur d'amortissement du mode i
frquence correspondant la valeur propre )"
rayon spectral de la matrice A
paramtre de la mthode de Wilson,
Calcul de valeurs et vecteurs propres
a amplitude d'un dcalage
a, b, CI, c
2
, c" d coefficients de la mthode de Jacobi
a" a
2
, ... , ajl' { a }
{ Ai l
Ci
[K], [K]
[K i]
li
[L ]
[M], [M]
[M']
p
P()
[P,]
(q,]
[Q]
[0 i]
R(V)
V
(Xi), [X] [X]
( Y)
, }'i
Il
p(K)
o
Mthodes numriques 409
coefficients des vecteurs do Ritz
vecteurs propres de la mthode de Ritz
composantes d' un vecteur dans la base des
vecteurs propres
matrice globale, matrice modifie
matrice [K] modifie par i itrations de Jacobi
valeurs propres
matrice triangulaire infrieure de la dcomposi -
tion de [KI
matrice masse globale, matrice modifie
matrice [M] aprs l'itration i de Jacobi
exposant de [K], indice
polynme caractristique d'une matrice
projecteur d'une matrice
vec.teurs de Rtz
matrice de transformation, matrice des vecteurs
de Ritz
matrice de transformation de l'itration i de
Jacobi
quotient de Rayleigh correspondant au vecteur V
vecteur Quelconqlle
vecteurs propres
vecteurs [M] ( X )
valeurs propres
dcalage
rayon spectral de [K]
rotation de Jacobi.
RFRENCES
(1) J . J . DAVIS and P. RABINOWITZ. Methods of Nume,;callntegration, Academie Press.
t 975.
[2] A. H. STROUD. Approximate Calculalion 01 Multiple Integra/s. Prentice Hell. 1971.
[3] Z. KOPAL. Numerical Ans/ysis, Second Edition, Chapman et Hall, 1961.
[4J B. M. IRONS, Engineering Application of Numerical Integration in Stiffness Method ,
J. AIAA, 14, pp. 20352037. 1966.
(5) P. C. HAMMEA, O. P. MARLOW and A. H. STROUO, Numerical Integration over
simplexes and coneSlt, Math. Tables Aids Comp .. 10, pp. 130-137. 1956.
(6) B. M. IRONS, Quadrature Rules lor Brick Based Finite Elements li, J. AIAA. 9. pp. 293-
294, 1971.
{7] T. K. HEllEN, ( Effective Ouadrature Aulas for Quadratic Solid Isoparamolric Finite
Elements , Int. J . Num. Meth. Eng .. 4, pp. 597 -600, 1972.
[8J O. C. ZIENKIEWICZ, The Finite Element Me/hod, McGraw - Hiil. 1977.
(9] G. STAANG and G. FIX. An Anelys;s 01 Finite Element Method, Prentice Hall, 1973.
(10) B. CARNAHAN. H. A. LUTHER and J . Q. WILES, Applied Numerical Methods, Wiley.
1969.
Pl] K. J . BATHE and E. L. WILSON, Numeric81 Methods in Finite Element Anelysis, Prentice
Hall, 1976,
410
Mthode des lments finis
(12( J . L. BATOZ and G. S. OHATT, Incrementai Oisplacement Aigorithms for Non-linear
Problems , Int. Num. Melh. Eng., 14. No. 8, pp. 1262 - 1 267, 1979.
113) S. H. CRANDALL, Engineering Analvsis, McGraw-Hill, 1956.
(14) l. CQLLATZ, The Numerical Treatment of Differentiai Equations, Springer-Verlag, 1966.
l' 5J A. RALSTON, A Firs! Course in Numericaf Ana/ysis, McGraw-Hill. 1965.
116J E. l. WILSON, CAL Computer Analysis Language, Rapport No. UC SESM 77-2.
Department of Civil Engineering, Univ. of California. Berkelev. 1977.
(17) R. W. CLOUGH and J . PENZIEN. Dvnamics 01 Structures, McGraw-Hill. 1975.
1'8) J . C HOUBOlT. A Recurence Malrx Solution 'OIlha Dvnamic Response of Elastie
Allnah Il. J . 01 Aefonaufical Sciences, Vot 17. pp. 540-550. 1950.
(19] M. G. KATONA, R. THOMPSON and J.SMITH, Efliciency Study of Itnp/icit and Explicit
Tlme Integretion Operators for Finite Element Applications, Rapport No. R 856,
Naval Construction Saltalion Center, Port Hueneme, Cal., 1977.
120] N. M. NEWMARK, l! A method of Computation of Structural Dynamics , ASCE Journal
of Eng. Mech. Division, Vol. 85, pp. 67 - 94, 1959.
(21) J. H. WILKINSON, The A/gebraic Eigenva/ue Probfem, Oxford Univ. Press, 1965.
CIiAPITRE 6
Technique de programmation
6,0 Introduction
Dans ce chapitre, nous prsentons les techni ques de programmation
Qui permettent la mise en uvre de la mthode des lments finis sur un
ordinateur, Tout d'abord nous dfinissons les diffrentes tapes communes
tout programme d'lments finis en dcrivant le programme d'init iation
BBMEF, Puis nous tudions les caractristiques des programmes gn-
raux, et prsentons le programme MEF de complexit moyenne,
La programmation efficace de la mthode des lments finis requiert
une bonne exprience la fois dans le domaine des lments finis et
'dans le domaine de l'informatique ; en effet :
- les programmes sont compliqus (quelques milliers quelques
dizaines de milli ers d'instructions FORTRAN) car ils doivent excuter des
oprations trs diverses : organisation des donnes, intgration numri-
que, rsolution de systmes, tracs, etc,;
- le cot de dveloppement des programmes est tel que l'on doit
s'efforcer d'crire des programmes qui peuvent s'appliquer de nombreux
types de problmes ;
- les quantits de donnes manipules par un programme d'lments
finis peuvent tre trs importantes et il faut souvent avoir recours des
techniques informatiques peu rpandues en calcul scientifique classique;
- la programmation doit tre trs efficace pour minimiser le cot de
traitement sur l'ordinateur. Cette efficacit peut tre trs lie au type
d'ordinateur utilis, ainsi qu' la politique de facturation en vigueur.
Cependant l'indpendance d'un programme par rapport au type d'ordi-
nateur sur lequel il est excut, est un atout considrable pour son esp-
rance de vie.
Nous donnons une liste complte du programme MEF ainsi qu'une
description relativement dtaille de celui-ci , Ceci permettra au lecteur
de comprendre les problmes poss par la programmation relativement
complexe de la mthode des lments fini s, ainsi que par la documenta-
tion correspondante.
412 Mthode des lments finis
6.1 Etapes caractristiques d'un programme d'l-
ments finis
T out programme bas sur la mthode des lments finis inclut quelques
blocs fonctionnels caractristiques :
a) lecture, vrification et organisation des donnes dcrivant le maillage
(nuds et lments), les paramtres physiques (conductivits, modules
d'lasticit, etc.), les sollicitations et conditions aux limites;
b) construction des matrices et vecteurs lmentaires, puis assem-
blage de ceux-ci pour former la matrice globale et le vecteur global des
sollicitations;
c) rsolution du systme d'quations aprs prise en compte des condi-
tions aux limites;
d) impression des rsultats aprs calcul ventuel de variables addi-
tionnelles (gradients, contraintes, ractions, etc.).
La figure 6.1 montre l'enchanement de ces diffrents blocs.
; lecturo, vrificaton. organisation des donnes
liro 01 imprimer :
les coordonnes des nuds
los connectivits des lments
les paramtres phys iques
los sollicitations
les conditions aux limites
1
Construction de la matrice et du vecteur globaux rI(' Jet { F ,
Pour chaque lment:
extraire les informations lies cet lment
construire la matrice et le vecteur lmentaires [k] et { f}
assembler [kJ et { f} dans [K J et 1 F}
1
Rsolution du systme d'quations IK II U ) - 1 F )
modifier IK 1 et 1 F ) pour prendre en compte les conditions au" limites
triangulariser [K 1
calculer la solution { U 1
1
Impression des rsultats
calculer les variables additionnelles
imprimer les rsultats
Figure 6.1. Blocs fonctionnels caractristiques d'un programme
d'lments finis.
Technique de programmation 413
6.2 Programme d'initiation BBMEF
Nous prsentons maintenant un programme trs simple qui rsout
l'quation de Poisson:
(
2
U 2U)
d x' + oy2 + f,. 0 .
La matrice et le vecteur lmentaires correspondant un lment trian-
gulaire 3 nuds (u linaire sur l'lment) et l'quation de Poisson ont
t obtenus au paragraphe 4.3.1.
Le programme BBMEF est adapt ici la rsolution de l'quation de
Poisson et il utilise des lments triangulaires linaires 3 nuds et 1 degr
de libert par nud. Il peut cependant tre utilis pour d'autres problmes
aprs modification des paramtres dfinis en DATA, des ordres DIMEN-
SION ainsi que du sous-programme lmentaire ELEMOO. La figure 6.2
prsente les diffrents sous-programmes de BBMEF.
Noms Fonctions
Figure contenant la liste
des sous-programmes
Commentaires 6.3
BBMEF programme principal 6.4
GRILLE lecture du maillage 1.2
LOCEF cration de la localisa-
tion lmentaire 4.7
ELEMOO calcul de la matrice l-
mentaire 4.3
ASSEMB assemblage d'un lment 4.6
RESOL rsolution 5.12
Figure 6,2, Sous-programmes de BBMEF.
414
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
Mthode des lments finis
BEBE.MEf
D'INITIATION AUX ELEMENTS fINIS
VARIABLES PRINCIPALES
NNT
NELT
NDIK
HDLN
NEC
IlHeL
NOLE
NOMBRE DE NOEUDS TOTAL 100)
NOMBRE D'ELEMENTS TOTAL 60)
NONBRE DE DIMENSIONS DU PROBLEHE (2)
NOHBRE DE DEGRES DE LIBERTE PAR NOEUD (1)
NOHBRE D'EOUATIONS DU SYSTEME
NOMBRE DE NOEUDS PAR ELEMENT
NOMBRE DE DEGRES DE LIBERTE PAR ELEHENT
BBMC
BSKC
BSMC
BOMG
BSNC
SBMe
BIlMe
BBKe
,
,
,
5
6
7
a
9
BBMC la
BIlMC Il
BBKe 12
SBKe 13
BBMe 14
BBKe 15
BBMe 16
BIlMe Il
C (NOLE_NNELNDLH) BeMe 18
c- KR, MP NUMERO DES UNITES LOGIOUBS DE LeCTURE DES BBKe 19
C DONNEES ET D'IMPRESSION (HR .. S,HP .. 6) HBMe 20
C "SYM INDICE DE MATRICE SYMETRIQUE (.CO.1 : NON SYHETRIOUE)BBHC al
C NEOHAX NOHBRE MAXIMUM D'EOUATIONS ADMISSIBLE BBMe 22
C III1HC 23
C TAilLES ET DIHENSIONS MINIMALES BBHC 2-4
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
VCORG (ND lM , NNT)
COORDONNEES DES NOEUDS
KCONEC(NNEL,NELT)
TABLE DE CONNECTIVITE
VKG(NEOHAX-NEOHAX)
HATRICE GLOIIALE
VPG(NEOMAX)
VECTEUR GLOBAL DES SOLLICITATIONS
VCORE(NDIM,NNEL)
COORDONNEES DES NOEUDS D'UN ELEMENT
KLOCE(NDLE)
TAilLE DE LOCALISATION D'UN ELEMENT
VPREE( ... )
TABLE DES PROPRIETES PHYSIOUES NECESSAIRES POUR
LES CALCULS ELEMENTAIRES
VKE(NDLE,NDLE)
MATRICE ELEHENTAIRE
vrE(NDLE)
VECTEUR ELEHENTAIRE
SOUSPROGRAHMES NECESSAIRES :
BBHC 26
BIIHC 26
DIIHC 21
III1MC 28
BBMC 29
BBMC 30
III1HC 31
IIBHC 32
BBHC 33
BIIHC 3-4
BIIHC 35
BIIHC 36
BIlHC 37
BIlHC 311
IlIlHC 39
III1HC 40
III1HC 41
III1HC 42
III1HC 43
III1HC H
IIBHC -45
BBHC -46
IIBHC 47
BIIMC -411
BIlMC 49
GRILLE LECTURE DES COORDONNEI':5 DI':5 NOl':UD5 l':T CONrlECTIVITI':S IIIlHC fiO
LOCEP CONSTRUCTION DE LA HIILE DE LOCALISATION ELEH. LOCE BBHC 51
ELEMOO CONSTRUCTION DE LA HATRICE KE ET DU VECTEUR BIIMC 63
ELEMENHIRE PE BBMC 63
ASSEHB ASSEMBLAGE D'UN ELEHENT
RESOL RESOLUTION PAR LA HETHODE DE GAUSS
DEPINITION DES DONNEES
1 CARTE (218)
NOHBRE DE NOEUDS(NNT),NOMBRE D'CLEHENTS (NELT)
MAXIMUM : NNT -< 100 NELT -< 60
NNT CARTES (2PIO.0)
COORDONNEES X,Y DE CHAOUE NOEUD
Figure 6.3. Commentaires du programme BBMEF.
BBHC 54
BBHC 56
BBHC 66
BBHC 67
III1HC 56
BBMC 69
III1MC 60
BIIHC 61
III1MC 62
III1HC 63
BIIHC 64
Technique de programmation
NELT CARTES (3IS)
NUMEROS DES NOEUDS DE CNAoue CLEHENT
BBHC
BBHC
(trI0.0) 88HC
0 88HC
CARTE (1rI0.O) 88HC
SOLLICITATION rv B8HC
CARTE PAR SOLLICITATION UN DEGRE DE LI8ERTE (lI8,lP10.O)BBHG
HUKERO DU 0 . 1.., VALEUR DE LA SOLLICITATION RIIKC
{CE GROUPE DE CARTES SE TERKINE PAR UNE CARTE BLANCNt)BIIHC
(fAIRC ATTENTION AU NUHERO DU '.1. . ) BBMC
CARTE fAR DECRE DE LIBERTE IMfOSE (lIB , IPIO. O) BRMC
NUMeRO DU 0 . 1. . ,VALEUR IMPOSEC A CE 0 . 1. . B8KC
(CE CROUPE DE CARTES SE TERHINC PAR UNE CARTE BLANCHE)BBHC
(rAIRE ATTENTION AU NUHERO OU 0 . 1..) BIHC
REKAROUE :
EH HOOlflANT LES DIMENSIONS ET LES PARAMETRES DEfINIS
EN DATA, IL EST POSSIBLE DE TRAITER DES PROBLEHES CORRESPON
DANT A D'AUTRES VALEURS DE NOIH , NDLN,HHE . LE NOHBRE DE; 0 . 1. .
PAR NOEUD DOIT ETRE CONSlANT.
BBHC
BBHC
BBHC
BIIHC
IIIINC
BBHC
BBKC
BIIKC
BIMC
415
"
"
.,
..
" 10
71
" 13
"
"
"
"
78
79
80
BI
"
"
..
..
..
"
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
BSMC BB
C 8BHC B&
c
c
c
c
Figure 6.3. (Suite).
IHPLICIT REALS(AN,OZ)
COHKON/PARAK/NNT , NELT , NOIH,NOLH , NDLT.NEO.NHEL.HDLE
C . .... .. CARTES A HODIPIER SION CHANCE LES ,ARAKETRES GENERAUX
DIMENSION VCORC(a.100),kCOMEC(3.60).YKC(IOOOO),VFC{100),
1 VCORt( a, 3) ,lLOCt(3). VPREE( a) , VkC(3 , 3) ,YFE(J)
DATA VII:C /1 0000 0 . 001, vrc /1 000. 001 ,CRAND /1 .0 1 al ,
1 HR/8 /, M' /f/, NOLE/J/,NDLN/ I/,NNEL/J/,NDIM/3/,NSYH/01
C .......
c
C . BLOC OC LECTURC DCS DONNEES
C
C LECTURE DES COORDONNEES ET CONHECTlVITES
CALL GRILLE(NDIK,NNEL,HR,HP,NNT,NELT,VCORC ,KcONCC)
NEQ .. NNTNDLJrI
C LECTURE DU PARAMETRE 0
REAO(HR,IOOO) VPREE(l)
1000 rORNAT(lPIO. O)
VRJT&(NP , ZOOO) VPREE(l)
20000 FORKAT(/' COErFICIENT DE CONOUCTJVITE(D) .. ' .Ela.S/l
Figure 6.4. Programme principal de BBMEF.
BBHC &0
BBHC &l
BBHC &Z
BBHC
8BME
BIME
BlME
UME
BBKE
BBHE
BBHE
BBHE
88NE
8BHE
BRNE
BBNE
BBKE
BBHE
UNE
BBNt
BBKE
BBKE
BBHE
"
94
,
3
7
8
8
10
11
la
13
H
16
1.
17
18
l ,
416 Mthode des lments finis
c" LECTURe DE LA SOLLICITATION DE VOLUME r v
VPREE(Z}
VRITE("p ,aOIO) VPREECZ)
20 10 rORHAT U' SOLLI CITATl OH DE VOLUHE CfY ) - ' , Elll. ! /) .
c I. ECTUU: DES SOl. l. I CITATI ONS NODALES (SOU RCES )
DO 10 t_ l, NEO
RCAO( HR , I OI O) IN , r
101 0 rORHAT ( 18 ,flO. O)
If eIN . LE . D) co TO 20
vrC( Hn .. r
10 VRJTE ( HP , 20aO)lN,r
2020 r ORHAT e' SOl.l.I CITATlaN "U NOEUD' ,16,' ,,' ,E12.5)
c
c- CONSTRUCTION 0& l.A HATRICE ET DU VECTEUR Gl.OBAUX
C
aD 00 401 /; .. I,N&I..T
C &XTR'\ CTION DCS COORDONNEES DE L'EL.EHENT
00 3 0 1 H .. I NNEt.
J _KCONEC( HI,IE)
YCORt e l , IN ) .. VCOIW( I ,J)
3 0 YCORE( 2,1t4).VCORC(2 , J)
C CONSTRUCTI ON DI; LA TABI.E DE LOCALI S ATI ON
CALI. LOCr::f(KCONEC( I , IE),NNEL,NOLN,XLOCE)
c .... CALCUL DE LA HATRI CE ET DU VECTEUR ELEHENTAIRES
CALL ELEHOO(YCORE . YI'REE,YXE , YFE,NDIH,NKEL,HDLE)
c . . . . . . ASSeM8LAc e
CALL
40 CONTINUE
C
c - -... RESOLUTI ON DU SVSTEME
c
C - _... CONDITI ONS AUX LIMITES
DO 60 1_1,NEO
REAO ( HR,l OlO) IN,r
1r ( IN . LE. 0) aa TO 80
VR1T&(MP, a030) IN,f
3030 fORMAT(' VALEUR IMPOSEE AU 0,1.. :',15,' .. ',E12 . 8 )
IN t .. ( IN , 1) -NEOt IN
VKG(IHI ) _VKG(lHI)+GRAND
BO Vf G( TN)_r.ORAND
c- - _ .. _. RESOLUTI ON
60 CAL I. R&SOL(NSYM,N&O,YKG,VFG)
c
c- -- _.. IHPRESS ION DES RESULTATS
c
\IR nc( KI' , B0 4 0)
3040 r ORMAT (/ ' NOEUD x y D. L. 'n
DO 11 0 IH .. I,HNT
Il. ( IN l)NO''N.'
U_IU_HOl.H
80 VR ITC( H' . 1000 ) IN. VCORC( 1, IH), YOORG( a . IH ) . (Yro( 1), I_{ l , 13)
20 50 rORMAT(IO,3rIO . B)
STOP
END
Figure 6.4. (Suite).
88K&
" 8811&
" BSI1&
"
8BI1E 23
88KE ..
B8KE
" BBKE
" BBKE 27
BBKE
" BBKE
" BBKE 3D
BBKE 31
80ME 3Z
BOME
"
80ME 34
BOKE 36
BBKE 36
BBME 3T
BBKE 38
OBKE
"
BBKt 40
BBKt
.,
8BKt ..
BBKE
.,
88KE ..
BBKE ..
118KE ..
BOKE
.,
.-
BIlKE ..
BBME ..
BBME ..
BBKE
"
BBKE
" BBKE
"
BBKE
"
BBME 56
BBMt 88
BBKE
" BBME 88
BBNE
" BBKE 60
BBKE 61
BBKE
" BBME 63
BBHE ..
DDKC
"
BOKE 66
BBKE 67
DBME ..
BBME
"
88HE 7D
88KE 71
88NE
" 88ME
"
Technique de programmation
417
EXEMPLE 6 . 1. Rsolurion de l'quarion de Poisson sur un carr en
urilisanr le programme BBMEF.
Reprenons l'exemple 3 . 17; grce aux symtries, nous pouvons
discrtiser seulement un huitime du domaine. Utilisons 16 lments
triangulaires :
,
1.0
"
..
'"
,.)
. __ __
o .
1.0
Choisissons, comme dans l'exemple 3 . 17
d=10 ,
f,. = 1,0.
Les donnes ncessaires au programme BBMEF sont les suivantes
(voir fig. 6 . 3) :
lB
"
0 . 0 o. ,
0 . 1 o.,
. 1 . 1
O. lS
0.25 0 .1 0
0 . 28 0 . 28
0 .1 0
0. 28
O . o .
1.0 0 . 0
1.0 0.10
1.0 O. a8
1.0 O .
41 8 Mthode des lments finis
1. 1.
,
3
2 <
,
<
, ,
,
11 12
2
3
<
,
"
3
,
,
,
12 13
9 6
13
10
13
,.
1< 10
10 1< 1.
1 .0
1.0
0
1 1
. o.
1 2 o.
13 o.
H o.
1. o.
0
Les rsultats correspondants fournis par BBMEF sont
NOHB RE
"
NOEUDS. 16 NOH8R E o CLEHENTS. 16
NOEUDS COORDONtU:r:s
.-
0 . 00000 0 . 0 0000
,
0. 1 0000 0 . 00000
3 0. 1 00 00 0 . 1 00 0 0
< 0 . 26000 O. 00000
0 . 25000 0 . 10000
6 0.26000 0 . 25000
7 0.50000 0 . 00000
0 , 80000 0.10000
0.5000 0 0 . 26000
10 0.60000 0 . 5 0000
1 1 1 . 0 00 00 0 . 00000
1 2 1 . 00000 0 . 10000
13 1 .00000 0 . 28000
14 1 . 00000 0.50000
1. 1 . 00000 1 .00000
ELr.H r. NT CQNNECTIVIfES
1
,
3
, ,
3
<
,
<
,
I l
l'
0
,
3
6
<
, ,
12
3
10
,
l ,
13
11 0
6
l '
,
1 3
13
9 10
1 9 13 14
1.
14 10
"
10 1<
l'
COEf f i CIENT DE CONDUCT IVITE(D) . 0, 100001:. 01
Technique de programmation
SOLLICITATION DE VOLUHE (rv) .. 0.10000&+01
V HEiUR IMPOSEE
'"
D.L. Il 0.00000&+00
V fILEUR IMPOSEE
'"
O.L.
l'
a.OOOOOE+OO
VALEUR IMPOSEE AU D.L.
l'
0.00000&+00
VALEUR IMPOSEE
'"
D.L. I< 0.00000&+00
VALEUR IMPOSEE
'"
D.L. lB 0.00000&+00
NOEUD X Y 0,1...
0.00000 0.00000 0.29131
,
0.10000 0.00000 0.lI8798
,
0.10000 0.10000 0.2850&
0.25000 0.00000 0.27391
5 0.25000 0.10000 0.27119
6 0.&5000 0.26000 0.25811
7 0.50000 0.00000 0.22362
B 0.50000 0.10000 a.alllZ.
9 0.50000 0 . .28000 0.31078
10 0.50000 0.80000 0.11393
Il 1.00000 0.00000 0.00000
IZ 1 . 00000 0.10000 0.00000
13 1 . 00000 0.35000 0.00000
14 1 . 00000 0.50000 0.00000
15 1. 00000 1 .00000 0.00000
La valeur de u au centre (nud 1) est
u, = 0,291 3
alors que la valeur exacte, cite dans l'exemple 3,24 est
u" = 0,2947 .
6,3 Programmes gnraux
6,3,1 POSSIBILITS DES PROGRAMMES GNRAUX
419
Contrairement au programme simple prsent au paragraphe prcdent,
un programme gnral doit tre capable de rsoudre :
- des problmes varis concernant des domaines diffrents: lasticit
linaire ou non, fluide, problmes harmoniques, etc"
- des problmes de taille importante impliquant de grands nombres
de nuds et d'lments.
6.3,1 ,1 Varit des problmes
Selon le problme tudi, le nombre et la nature des variables nodales
varient, ainsi que les expressions des matrices et vecteurs lmentaires.
De plus pour un problme donn, nous pouvons utiliser plusieurs types
420 Mthode des lments finis
d'lments de formes diffrentes (triangle ou quadrilatre par exemple)
et de prcisions diffrentes (triangle 3 ou 6 nuds par exemple). Enfin
dans un domaine d'application donn il est souhaitable de pouvoir traiter
des problmes une, deux ou trois dimensions, linaires ou non Iinares,
stationnaires ou non stationnaires.
En rsum, pour traiter des problmes vari s, un programme gnral
doit inclure les possibilits suivantes :
problmes une, deux ou trois dimensions,
nombre de degrs de libert diffrent en chaque nud,
. librairie d'lments facile enrichir,
matrices lmentaires et globales symtriques ou non symtriques,
problmes linaires ou non linaires,
problmes stationnaires ou non stationnaires,
problmes de valeurs propres.
6.3.1 .2 Taille des problmes
De nombreux problmes industriels ncessitent un nombre important
d'lments, de nuds et par consquent de degrs de libert. Le nombre
total d'inconnues peut varier de quelques centaines (petits problmes)
quelques dizaines de milliers (problme$ exceptionnels). La taille du
prOblme dpend des facteurs suivants:
- le nombre de dimensions,
- le nombre de variables inconnues en chaque point, par exemple
les composantes d'une vitesse u, v, w,
- la complexit de la gomtrie du domaine tudi,
- le nombre d'lments ncessaire pour reprsenter la solution avec
une prcision suffisante,
Pour les problmes de taille importante, plusieurs difficults se prsentent.
8) Description du problme
La description du problme inclut la prparation des tables de coor-
donnes (VCORG) et de connectivit (KCONEC), la dfinition des
proprits physiques, des sollicitations et conditions aux limites. Cette
description peut devenir volumineuse et tre entache d'erreur.
Un programme gnral doit disposer d'outils d'assistance la prpa-
ration et la vrification des donnes, en particulier des sous-programmes
de gnration automatique et de trac des maillages. Ces outils consti-
tuent souvent des pr-processeurs interactifs indpendants du programme
gnral et qui incluent parfois la prparation des vecteurs sollicitations.
b) Stockage des tables
Ds que la taille d'un problme est importante, plusieurs tables de
travail ne peuvent plus rsider dans la mmoire centrale de l'ordinateur,
Technique de programmation 421
en particulier si nous travaillons sur un Le programme
doit alors crer ces tables dans une mmoire secondaire (fichier sur
disque) et n'amener en mmoire centrale qu'une partie de chaque table
un instant donn.
Cette organisation des tables peut devenir trs complexe et impliquer
des techniques informatiques sophistiques. Elle constitue la phase de
structuration des donnes du programme d'lments finis. Il est
difficile de construire un programme unique qui soit efficace la fois
pour de petits problmes et pour de trs gros problmes: la programma-
tion devient trop complexe.
cl Volume des calculs
Pour un problme de grande taille, le temps de calcul ncessaire pour
obtenir la solution devient trs important, en particulier pour les problmes
non linaires et non stationnaires. Le prix de ces calculs constitue une
limitation conomique de l'utilisation de la mthode des lments finis.
Il importe de programmer trs efficacement les calculs souvent rpts:
construction des matrices lmentaires, assemblage et rsolution. De plus,
il faut effectuer judicieusement tous les choix qui influencent le temps
de calcul:
type d'lment et forme du maillage,
- mthode d'intgration numrique,
- mthode de rsolution du systme d'quations, en particulier pour
les systmes non linaires,
- mthode d'intgration par rapport au temps pour les problmes non
stationnaires,
mthode de calcul des valeurs propres.
dl Exploitation des rsultats
Les programmes fournissent les rsultats sous forme de listes volumi-
neuses et difficiles exploiter. Un programme gnral doit disposer
d'outils de reprsentation slective et de trac des rsultats.
Ces outils peuvent constituer des post-processeurs du
programme gnral d'lments finis et doivent pouvoir s'adapter aux
besoins spcifiques de chaque utilisateur.
6.3.2
Un programme gnral qui prsente les caractristiques dcrites au
paragraphe 6.3.1 est forcment volumineux et complexe. Il est cepen-
dant souhaitable que:
sa logique soit facile comprendre,
il soit aisment modifiable
422
Mthode des lments linis
plusieurs personnes puissent collaborer son dveloppement sans
que chacune ait connatre parfaitement l'ensemble du programme
, - l'on puisse spcialiser ou optimiser le programme pour un type
d'application donn par simple remplacement de certains sous-pro-
grammes.
Pour atteindre ces buts il faut structurer le programme de manire
modulaire. Nous construisons une bibliothque de sous-programmes
qui effectuent les oprations suivantes, caractristiques de la mthode
des lments finis :
8) Organisation des donnes
Cration des tables de coordonnes et connectivits,
Cration des tables contenant des paramtres connus lis des
lments ou des nuds (proprits lmentaires et proprits nodales) .
Cration des tables dfinissant les conditions aux limites.
b) Oprations correspondant chaque lment
nant.
Dtermination des coordonnes et poids des points d'intgration.
Calcul des fonctions d'interpolation et de leurs drives.
Calcul de la matrice jacobienne, de son inverse et de son dtermi-
- Construction de chaque matrice et vecteur lmentaires : [k], [ml,
( f ), [k,], ( r ), etc,
c) Oprations d'assemblage
- Assemblage d'un vecteur ou d'une matrice lmentaire (l), [k]
dans un vecteur ou une matrice globale ( F). [K] .
d) Rsolution
Dcomposition et rsolution d'un systme d'quations linaires.
e) Impression des rsultats
Impression des variables nodales et des divers rsultats addition-
nels : gradients, ractions, etc.
Ces sous programmes seront utiliss par tout programme d'lments
finis. Cependant l'enchainement de ces sous programmes est diffrent
selon que le problme tudi est Iinare ou non, stationnaire ou non.
La logique d'un programme capable de rsoudre tous ces problmes
devient trs complexe.
Technique de programmation 423
Nous organisons le programme sous forme de blocs fonctionnels
que l'utilisateur peut enchaner dans l'ordre qu'il dsire. Un bloc peut
excuter une simple opration (crer la table de connectivit), ou au
contraire excuter de nombreuses oprations (organiser toutes les don-
nes, construire [K] et { F}, rsoudre le systme d'quations et imprimer
les rsultats), Lorsque les blocs fonctionnels sont simples, ils peuvent
tre enchans de manire plus flexible, par contre l'utilisateur doit dominer
la logique de leur enchanement,
6,4 Description gnrale du programme MEF
6,4,1 INTRODUCTION
Nous prsentons maintenant un programme de complexit moyenne
appel MEF qui met en uvre les techniques dcrites au paragraphe 6.3.
Il est crit en langage FORTRAN, de manire assez standard pour tre
utilisable sur diffrents ordinateurs (mini et gros calculateurs). Il peut
tre utilis dans diffrents domaines d'application de la mthode des
lments finis.
6.4.2 ORGANISATION GNRALE
6.4.2.1 Enchanement des blocs fonctionnels
Le programme principal enchane l'excution des blocs fonctionnels
sous le contrle de l'utilisateur, en appelant les sous-programmes corres-
pondant chaque bloc :
lire sur une carte de donnes le nom
du bloc excuter (par exemple 'COOR.')
bloc 'COOR'
BLCOOR
bloc 'ELEM'
BLE LEM
bloc:..t
'
'nnnn'
r-- --
L ~ ~ n _ J
.
,
r
-..!--,
EXnnnn ...J
L_,.-_
o
bloc 'STOP'
Stop
424 Mthode des lments finis
Le BLnnnn excute les oprations prliminaires sui-
vantes du bloc 'nnnn' :
- il dfinit les numros logiques des fichiers sur disque utiliss par le
bloc, en prenant ventuellement des valeurs par dfaut,
- il lit des paramtres de contrle ncessaires en particulier pour
dterminer la taille des tables du bloc, en utilisant ventuellement des
valeurs par dfaut,
- il cre les nouvelles tables qui lui sont ncessaires, en utilisant la
technique d'allocation pseudo-dynamique dcrite au paragraphe suivant,
il appelle le sous-programme EXnnnn.
Le sous-programme EXnnnn excute toutes les oprations que doit
effectuer le bloc fonctionnel 'nnnn', en faisant appel, si ncessaire, la
librairie gnrale de sous-programmes.
6,4,2.2 Allocation pseudo-dynamique des tables
Le langage FORTRAN ne permet pas de dfinir dynamiquement la
dimension des tables en cours d'excution. Pour viter de changer les
dimensions des tables lorsque la nature et la taille du problme varient,
nous utilisons la technique suivante d'allocation pseudo-dynamique des
tables:
- les tables volumineuses sont dimensionnes comme des vecteurs
et non pas comme des matrices.
- toutes les tables entires ou relles sont places squentiellement
dans une table unique VA,
chaque table 'tttt' est repre par la position 'Lttt!' de son pre-
mier terme dans VA.
t
VA (1)
(dbut de la
table VA)
table relle
'nrr'
t
1
table entire
'eeee'
dbut de la prochaine
l table crer:
, VA (IVA + 1)
Il
t t
VA (Lrrrr) VA (Leeae) VA (IVA) VA (NVA)
(fin de la
table VA)
de VA utilise Zone de VA
non utilise
Technique de programmation 425
la dimension totale de l'ensemble des tables est limite par la dimen-
sion du vecteur VA qui est dfinie dans le programme principal sous
la forme :
{
~ ~ ~ ~ ~ ~ VA(20000)
NVA = 20000
- les pointeurs LItIt de chacune des tables sont conservs dans le
COMMON :
COMMON/LOC/LCORG, LDLNC, ...
- la cration d'une table (calcul du pointeur Ltlll, et modification
du pointeur IVA) est effectue par le sous-programme ESPACE. La
suppression d'une table (dcalage des tables qui la suivent et modification
de leurs pointeurs et de IVA) est effectue par le sous-programme VIDE.
Ces deux sous-programmes sont prsents sur la figure 6.5.
6,4,2,3 Normes de programmation
Lorsqu'un programme doit tre dvelopp et modifi par plusieurs
personnes, il est ncessaire de dfinir des normes de programmation.
Dans le programme M EF, nous avons adopt les rgles suivantes:
a) Bfocs fonctionnels
Chaque bloc fonctionnel a un nom de 4 caractres 'nnnn'. Il lui cor-
respond en gnral un sous-programme de prparation Blnnnn, un sous-
programme d'excution EXnnnn et un COMMON/nnnn/.
b) Tables
Une table a un nom, en gnral de 4 lettres : 'tltt'. Son premier terme
se trouve en VA (Lltlt). Son nom dans les sous-programmes d'excution
est:
Vtttt pour une table relle (par exemple VCORG),
KItIt pour une table entire (par exemple KLOCE).
426 Mthode des lments finis
SU BROUTI Ht ESP ACC( 1 LONG. 1 R CI:I. . Tat. . 1 DcB 1
ESPA
c------.-.--_________________________________ . ___ ._ ... _________ .. _. ____ .&8P,\ Z
e
e
e
e
e
C
C
e
e
c
ALLOCATI ON D'UNE: fABLe RECLLE ou CNTICRE DANS LA TABLE
" CNTRCCS
J LONG LONCUEUR DE LA TABLE A CREER
(CN HOTS REELS OU ENTIERS)
IRCEL TYPE DE LA TABLE
,
,EO . O ENTIERE
. CO. 1 REELLE
,.,
NOH DE LA TABLE (A4)
SORT 1 E
IDee LA TABLE CREEE DEDUTE EN VA(1DEB)
IKPLICIT REALeB(A H,O-Z)
ESPA
csp"
ESP"
CSP"
ESPA
cs PI!
CSP"
CSP"
csp"
csp"
3
,
1
10
Il
"
CSP" 14
RCAt.- 4 TBL CSP" - 16
COHMON/ES/I1,HR ,HP CSP" 16
COHHON{At.LOC{NVA, IVA,IVAHAX,NREEL CSPA 17
COMMON He!) CSP" lB
DIMENSION KA(l) CSP" 19
(U(lI,KII(l ESPA 20
DATA ZERO/O. 001 CSP" 21
c . . .E5PA 22
C CALCULER LA LONGUEUR DE LA TABLE CN HOTS REELS ESPA :13
ILGRILONG ESPA a4
Ir ( JR&CL . CQ . O) ILGR_(ILONG+NR&EL_I)/NREEL CSPA 2S
IVAl .. IVA .. ILGIt ESPA 26
c VERlrlER 81 L'CSPACE CST DISPONIBLE ESPA al
GO TO 20
C . .. .... eXTENSION AUTOKATIOYE ou CONNON BLANC SI LA CONNANOE
C SYSTENE CORRESPONDANTE EXISTE SUR LE CALCULATEUR uTILise
ESPA 38
ESPA 39
ESPA 30
C CALL EXTENO( IV"I, I&RIt) &SP" 31
C 1"(ltRR . tO.I) CO TO 10 ESPA 32
C HYA .. 1VAl ESPA 33
C GO 10 aD ESPA 34
C ERREuR D' ALLOCATION (HANOUE D' ESPACE) ESPA 36
10 VRITE ( HP,aOOO) TOL,IVAI,NVA ESPA 3e
2000 "ORNA1(' ERREuR 0 ALLOCATION, TABLE' , A4 /' ESPACE REDUIS: ',I6ESPA 37
l,' NOTS REELS, ESPACE DISPONIBLE: ',16,' HOTS REELS') ESPA 38
STOP ESPA 39
C ALLOCATION DE LA TABLE
20 Ioco.nA.I
1vr..lVAl
Ir(IVA . GT . TYAHAX) lVAHAX.IVA
lr(H. OT,O) VRITE(HP,ZOIO) TOL,IOEB,IVAI
3010 PORHAT(80X, 'TABLE ',A4,' PLACEE DE VA(',III,')
C INITIALISATION A ZERO OC LA TABLE CRCEE
30
40
II_JOEB
Jr ( IREEL . EO . O) 11_(II}).NREEL+l
12 .. 11.ILONO1
Ir(tltEEL . EQ.Q) co TO 40
DO 30 1_11, IZ
VA( t).ZERO
RElultN
00 50 1.11. J3
KA(I)_O
RETURH
'00
SU8ROUT 1NE
A VA(',IB,')')
ESPA 40
ESPA
ESPA
ESPA
ESPA
ESPA
ESPA
ESPA
ESPA
ESPA
EgPA
ESPA
ESPA
ESPA
ESPA
ESPA
CSPA
CSPA
VIOC
41
..
.,
..
.,
..
.,
..
..
..
"
..
83
.,
.7
c _ .. __ .... _ .... _ .. _._ .. _ ... __ .. _ _ _._ .. _-- ... _.VIOC 3
e SUPPRESSION D'uNE
e ENTREE
C IDEe
e IREEL
e TB,
TABLE SITUEE DANS VA, AVEC COMPACTAOE
POSITION DU DEBUT DE LA TABLE A
TYPE DE LA TABLE (VOU ESPACE)
NOH DE LA TA8LE (A4)
VIOC
VIDE
DETRUIRC VIDE
VIDE
VIDE
3
,
,
Figure 6,5, Sous- programmes ESPACE et VIDE d'allocation pseudo-
dynamique des tables de MEF,
Technique de programmation 427
lHPl,ICIT REAL.S(A _H,O_Z) V IDE 9
IItAL.-. TBl. Il JOE 10
"OHHOH/ES/H,HR,HP VIDE Il
:OHHON/ ALLOC/HYA,IVA. . IVAHAX.NREEt..NtBL VIDE 12
COHHOHJLOC/l.XX(Z8) VIDE 13
CONMOt! VA(1 ) VIDE 14
C- '1101: 16
c--_. RECHERCHE OU DEBUT DE LA TABL& SUIVANtE vtDE 1&
10
II-IVA+l
DO 10 1_1.NTBL
U"(Ln(I ). Lt . lDEB) GO TO 10
Ir(LX1(1) . LT . ll) II_LXX(I)
CONTINUE
c. DECo\LACE OES TABLES SUIVANTES
20
IO .. lI IDEB
rp(I1.EO.IYA+l) CO TO 40
DO aD 1_1, NTBL
If ( LXX( 1) CT. 10ER) I..XX( 1) _LXX( 1).10
CONTINUE
00 30 J_Il,IV"
J_f rD
30 VA{J )_VA( t)
C IHPRESSI ON
40 tVA_JYAID
V J DE 11
VIDE 18
YIoE 19
VIDE 20
V IDE al
VIDE za
VIDE 33
Il 1 DE 24
VIDE 38
VIDE a8
VIDE al
VIDE 28
VIDE ae
VIDE 30
VIOC 31
VIDE 32
IP ( H.CT.O) VRITC(I'IP,2000) TBL.,ID,IDce VIOC 33
aooo PORHAT(60X,'SUPPRCSS IOH TABL.E ',114,' COHPACTAGE ',18,' HOTS REEtoS VIOC 34
lAPRCS VAt' ,16, ')') VIOC 36
REfURN VIOC 38
I:NO VIDE 37
Figure 6,5, (Suite),
c) Variables
La premire lettre des noms des variables caractrise la nature des
variables:
V .. , Tables relles
K .. , Tables entires
L.., Position du dbut d'une table dans VA
M .. , Variables lies aux oprations d'entre-sortie ,
Exemples: M indice de contrOle du niveau d'impression
MP unit logique d'impression
ME unit logique du fichier des lments,
N ... Paramtres caractristiques du problme. _
Exemples: NNT
NNEL
nombre de nuds total
nombre de nuds maximum par lment.
1 .. " J .. . Paramtres variables du problme ou indices de boucle :
Exemples: IN EL Nombre de nuds d'un lment donn
ID, JD Indices de boucle sur les degrs de libert
IN, JN Indices de boucle sur les nuds,
428 Mthode des lments finis
6.4.3 ORGANISATION DES DONNEES
6.4.3. , Blocs de lecture des donnes et blocs d'excution
MEF inclut des blocs fonctionnels spcialiss dans la lecture, la vri-
fication et l'organisat ion des donnes. Par exemple :
- le bloc ' COOR' lit les coordonnes des nuds et le nombre de
degrs de libert de chaque nud. Aprs vrifications, il cre les tables
VCORG (coordonnes des nuds) et KDLNC (nombre de degrs de
libert de chaque nud, cumulatif) :
- le bloc 'COND' lit les conditions aux limites et cre les tables KNEQ
(numro d'quation de chaque degr de libert) et VDIMP (valeurs des
degrs de libert imposs):
- le bloc ' ELEM' lit les connectivits et autres caractristiques des
lments, puis il cre un fichier contenant toutes ces informations. Chaque
enregistrement de ce fichier constitue la description complte d'un l-
ment. De plus ce bloc cre la table KLD (localisation des dbuts de
colonne de la matrice globale stocke par ligne de ciel) .
D'autres blocs fonctionnels de MEF sont des blocs d'excution des
oprations d' lments finis. Ils se servent des tables construites par les
blocs de lecture des donnes. Par exemple :
- le bloc LlNM assemble puis rsout le systme d'quations corres-
pondant un problme linaire, la matrice globale [K] rsidant en mmoire
centrale;
- le bloc LI N D est semblable au bloc LI N M, mais la matrice globale [K]
rside sur disque:
- le bloc N LI N assemble puis rsout le systme d'quations corres-
pondant un problme non linaire.
6.4.3.2 Tables en mmoire centrale et tables . sur disque
Dans la version de M EF prsente ici, les tables rsident en gnral
en mmoire centrale. Cependant les tables volumineuses suivantes
sont conserves sur fichier :
- ' les tables caractristiques de chaque lment: connectivit, localisa-
tion lmentaire, proprits de l'lment et de ses nuds, coordonnes des
nuds. Ces informations sont crites puis relues squentiellement sur
le fichier des lments par les deux sous-programmes WRELEM et
Technique de programmation 429
RDELEM. Ceux-ci peuvent tre aisment modifis pour conserver les
informations lmentaires en mmoire centrale, dans le cas de problmes
de taille rduite ;
- la matrice globale VKG, dans le bloc d' excution LINO, est segmente
et crite sur le fichier de la matrice globale , Pendant la rsolution,
deux segments seulement rsident la fois en mmoire centrale. La matrice
VKG, aprs triangularisation est crite sur le fichier de la matrice globale
triangularise) ;
- pour le calcul des rsidus et ractions, la matrice globale et le vecteur
second membre sont temporairement sauvegards sur le fichier des
rsidus,
6.4.3.3 Description des tables principales et variables des
COMMON
Nous classons les diffrentes tables construi tes par MEF en trois
groupes. Les tables globales sont utilises par la majorit des blocs
fonctionnels ; elles contiennent la description gnrale du problme et du
systme d' quations correspondant . Les tablas lmentaires dcrivent
un lment donn ; elles sont utilises par les sous-programmes de calcul
des matrices et vecteurs lmentaires. Les tables locales sont utilises
par un bloc particulier. Les figures 6.6, 6.7 et 6 . 8 dcrivent toutes les
tables de MEF.
La figure 6.9 dcrit les variables contenues dans les diffrents COM MON.
6,5 Description et liste des blocs fonctionnels
,
6.5.1 PROGRAMME PRINCIPAL
Fonction
Le programme principal est compos de deux parties :
8) La section de contrle de l'enchanement des blocs lit une carte de
donnes contenant :
le nom du bloc fonctionnel excuter: BLOC
- le niveau d'impression dsir : M
- les numros de 10 fichiers ventuellement utiliss par le bloc :
MLUN (10) .
Cette section transfre ensuite le contrle l'un des sous-programmes
appels dans la deuxime section.
430
Mthode des lments finis
Nom
de la table en Dimension
FORTRAN
Bloc crant
la table
Description
VA NVA
p'rogramme
principal
Table gnrale de travail
Tables de description du problme physique
VCORG NNT x NDIM COOR
KDLNC NNT + 1 COOR
KNEQ NDLT ELEM
VDIMP NCLT COND
VPRNG NNT x NPRN PRND
VPREG NGPE x NPRE PREL
KLD NEQ + 1 ELEM
COoRdonnes Globales de tous les nuds:
1 dimension < XI X2 X3 . >
2 dimensions < XI YI X2 Y2 >
3 dimensions < XI YI 11 x! Yl 12 . >
nombre de Degrs de Libert par Nud, Cumulative:
KOLNC (1 + 1) contient le nombre total de degrs
de libert des nuds 1. 2. 3, "., 1-1. 1.
KDLNC (NNT+ 1) - NDLT; KDLNC (1) 0
Numro d'EQuation de chaque degr de libert.
a) J> 0 : le degr de libert 1 est inconnu et corres-
pond l'quationJ dans le systme d'qua-
tions
b) J < 0 : le degr de libert J est connu et sa valeur
est VDIMP (- J)
Valeur de tous les Degrs de libert IMPoss par des
.conditions aux limites
Liste da l'ensemble des proprits nodales:
< Pl P2 ... P NPRN Pl Pl ... . Pl Pl'" P
NPRN
>
',,"." v '
nud 1 nud 2 nud N NT
Liste de l'ensemble des proprits lmentaires:
< Pl Pl'" P
NPRE
Pi P
2
.. P
NPRE
... Pl Pl ... .P
NPRE
>
, v v '
groupe 1 groupe 2 groupe NGPE
Localisation du Dbut de chaque colonne de la matrice
globale KG; KLD (NEQ + 1) - 1 est le nombre de
termes du triangle suprieur (ou infrieur) de KG, hors
diagonale. KLD (1) = KLD (2) = 1.
Matrices et vecteurs globaux
VKGS
VKGD
VKGI
VFG
VDLG
VRES
NKG - Blocs Termes de' KG, triangle Suprieur, hors diagonale, par
KLD(N EQ+ 1)-1 d'excution colonnes descendantes, stocks par ligne de ciel
N EQ idem Termes de KG D.iagonaux
NKG
NEQ
NDLT
NDLT
idem Termes de KG, triangle Infrieur, hors diagonale, par
lignes de gauche droite, stocks par ligne de ciel,
si la matrice est non symtrique
idem Vecteur sollicitations (ou Forces) Global
N LIN, TEM P Vecteur global des variables nodales (solution)
LlNM, LINO Ivecteur des rsidus et ractions
Figure 6.6. Tables globales de M EF (les variables qui dfinissent les
dimensions sont dcrites dans la figure 6.9).
Technique de programmation 431
Nom
de la table en
FORTRAN
Dimension
Description des lments
KNE NNEL
KLOCE NOLE
VCpRE NNEL x NDIM
VPRNE NNEl x NPRN
VPREE
NPRE
Matrices et vecteurs lmentaires
VKE - Si NSYM. EO . O:
NKE _ NOLE x (NOLE + ')(.
- SiNSYM.EO.1:
NKE NOLE x NOLE
VME
NOLE x (NOLE + ')/2
VFE NOLE
VOLE NOLE
Description
Numro des Nuds d'un Elment (conneclivit
lmentaire)
LOCalisation Elmentairo. obtenue pet extraction
de KN EQ des informations correspondant aux
nuds d' un lment donn
COoRdonnes Elmenteires extraites de VCORG
(structUJc analogue VCORG)
liste des PRoprits des Nuds d'un Elment.
extraite de VPRNG
liste des PRoprits EJmentaires d'un Elmen!
donn, !lxtraite de VPREG
1
matrice k Elmentaire. per colonnes descendanteS,!
triangle suprieur seulement pour une matrice :
symtrique !
matrice m Elmentaire, triangle suprieur par
colonnes descenoantes
vecteur sollicitations (ou Forces) Elmentaire
valeurs des Degrs de libert d'un Elment
(vecteur solution lmentaire)
Figure 6.7. Tables lmentaires de MEF (les variables qui dfinissent
les dimensions sont dcrites dans la figure 6.9).
432
Nom
de la table en
fORTRAN
Mthode des lments finis
Dimensi on Descri ption
Intgration numrique
VKPG IPG x NDIM
VCPG IPG
Coordonnes des points d'intgration numrique
sur l'lment de rf6rence ; structure comme
VCQAG. (Ksi des Points de Gauss. )
Poids des points d' intgration numrque. (Coeffj
Cents des Points de Gauss.)
Stockage des fonctions N et de la matrice jacobienne
VNI
VJ. VJl
VNI X
IPG x NNEL x (NOIM + 1) Li ste des valeurs en tous les point s d'int gration,
des fonctions d'interpolat ion N et de leurs dri-
ves en { , '1. C. En 2 dimensions :
NDIM x ND lM
NNEl x NOIM
... , ... , ... >
Malliee Jacobienne et son inverse
lisle des valeurs, en un point d'intgration donn.
dos drives en x. y. z des fonct ions dmerpola-
tian N
... >
Calcul automatique des fonctions N
VKSI
KEXP
DEA
VPN
VP
INEl )( NDIM
INEL x NDIM
NOIM
IN EL x INEL
INEL
Coordonnes ~ i '1 1 CI des nuds de l'lment de
rfrence; structure comme VCORG
EXPosants des monOmes de la base polynomiale.
Par exemple
1 { tJ ~ I - KEXP ". < 0 0 ; 1 0 ; 0 l ' 1 1 >
indi ces dfinissant un ordre de DERi vat ion des
fonction!! d' interpolation. Par exemple;
2 dimensions:
a'N
iJ i J ~ - KDEA -
< 1 1 >
3 dimensions :
'N
--_ KOEA _ < 2 0 1 >
~ 2 J(
matrice nodale PN ou son inverse
valeur de la base polynomiale en un point
Figure 6.8. Tables locales de MEF (les variables qui dfinissent les
dimensions sont dcrites dans la figure 6.9).
Nom
de la table en
FORTRAN
bloc LINO
KEB
KPB
bloc TEMP
VOLEO
~ O L O
VFGO
blocVALP
VMGS
VMGO
VEC
VlAMB
hAM1
~ K S S
WMSS
WX
1
Technique de programmation 433
Dimension
NBLM + 1
NBLM
NOLE
NEQ
NEO
NKG
NEO
NEO x NSS
NSS
NSS
NSS x (NSS + 1 )/2
NSS x (NSS + 1 )/2
NSS x NSS
NEQ
Description
Numro de colonne du dbut de chaque bloc de
KG; KEB (NBLM + 1) ~ NEO + 1.
Numro du premier bloc connoct chaque
bloc do KG.
Vecteur temporaire des degrs de libert d'un l-
ment
Vecteur global des degrs de libort (valeurs de
rfrence)
Vecteur global des sollicitations (valeurs de rf-
rence)
Termes de la matrice Masse Globale (M], triangle
Suprieur, par colonnes descendantes, stocks
par ligne de ciel
Termes do (M) Diagonaux
VECteurs propres
Veleurs propres
Stockage temporaire des valeurs propres
Projection de (K) dans le sous-espace, triangle
suprieur par colonnes descondantos
Projection de (M) dans le sous-espace, triangle
suprieur par colonnes descendantes
Vecteurs propres du sous-espace
Vecteur de travail.
Figure 6.8. (Suite).
434
ICOORI
NDiM
NNT
NOLN
NOLT
FAC (3)
ICONDI
NCLT
NelZ
NCLNZ
/pRNDI
NPRN
IPREL(
NGPE
NPRE
(ELEMI
NELT
NNEL
NTPE
NGRE
ME
NIDENT
NPG
IASSEl
NSYM
NKG
NKE
NOLE
IRESOI
NEC
NRES
MRES
fRGOT/
IEL
ITPE
ITPE1
IGRE
IOLE
ICE
IPANE
IPREE
IN EL
IOEG
IPG
ICODE
IOLEO
INELO
IPGO
Mthode des lments finis
Nombre de DIMensions du problme (1 , 2, 3)
Nombre de Nuds Total
Nombre de Degrs de libert maximum par Nud
Nombre de Degrs de Libert Total
FACteurs d'chelle de directions x, y, z
Nombre de Conditions aux Limites Total
Nombre de Conditions aux Limitesmposes Zro
Nombre de Conditions aux Limites imposes Non Zro
Nombre de PRoprits Nodales attaches chaque nud
Nombre de Groupes de Proprits Elmentaires
Nombre de PRoprits par groupe (par Elment)
Nombre d'EUmants Total
Nombre de Nuds maximum par Elment
TyPe d'Elmenl par dfaut
Nombre de GRoupes d'Elments
numro logique par dfaut du fichier des Elments
. Ea . 1 si toutes les matrices Ihl sont identiques
Nombre total de points d'intgration
J fa. 0 si 'a malrt;t! (KI ~ t symtriqut!
t Ea.1 si la matrice (K) n' est pas symtrique
Nombre de termes du triangle suprieur (ou infrieur) do IK], hors diagonale
Nombre de termes maximal de la table VKE
Nombre maximum de Degrs de Libert d' un Elment
Nombre d'EQuations du problme
. Ea. 1 si l'on calcule le RESidu de rsolution
numro logique par dfaut du fichier des RESidus
Numro d'un Elment
TyPe d'un Elment
TyPe de ,'Elment prcdent ,'lment IEL
Numro de GRoupe d'un Elment
Nombre de Degrs de Libert d'un Elment
Nombre de Coordonnes des nuds d'un Elment (INEL )( NDIM)
Nombre de PRoprits Nodales d'un Element (NP RN )( INEL)
Nombre de PRoprits Elmentaires d'un Element
Nombre de Nuds d'un Elment
DEGr maximum de la base polynomiale
Nombre de Points d' intgration ou de Gauss
Indice dlinissant le type de lonction lmentoire excuter par les sous-pro-
grammes ELEMxx
Variable de vrification de IOLE utilise par le bloc ELEM
Variable de vrification de IN EL utilise par le bloc ELEM
Variable de vrification de IPG utilise par le bloc ELEM
Figure 6.9. Variables en COMMON.
lUNDI
NLBL
NBLM
MKGl
MKG2
INUNI
EPSDL
XNORM
OMEGA
XPAS
DPAS
DPASO
NPAS
IPAS
NITER
ITER
IMElH
; VALPI
NITERl
NMDIAG
EPSLB
SHIFT
NSS
NSWM
TOLJAC
NVALP
IESI
M
MR
MP
MLUN(10)
!ALLoel
NVA
IVA
IVAMAX
NREEL
NTBL
LOC
Technique de programmation
longueur des segments (DU blocs) de (X)
Nombre de Blocs MaximumdefKI
Numro logque par dfaut du fi chier"de la matrice IX]
Numro logique par dfaut du fichier de la matrice [K] triangularise
Erreur admissible sur la norme des Oegrs de Libert
Norme de { U}
Facteur IX de la mthode d ' Euler
Niveau de solicitation allein'
Accroissement de sollicitation
Accroissement de sollicitation prcdent
Nombre maximum de PAS de sollicitation
Numro du PAS de sollicitation actuel
Nombre maximum d'ITERations par pas
Numro de l'iTERation
Type de METHode utilise
Nombre maximum d'ITERations sur le sous-espace
Indice de matrice (M] diagonale (non utilis)
Erreur admissible sur les valeurs propres
Dcalage (non utilis)
Dimension du sous-espace
Nombre maximum de cycles dans JACOBI
Tolrance dans JACOBI
Nombre de VALeurs Propres requises
Indice d'impression: 0 en production
1 impression rduite
2 mise au point
3 impression maxi mum
Numro de l'unit logique de lecture des donnos (dfaut 5)
Numro de l'unit logique d'impression des rsultats (dfaut 6)
Numros logiques des divers fichiers utiliss pat un bloc
Nombre de mot s rels dans le vecteur de travail gnral VA
.Position du dernier mot rel utilis dans VA
Nombre de mots rels m8ICimum utiliss dans VA au cours du problme
435
Nombre de variables entires que l' on peul placer dans une variable relle
Exemples : IBM-370 simple prCision NREEL "" 1
double 2
CDe-66DD simple prcision 1
Nombre de tables dont les pointeurs sont conservs dans le COMMON/LOq.
Dans cette version de MEF, NTBl "'" 25
LCORG. elc ... Positions dans VA du premier terme des tables VCOAG .. . .
COMMON sans tiquette
VA Table de travail gnrale contenant toutes les autres tables.
Figure 6.9. (Suite) .
436
Mthode des lments finis
b) La section d'excution consiste en les appels des divers sous-pro-
grammes BLCOOR. BLCOND etc .... suivis du retour au dbut de la section
de contrle.
Organigramme
1
Section de contrle. Dtermination du
bloc fonctionnel fi excut er
1
-1 BLCOOR 1
-1 BLCOND 1
Section d"excution :
appel du sous- programme correspondent
--
au bloc fonctionnel
-...
-1
STOP
1
1
1
Sous-programmes appels
BLCOOR }
LCO
sous-programmes
B ND d' 'bl
d'appel des divers blocs fonctionnels
Isponr es
Cration d'un nouveau bloc
Pour insrer dans le programme principal un nouveau bloc fonctionnel
nomm par exemple 'PLUS', il faut:
- ajouter le nom PLUS dans la table BLOCS dfinie par un ordre
DATA (par exemple en position 16)
- identifier l'adresse correspondante dans j'instruction
30 GO TO (110,120, '" 260, ".)
(16' adresse dans ce cas, soit 260)
Technique de programmation 437
- remplacer l'instruction inutile
par
260 CONTINUE
C BLOC 'PLUS'
260 CALL BLPLUS
GO TO 10
Par ailleurs l'utilisateur doit ajouter MEF le sous programme BLPLUS
ainsi que tous les sous-programmes appels ventuellement par ce dernier
et non prsents dans la librairie gnrale.
Liste
La figure 6.10 prsente la liste du programme principal de MEF, du
sous programme BLOCK DATA qui dfinit toutes les variables en
COMMON et en particulier toutes les valeurs par dfaut, ainsi que du sous
programme ER R EU R utilis par divers blocs fonctionnels.
c HEF
HEP c
c
c
c
c
PROGRAHHE H . E . P. 3 VERSION OCTOBRE 1979 KEP
HEP
HEP
HEP
3
,
( C.TOUZOT , C.DHATT )
PROGRAHHE
,
7
c -.- ---------- ...... - --------- --- __________________ HEP 8
COHHON/ES/H,HR,HP.HLUN(IO)
COHHON VA(20000)
DIHENSION 8LOCS(31)
HEP 9
DATA BLOCS/4HIHAG,4HCOHT,4HCOOR,4HDLPN,4HCOND,4HPRHD,4HPREL,
1
HEP 10
HEP li
HEP 13
HEP 13
HEP 14
HEP 15
HEF 16
3 .... ,4N .... ,4H .... ,4H .... ,4H .... ,4HSTOPI HEF 17
DATA NB/all HEF 18
C ................................................ HEr 19
C .. OIHt:NSIOH UU COl'l110H EH HOTS (TABLE VA) HEr ao
"VA_aOOOO HEF al
C .. .. EN TETE
2000 rORHAT(lHl,30X,'H.E.r.3.'/a3X,' a.TOUZOT
C .. .. LECTURE DE L'ENTETE D'UH
10 READ(HR,IOOO)
1000 PORKAT(A4,16,IOI6)
C RECHERCNE DU BLOC A EXECUTER
DO 20 1 .. I,N8
GO TO 30
20 CONTINUE
VRITE(HP, aOlO)
HEP
HEP
G.OHATT'/a3X,aa('')II)HEF
HEP
HEP
HEP
HEP
HEP
HEP
HEP
" 23
..
"
"
37
"
"
30
3!
2010 FORKAT(' ERREUR, CARTE 0 APPEL DE BLOC HANQUANTE')
CO TO 10
HEP 3a
HEP 33
HEF 34
Figure 6.10. Programme 'principal de MEF.
438
Mthode des lments finis
30 GO TO (11 0,110,130.140,160,160, 17 0,
160,190, 200.210,220,230,240,
a 260,360 ,310,280 ,290,300,999),1
C BLOC D'IMPRESS ION DE L'ENSEHIH,E DES DONNEes
110 CALL Bl.IHAG
GO rD 10
C- BLOC OC LECTURe - IMPRESSION DE COHHE:NTAIRES
12'
CALL BLCOHT
GO TO 10
, IHAC'
'COHl'
C .... BLOC DE LECTURE OES NOEUDS 'COOR '
130 CA Llo BLCOOI
CO Ta )0
C. . ..... BLOC DE: LECT UR E: DES DECRES DE LIBERTE PU NOEUD ' DLPN '
140 GALL BLDLPN
co TO 10
C Bl.OC DE LECTURE DES CONDITIONS AUX LIMITES 'CaNO'
16'
CALL BLeOND
CO TO 10
_. ..... BL.OC DE LECTURe DES PROPRI&TES NODALES
180 CALL IILPRNO
CO TO 10
C-_- BLOC DE LECTURE DES PROPRIETES EI.EHENTAIIiES
"'
CALL BLPIIEL
co TO 10
c BLOC DC LECTURE DES ELEMENTS
180 CALL BLELEN
GO TO 10
C BLOC DE I.ECTURE DES SOLLICitATIONS CONCE NTREES
. 1 90 CALL BL..SOLC
GO TO 10
'PRNO'
' PREl. '
, ELEN'
'SOl.C'
C BI..OC DE LCCTURe DES SOI..LICITATIONS RePARTlES '30LR'
aoo CALL.. 8L..SOLR
GO TO 10
C 8LOC D' ASSEtt 8LAGE RESOLUft ON LINEAIRE EN ttENOIIIE ' LINN '
.10 CAI..I.. 8 L.. I...Ntt
CO TO 10
c. 8LOC ASSEMBLAGERESOLUTION l.INEAIRe S UR Dr SOUE
zao CALL BLLIND
GO TO 1 0
C BLOC DE RESOLUTION NON l.INEAIRE
330 CALL BLNL..IH
GO TO 10
C. BLOC DE RESOLUTI ON NOH STATIONNAIRE
,<0 CA!.!. BLTEHP
GO TO 10
' LINO'
'NLIN '
'TEHP'
C BI..OC DE CALCUL.. DE VALEURS PROPRES (SOUS ESPACE) 'VAL..P'
380 CALL 8 LV Al..P
CO TO 10
C 8LOCS NON DcrlNIS
' 00
no
28'
CONTINUE
CONTINUE
CONTINUE
1190 CONTINUE
300 CONTINUE
GO TO 10
"cr
"cr
"cr
HCP
"CP
HCP
HCF
"CP
"C'
HCP
HCP
HCP
HCP
"CP
HEF'
H"
H"
"C'
HCP
"CP
HCP
HCF
HCP
HCP
"CP
HEP
"CP
HCP
HEP
HEP
HCP
HCP
HCP
HEP
HCP
HEP
HCP
KtP
HEP
HCP
HCP
HEP
HEP
HEP
HEP
HC'
HEP
HC'
HCP
HEP
HEP
HEP
HEP
HEP
HEP
C rIN DU PROBL..EttE
'STOP' KtP
999 WRITE(NP,3020) rVAHAX , NVA
2020 FORIUT(//' FIN DU PROBLEHE,
STOP
ENO
BLOCk DATA
HCP
',110,' NOTS REELS UTILISES SUR', 1l0) HEF
HC'
Hcr
BLOC
c IHITJALlSATlott DES CONNONS ETIOUETES BLOC
Figure 6.10. (Suite).
"
" 37
."
39
<0
41
..
.,
..
..
..
.,
..
..
50
SI
" 83
84
os
" 87
..
" 50
"
" 63
"
" ..
67
..
..
10
11
" 13
74
18
76
77
18
" 80
81
..
.3
B8
67
" 60
61
" 93
..
,
,
-
Technique de programmation 439
IHPLl e n u : u-s(.'.U,OZ) 8LOC 6
COH"ONjCOOR/ NDIH ,NNT , NOLN , NOLT , rAc(3) BLOC 6
COHHONjCOND/NCI.T. NCLl . Mel.HZ BLOC 7
COH"ON/'RHO/N'RN BLOC 8
CONHON/ PREL/ NC'C. NPRE BLOC 9
COHNON/ &LCH/NCLT,NNEL.NTrC,NCRE,HE,HIO&HT,NP BLOC 10 _
COHNON/ASSC/NSYH,NKC,NKE,NOL& BLOC Il
COHNON/ RCSO/ NCO ,HRCS , HRCS BLOC 12
COHHON/RCDT I ICI. , JTP& , IT'EI IORr.. 101.&, Jet. InNE. 1 PRCE. INCl. . J DCC. l'II.OC 13
1 IPG,ICOD,lOL&O,INf;Lo,rpco BLOC 14
COHHON/L INO/NLB L, NBLH,HKCI,HKca OLOC 18
COHHONjNl.l Il IE,SoL, XHORN, OHEGA. XP AS ,D'AS. OP ASO , NP .0\5 . 1 P AS , Il J TER , Il LOC 18
1 ITEII,INETH IlLOC 17
COHHOHJVALP 1 Hl T&R l , NHO 1 AC , E'SL8. SN Il"T NS8. NSIIH. 101.J AC. NY UP BLOC 18
CONHONJES/H,HR,HP,HLUH(lO) BLOC 19
COKMON/ALLOC/NV A, IV A ,IV AMAX, NREEL, NTBL BLOC ZO
COMHON/LOC/LCORC,LDLNC,LNEO,LDIHP,LPRNC,LPREC,LLO,LLOCr.,LCORE,LNE,BLOC Zl
1 BLOC 22
a 1.01..1.:0, LDLGO, Lrco BLOC 23
DIHENSION LXX(Z9) BLOC 24
EOUIVALI.:NCE (LXX(I),LCORG) BLOC 25
C CaNNON ICOORI BLOC 26
DATA NNT IZO/.NDLN/2/, NDIH/Z/, rACla-l, DO/ BLOC lIT
C,.. CONNON IPRNO/ BLOC 29
DATA NPRN/OI BLOC 39
C CONMON IPRELI BLOC 30
DATA NCPE /O/, NPRE/O/ BLOC 31
C CONHON IELEK/ 8LOC 32
DAfA NtL1/20 / ,NNEL/8/ , NTPC/I /, NCRE/1/ . HE / I /. NIDEN1101 8LOC 3 3
C COIIHON/ASSEI BLOC 34
DATA NS'" /OI BLOC 36
c . . . . . . COIIHON I RESOI 8LOC 38
DATA IUEs/0/.HRES/21 BLOC 37
c. COli HON I RCOT I BLOC 38
DATA ITrEl/OI BLOC 39
c.. COli liON /LINDI BLOC 40
DATA HICl/4/,MKC2!11 BLOC 41
c. , COIIHON /NLIN/ BLOC 42
DATA ErSOL/!. 02/, OHEGA/I DO/ ,OPAS/. 200/ ,NPAS/ll ,NJTER/5/, IMETII/1/BLOC -f3
C COIINON /VALP / BLOC H
DATA NITERl/lO/,NHDIAC/o/,EPSLB/l.D3/,SIlIrT/O.DO/, NS S/S/, BLOC 48
l NSIoIHflZ/,TOLJAC/l.D12/,NVUP/3/ BLOC 46
C CON HON /ESI BI.OC 47
DATA HR/B/,HP/DI BI.OC 48
C . CONHON IALLOCI BI.OC 49
DATA lYA/1/.IVAHAX/1/,NTBL/351 BLOC 50
c ....... OErlNIR ICI I.E NOHBRE D'ENTIERS CONTENUS DANS UN REEL BLOC 51
C SuR Le CALCUI.ATEUR Ul1Llse 81.0C B2
C exeMPLEs; IBM SIMPLE PRECISI ON NREEL .EO. I BLOC 83
c
c
DATA MREEL /21
C .......
C COMMON I LOCI
DATA LU/lIB-1 1
<HO
'""
CDe
SU6ROUTIHE ERRCUR(ICRR,11 ,13 , INJV)
NREeL.tO.a
MREEL . EO . )
c
IHPRESSION DCS ERREURS DANS LES BLOCS OC LECTURE Des DONNEes
BLOC 84
BLOC 66
BLOC (16
BLOC 81
BLOC 6B
BLOC 118
BLOC 60
ERRE
ERRE 3
CDHMON/tS/ H, HR , MP ERRE (1
C , ERRE 8
Figure 6.10. (Suite).
440
Mthode des lments finis
c ,_ ... . Bt.OC ' COOR'
Ir(ltRR . Cf . 19) GO TO zoo
Il: .II:RI I0
CRRC
CRRC
tRRE
1
9
Il.
GO TO (1IO,IZO,130 . 140 , I BO,160 ,160,IOO) , I&
VRlTt:(KP.21 tO) Il ,Ill
ERRE 10
ERRE Il
2110 l'ORKAT(' .. ERREUR , U; NUM&RO DU pfIENIER NOEUD(',",') EST SUPERIERRE la
lEUR A "NT. ' ,14 ) ERRE 13
GO TO 900 ERRE 14
120 VI1TE(HP,2120)1l,12 ERRE 18
2120 rORMAT(' tUEUR, Le NUMERO DU SECOND NOEUD(' ,14, ') EST SUPEMIEUEHRE 16
UA/HlT_'.H) FoRRf: 11
CO TO 900 ERRE 18
130 IIRITE(HP,213Q)1l,IZ ERRE 19
2130 PORMAT(' ERREUR, I.E NOMBRE DE D.L. DU "OEUD(',14,') EST SUPERIEERRE 20
IUR A NOI.H_', 14) ERRE 31
CO TO 900 ERRE 22
140 VRlTC (HP,2140) ERRE a3
2140 rORKAT(' ERREUR. LES NUHEROS DU PREHIER ET DU seCOND NOEUDS SONERRE 24
Il INCOHPATIBt.ES ,o.VEC t. INCREHENT DE GENERATION') ERRE 2:6
GO TO 900 ERRE 2:6
160 VRITE(MP,2:160)II ERRE 2:7
Z160 rORMAT(' ERREUR, I.E NOEUD ',J4,' EST DErUl P!.USJEURS rOIS')
GO TO 900
ERRE 2:8
ERRE 2:9
160 YRITE(HP,ZlIIO)Il ERRE 30
Z160 rORHAT(' ERREUR, LE NOEUD ',14,' N EST PAS DErINI ' ) ERRE 31
GO TO 900 CRRE 32
180 YRJTC(KP,ZI80)IZ,1l ERRE 33
2100 rORMAT( ' I:RREUR , LE NOMBRE DE NOEUDS CREES(' ,14,') CST INrcRIEUERRE 34
IR A NNT .. . 14) ERRE 38
GO TO "00 ERRE 36
c . . . . .. Bl.OC' DLPN' ERRE 37
200 Ir(lERR . Gt . 2") GO TO 300 ERRE 38
U:-IERR 20 ERRE 39
GO to (lIIO,IlZO),U: ERRE 40
210 VRlTE(MP,2Z10)II,la ERRE 41
2UO FORHAT(' ERREUR, LE HOHBRE DE 0.1.. (',12, ' ) EST SUPERIEUR A NOI.ERRE 42:
IN.', ta) ERRE 43
CO TO 900 ERRE 44
a20 YR[TE(MP,a320)II,IZ ERRE 48
UZO rORMAT('" ERREUR, I.E NUKERO 0 UH NOEUO(',H,') EST SUPERIEUR A HERRE 46
INT.',14) ERRE 41
GO TO 900 ERRE 48
C 81.0C 'CONO' ERRE 49
ERRE BD
ERRE BI
ERRE 62
ERRE 63
ERRE 64
ERRE 88
ERRE 9B
300 IF(IERR . CT.39)GO TO 400
U;IERR30
CO TO (900,320,900),IE
320 CO TO 280
C .. .. 81.0C 'PRCt.'
.00 IF(JERR,CT.49) GO TO 800
1&.I &RR 40
CO TO (410,900),IE ERRE 97
410 WRlTE(HP.2410)Il, la ERRE 88
.atlO rORNAT{ ' ERR&UR, LE NUMERO DE CROUPE ( ' ,13.') EST supeRIEUR A HERRE 69
lCPE-' ,13 ) ERRE 80
CO TO 900 ERRE 61
C Bl.OC Cl.EH ' ERRE 6Z
~ IY(I CRR.cr.88) GO TO 900 ERRE 63
IE .. If:RR80 EIIR& 64
O TO (810,OOO,830,6 40,660,860, 970),IE EliRE 66
810 YRJTE(HP , ieIO)Il,IZ ERRE 66
Z810 FOR HAT (' ERREUR, ltE NOHBRE OC HOEUDS(',13,') EST SUPERIEUR A NMERRE 67
lEL. ' ,13) ERRE 68
GO TO 000 ERRE 69
B30 YRrtE(HP,B830)Il,12 ERRE 70
Figure 6.10. (Suite).
Technique de programmation 441
3530 PORMAT (' .. ERRtUR, NUHERO DE PROPRIETE ( ' , 13,') SUPERIEUR A NGPt_ERRE 71
1',13) ERRE 12
GO TO 900 ERRE 13
540 VRITE(HP,2840 lll ,1 2 ERRE 14
2540 PORMAT!' tRRtUR, NUHtRO DE GROUPE (',13,') SUPERIEUR" NeRC' , ERRE: 15
113) &R RE 16
GO TO too ERRE 11
lUO '1RIT&(IIP ,aSBO) II,U ER R& 18
2650 rORHAT(' CRREUR, NUMERO 0 CI.EHENT ( ', J4 , ') SUPERIEUR" HEl.l- ' , ERRE 19
114) ERRE 80
CO TO 100
860 CO TO 130
51'
2510
VRITE(KP, 2810) 1I,1 2
PORHAT ( ' ER REUIl, NOIISRE D EI.EHENTS (', U, ') SUPERIEUR"
11 4)
c .. , PIN
900 Il .. 12
IP(INIV .CE.2) ~ T P
RETURN
GUE 81
URE 82
tII KI: 83
NEI.T.' ,ERRE 84
eRRE 86
eRRE 86
ERRe 81
eRRE 88
tllRe 89
eND ERRE 90
Figure 6.10. (Suite).
6.5.2 BLOCS FONCTIONNELS DE LECTURE DES DONNES
Les blocs fonctionnels de MEF destins la lecture et l'organisation
des donnes sont:
Nom Fonct ion
IMAG impression de toutes les donnes
COMT l ecture et impression de commentaires
COOR lecture des coordonnes des nuds
DLPN lecture des nombres de degrs de libert par nud
COND lecture des conditions aux limites
PRND lecture des proprits nodales
PREL lecture des proprits lmentaires
ELEM lecture des connectivits
SOLC lecture des sollicitations concentres.
6.5.2.1 Bloc 'IMAG'
Fonction
Ce bloc imprime l'ensemble des cartes de donnes fournies par l'utili-
sateur
Organigramme
r------,
1 Programme -
I
1 principal :
L _______ J
- L/_B_L_I M_A_G---J/
442
Mthode des lments finis
Sousprogrammes
BLiMAG : excute le bloc 'IMAG' (fi g. 6 . 11)
Remarque
,
,
Le bloc IMAG doit tre le premier bloc excut.
Al.IH AG
APPEL. CT CXE:CUTION DU BLOC' I""C'
I MPReSSION DE L'ENSEHBLE DES CARTES OC DONNEES
RI.IH
BLIH
BLIH
c---...... --...... ---.. -------.......... ----.. ____ .... __ ....... 61..IH
IHPLICIT REAL- S( A.II,O. Z) BLIN
CONHON/CS/ H,MR,HP,"} BLIH
COHHOH/TRYL/CART(30) BLIH
DAT" lCAR.TH/401 BLIH
C ........ . ........ . .... .. BLIH
tf" ( H1.eO . D) HI_HR BLIH
VRIT E{ HP,ZOOO) BLIH
2000 FORHAT CIJ/,IX,' IHAGC DES DONNEES SUR CARTES'/llI,38(' _ '),/) BloIH
VRITE(HP,200S) BLIH
300:1 rORMATII BLIH
1 80)(.'N U HE. ODe COL 0 N N t ' , /, 13X,'NUHtIl0',6X, 81.1"
Z 10X ,' 1 ',iX, 'Z ' ,9X , ' 3 ' ,9X, '''' ,9X, '8' , 9X , '6 ' , 9X , '7 ' , iX, '8' ,l, OLIM
3 IU, ' OE CARTE' , 6X,8('123"867890'),I , l U , 8C'') , 6X , 80C' ' OLIM
ICAIIT-O BLI"
I CART I .. O 81.1M
10 IICAD(NI ,1000 , END_30) CART BLI"
1000 rOR" AT(20A4) BI.I"
I CART_ICART.I BI.'"
I CARTloolCARTI. 1 BLI"
If'( I CARTI . I.f:.lCARTH) CO TO 20 BI..IH
YRJTC(MP,ZQIO) BI.IH
ZOIO rORHA1(IU,8(IH),GX,80( IH ),/,13X,'HUHERO',7X,8('I2348876110'J,l, BLIH
1 12X, 'DE CARTE' ,6X , 9:<, ' l ' ,9X, '3' ,9X , '3' ,IIX, '4' ,9X, 'B' ,9X, '6', BLIH
Z 9X,'7',9.',,"'8',/ , 80:<, 'NU" 1: Il 0 DE COLONNE') BLIN
VRIT&(NP,20IB) BI..IN
ZOl6 rORHATellll,//) BLIH
VRJTf:(NP,200B) BLIH
JCARTI.O BLIH
ZO VRIT!:.( HP ,2020) ICART,CART BLIN
2020 rORHAT(10X,1l0,6X,20H) BLIM
GO TO JO BLIN
30 VRITE{MP ,3010)
VRIT&(NP, 20JO)
2030 rORHAT(lJ/,8lX,'f' 1 N OE S DON NEE S',/,1111)
R&YINO HI
IIEAD(NI , 1000) CART
RETURN
BLiN
BLIN
BLIN
DL lM
BLIN
BLI"
END Dl.IH
Figure 6.11 . Bloc IMAG.
6.5.2.2 Bloc ' COMT'
Fonction
,
,
3
5
6
1
6
,
,.
1>
"
"
,.
"
"
17
"
" zo
"
"
" ..
"
"
"
"
" 30
"
" 33
34
36
36
31
36
36
40
.,
..
43
Ce bloc lit puis imprime des cartes de donnes contenant des commen-
taires. jusqu' la prochaine carte blanche.
T ehnique de programmation
Organigramme
r------
: Programme 1
1 principal :
L _______ ...J
BLCOMT 1
BLCOMT: excute le bloc 'COMT' (fig, 6,12)
Remarque
443
Ce bloc peut tre excut tout moment pour insrer des commentaires
dans la liste de sortie de MEF,
SUBROUTIN& BLCOHT
c
APPEL ET EXECUTION DU BLOC 'COHT'
B(.CH
,
,
BLeH 3
IHPLICIT REU,-B(A-H,O-Z) BLeH 5
RE,I,L-4 BLANC,CART BLeK 6
COMHONtES/H,HR,HP BLeK 7
COHHON/TRYL/CART(20) BLeK 8
DATA BLANCj4H 1 BLeK 9
c ....................................... .... ... .. ...... 8LCH 10
VIUTl>(HP.2000)
3000 rORMATUI' COHMENTAlRES',' ',13('.')/)
C LECTURE D'UNE CARTE DE COHHENTAIRE
10 READ(HR,lOOO) CART
1000 FORHAT(20A4)
c- RECHERCHE D'UNE CARTE ENTIEREHENT BLANCHE
DO 20 1_1,30
IP(CART(I),NE,BLANC) GO TO 30
20 CONTINUE
RETURN
30 \fRITE(HP,2010) CART
2010 PORHAT(lX,ZOA4)
GO TO 10
BLe" 11.
BLeH 12
BLCH 13
BLeH 1-4
BLCH 18
BLCH 16
BLeH 11
BLCH 16
BLCH 19
BLeH ao
BLCH al
BLeH Z2
BLeH a3
END BLCH 24
Figure 6,12. Bloc COMT,
6,5,2,3 Bloc 'COOR'
Fonction
Ce bloc lit les coordonnes et nombres de degrs de libert des nuds,
gnre des nuds par interpolation, et cre les tables VCORG et KDLNC,
Organigramme
,------j
: ,Programme 1
444
Mthode des lments finis
Sous-programmes
BLCOOR : lit et imprime une carte contenant les variables NNT, NDLN,
NDIM, FAC dfinies sur la figure 6.9 (fig. 6 . 13).
ESPACE : alloue l'espace pour les tables VCORG et KDLNC (fig. 6.5).
EXCOOR : lit des cartes de nuds contenant les numros et coordonnes
(voir paragraphe 6.5), vrifi e la cohrence des donnes, gnre
des nuds par interpolation linaire, construit puis imprime
les tables VCORG et KDLNC (fig. 6.13) .
ERREUR : imprime des commentaires d'erreur (fig. 6.10).
SU8ROUTIHE BLeODR
c
API'CI,. ou OLOC 'COOR'
c
LECTURE DES COORDONNEES OES NOEUDS
Bl.el!
BL. CR
BLeR
~ _._ a _____ a _. __ ._ a ______ __ 8LCII
IHPI,.ICJT REALS(A-II,O-Z) BLe!!
REAL. T81.. BLel!
COHHOHICOORfNDIH,NHT.NDLN,HDLT , PAC(3) BLCI!
COHHON/t:5/H , HII. Ht'. HI BI.CII
COHHOH/ ALI.OC/NVA BL CR
COHHON/LOC/LCORG, I..DI,.NC BLCI!
COHHON/TRVL/rACl(3),IN(3) BLeR
COHHOt! VA(l) BLCR
DIMENSION T8L(2) BLeR
DATA ZERO/ O.DO/,TBL/4NCORC,4HOLNCI BLeR
C ..BLCR
C EH TETe DE BLOC BLCfI
IF(HI . EO . O) Hl-Mil BLCR
IIEAQ(I1I,1000) IN,fACl BLCII
1000 POIlI1AT (3 IS,3f"l0.O) BLCR
C OPTIONS PAil OEPAUT aLCII
IF(IN( I ) .CT.O) NNT-1N ( I) BLC"
1F(IN(2).GT.0) NDLH_1N( 2) BLC"
1F(II1(3) . GT . 0) HOIK_IH(3) aLCR
DO 10 1_1, 3 BLCR
If (rAC I(I) . HE.ZERO) fAC( I)_fACI(I ) 8LCR
10 CONTINUE 81.CR
c II1PIIE5510H DES PARAHETIIE5 OU OLOC BLCR
VRITE(MP , ZOOO) H,NNT,NDLH,NDIH,FAC,NVA BLCII
2000 POIIHAT(/I' LECTURE DES NOEUDS (M_' , 12,' J'l' ',16('-' )1 BLCR
1 18X,'NOHBRE MU . DE NOEUDS (NNT).',J8 1 BLCII
2 IU, 'NOKBR E MAX . DE: D.L. PAR NOEUD (I-IOLN)_' , 181 BLCR
3 lU, ' HOMBRE DE DIMe NSIONS DU PROBLCME (NDIM)_ ' ,181 BLCR
I6l1,'rACTEUR D ECNELLE DES COORDONNCES (FAC)_',3&12 . 6/ BLCR
fi 1 fi li , ' ESPACE DE TRAUIL EN HOTS REELS (NVA)_',nO) BI.CR
C ALLOCATION D'ESP ACE BLCR
Ir(LCORC.EO.l) CALL ESPACE(NNTNDIH,I,TBL(I),LCORG) BLC"
If(LDLNC.EO.l) CALL tSPACE(NHT+l,O,TBI.(Z),LOLNC) BLCR
C ClIECUTION DU BLOC BLC"
CALL EXCOOR(VA(LCORC),U(LOI.NC BLC"
. RETURH BLCR
END BLeR
Figure 6.13. Bloc COOR.
,
3
,
,
7
8
10
Il
"
13
. ,
7
.8
20
,.
22
"
..
"
"
"
"
" 30
3.
" 33
,.
36
36
37
3B
" 40
..
"
-
c
c
Technique de programmation
SUBROU1INE EXCOOR(VCORG,KDLNC)
EXECUTION DU BI"OC 'COOR'
LECTURE DES COORDONNEES DES NOEUDS
EXCR
EXCR
EXCR
445
3
IHPLICIT REAL-B(A-H,Q-Z) EXCR 6
COHHON/COOR/NDIH,NNT,NDLH,NDLT,PAC(3) EXCR 1
COHHON/ES/H,HR,HP,HI EXCR 8
CONHON/TRVL/Xl (3), X2(3) EXCR 9
DIMENSION VCORG(l),KDLNC(l) EKCR 10
DATA SPECL/l.334S6789D31j EKCR Il
c ................................................. . ..... . .. .... .EXCR 12
C INITIALISATION DES COORDONNEES EXCR 13
00 10 1_1, Il ,NDIH
10 VCORG(I)_SPECL
C--- _... LECTURE DES CARTES DE NOEUDS
IF(H.GT.O) VRITE(HP,2000)
2000 FORHAT(II' CARTES DE NOEUDS'/)
&0 READ(Hl,IOOO) INI,Xl,IN2,X2,INCR,IDLN
1000 FORHAT(a(I5,3FIO.0),aIB)
IF(H.GT.O) IIRITE(HP,a010) I1n,XI,INa,xa,INCR,IDLN
2010 FORHAT(' >>>>>' ,2(16,3E12.6),216)
IF(INl.LE.O) GO TO 60
C DECODAGE DE LA CARTE
IF(INI,GT.NNT) CALL ERREUR(ll ,INI ,NNT,O)
IP(IN2,GT.NNT) CALL ERREUR(12,IN2,NNT,0)
IP(IN2,LE.0) IN2_INI
IF(IDLN.GT.NDLN) CALL ERREUR(13,IOLN,NDLN,O)
IF(IDLN.LE.O) IOLN_NDLN
IF(INCR.EO.O) INCR_I
II_(IN2_INI)/INCR
12_INl+IIINCR
If(Il.CO.O)Il-1
IP(INa,NE.I2) CALL ERREUR(14,IN2,INz,0)
C _. CENERATION DES NOEUDS PAR INTERPOLATION
DO 30 I_I,NDIH
XI(I)_XI(I)PAC(I)
X2(1)_I2(I)PAC(I)
30 _ X2(I)_(X2(1)_Xl(I/II
50
Il .. 0
Ia.(INl})NDIH.l
13_(INCRl)NDIH
DO 50 IN_INI,INa,INCR
KDLNC( IN.I )_IDLN
IF(VCORG(12).NE.SPECL) CALL ERREUR(15,IN,IN,O)
DO 40 I_I,NDIH
VCORG(12)_Xl(I).X2(I)ll
12_12.1
II_Il+l
12_12.13
GO TO 30
C VERIFICATION DES NOEUDS HANOUANTS
60
70
80
Ib.NNTONDUI+l
12 .. 0
DO 90 1 .. 1,"N1
Il_II_HDIN
13 .. 13]
If(VCORG(Il)SPECL) 70,80,10
Ir(Ja.EO.D) la .. I3
GO TO fa
IP(IZ.EO.O) CALI" ERREUR(16,J3,13,O)
IP(l2.RE:'O) CALL ERREUR(l7,I3,I3,'l)
Figure 6.13. (Suite).
EXCR 14
EXCR 15
EXCR 16
EXCR 17
EXCR 18
EXCR 19
EXCR ao
EXCR al
EXCR a2
EXCR a3
EXCR a4
EXCR 25
EXCR a6
EXCR 27
EXCR 28
EXCR 29
EXCR 30
EXCR 31
EXCR 3a
EXCR 33
EXCR 34
EXCR 36
EXCR 36
EXCR 37
EXCR 38
EXCR 39
EXCR 40
EXCR 41
EXCR 43
EXCR 43
EXCR 44
EXCR 46
EXCR 46
EXCR 47
EXCR 48
EXCR 49
EXCR 50
EXCR 51
EXCR 52
EXCR 53
EXCR 64
EXCR 85
EXCR 56
EXCR B7
EXCR 58
EXCR 89
EXCR 60
EXCR 61
EXCR 62
EXCR 63
EXCR 64
446 Mthode des lments finis
90 CONTINUE
If(I2.NE.HNTl CALL CRREUR(18,HNT,l a,0)
c HOHBRE TOTAL DE D.L.
NOLT .. O
Il_NNT+1
DO 100 1.3,11
100 NOLT_NOLT+KDLNC(l )
....... IMPRESSIONS
If(H . LT .a ) co TO 120
VRITE(HP ,a020)
2020 PORMAT( / 1QX , 'NOEUD 0 . 1. , ' .8X,'X', lIX , 'y' , IIX . - Z'fl
'II .. 1
I2 .. NOI"
DO 110 IIl_I,NNT
XRITE(HP,2030) IN,KOLNC(IN+lj,(VCORC(l), 1.11 , 13)
3030 rORH,I,T(lOX,ZI9,3EI2 . 1:I)
110 12_13+"0IH
1 aD RETUR"
'HP
Figure 6.13. (Suite).
6.5.2.4 Bloc 'OlPN'
Fonction
EXCR ..
ExeR 66
ElICR 61
EXCR 68
EXCR
" ExeR 70
EXCR 7)
cxeR
" EXCR
" CIeR H
CIeR YS
CXCR
" CXCR
"
EXCII
" EXCR 19
CXCR 80
EXCR 81
EXCR
"
tXCR B3
CXCR 54
Ce bloc lit les nombres de degrs de libert des nuds et modifie la
table KDlNC. Il n'est utile que si le nombre de degrs de libert varie
d'un nud l'autre.
Organigramme
r------ .,
1 pr"ogramme 1
1 principal 1
~ ____ ...J
Sous-programmes
BlDlPN : (fig. 6.14) .
BLDLPN EXDLPN
EXDlPN : lit des cartes contenant le nombre de degrs de libert et les
numros des nuls correspondants (fig. 6.14).
ERREUR: (fig. 6.10).
c
c
Technique de programma/ion
8LOt.PH
APPEL OU BLOC 'DLPH'
LECTURE DES NOHeReS DE O. L. PAR NOEUD
BLDt.
BLOt.
BLOt.
447
1
,
,
4
CONNON/ES/ K. H "P , "l BLOL l
COKHON/LOC/LCORC, LDLNC BLOt. 8
CONN ON H,(1) BLOt. 9
c-_ ____ ._. ____ , .... . . .. .................................... _. ' 0 ' BLOt. 10
Ir(Hl.CO ,O) HI_HR
VRITE(KP,200D) H
2000 F'ORH .... T(f/ LeCTURe DES D.L. (K_',13,')',' ',11(' .. ')
C .... LL EXOLPH(VA(LDLNC
RETURH
END
SUBROUTIHE EXOLPN(IOLNC)
BLOt. 11
BLDt. Il'.
BLOI. 13
BLOt. 14
BLOt. HI
BLOl. U
EliOt.
c __ __ ..... _ ............................. _______ ............. ........ ________ ... _E.OL 2
c
c
EXECUTION OU 8LOC 'Ot,rH'
LECTURI: Des NOMBRES DE 0 . 1. . rAil. NOEUD
ElIOl.
ClOt.
c ...... _ ............ _____ ...... ___ .................................. ____________ ___ CXOL
,
4
,
IHPLICIT REAL-S(AH.OZ)
COHHOHfCOOR/NDIH,NNT,NDLN,NDLT
COHHON/ES/N,HR.HP,H)
COHMON/TRVL/Kl (18)
DIMENSION KOLNC'l)
EXOL
EXOL
EXDL
EXDL
EXOL
7
,
c ............ ........ ............... .... . .... . ... .. .. ...... EXDL
9
10
Il
Ir(H.cr .O) YRITE ( HP ,ZOOO )
2000 rORHIIT U{ ' CIIUES DE CROUPES OE D. "' .'/)
C.. LIRE UNE CUTE DE CROUPE
10 READ("I , IOOO) IDLN , ICI
1000 fOIUU1 ( IGI6)
IP(H . Cf . O) YRITE(NP,2010)IDLN ,K l
2010 FORNAT( ' > ' ,1616)
If(IOLH.LE . O) CO TO 40
IP(IOLH.GT.NOLN) CALI. ERREUR(Zl,IOLN,NDLN,I)
C .. STOCKER LES NONBRES DE D. L.
20 00301_1,16
J_Kl(I)
IP(J.LE.O) CO TO 10
lr(J.GT. NNT) CALI. ERREUR(3Z,J,NNT,1)
30 KDLNC(J+l ) .. 101.."
READ(Kl,IOIO) KI
1010 rORNAT (tIX ,lBI8)
Ir(K . CT. O} YRITE(HP ,aOaO} KI
zozo rORNAT( ' > ' ,8l,1616)
CO TO ao
c HOKBRE TOTAL DE D.L,
40 NDL1_0
80
J .. NNT+I
00 60 I .. a,J
NDLT_NOLT+KDLNC(I)
RETUIt"
EHO
Figure 6.14. Bloc DLPN.
EXDL 12
EXOL 13
EXOL 14
EXPL 18
EX 01. 16
EXDt. Il
EXOt. lB
EXOL 19
EXOL aD
EXOL al
EXOt. aa
EXOL a3
EXOL 24
EXDL 35
EXOL ZI
EXDt. al
EXOI. 28
EXDt.
EXOL 30
tXOL 31
ExnL 32
EXOL 33
EXOt. 34
EXOL 38
EXOt. 36
EXDL 37
EXDt. 3B
448
Mthode des lments finis
6 . 5 . 2 . 5 Bloc 'CONO'
Fonction
Ce bloc li t et interprte les cartes de conditions aux limites pui s cre les
tables VDIMP et KNEO.
Organigramme
r-----.,
1 Programme 1
: principal 1
""' _____ ...J
Sous-programmes
ESPACE ERREUR
BLCOND : cre les tables KNEO et VOl MP (fig. 6.15).
ESPACE : (fig. 6.5).
VIDE : supprime la partie inutile de la table VDIMP (fig. 6 . 5).
EXCOND : transforme la table KDLNC, dfinie sur la figure 6.6, en table
cumulative; puis il lit des cartes de types de conditions aux
limites et la liste des numros de nuds correspondants,
enfin EXCOND construit et imprime les tables VDIMP (valeurs
des degrs de libert imposs) et KNEO (numro d'quation
de chaque degr de libert (fig. 6.15) .
ERREUR : (fig. 6 . 10) .
Remarque
Ce bloc est ncessaire puisqu'il construit la table KNEO.
Technique de programmation 449
SUBROUINE BLCOUD
lIl.eN
C APPEL DU BLOC 'COND' BLeN
2
3
C LECTURE DES CONDITIONS AUX LIHITES ET CREATION DE L. ... TABLE (NEO) BLeN
6
IHPLICIT REALS( .... H,Q.Z)
REAL-" TBL
COHHONfCOORjNDIH,NNT,NDLN,NDLT
COHHOH/COND/NCLT,NCLZ,NCLNZ
CDHHONjALLOC/NVA,IVA
BLeN 6
BLeN 7
IILeN 8
BLeN 9
BLeN 10
CONHON/ES/H, HI!. HP, HI IILeN Il
COHHOH/LOC/LCORG,LDLNC,LHEO,LDIHP BLeN la
COHMON VA(I) BLeN 13
DIMENSION T8L(2) BLeN 14
DATA TBL/4HNEO ,4UOIHPI IILeN 16
c. - ........... - .............................. - . BLCN 16
If(Hl.ED.O) HI_HR BLeN 17
VRITE(KP,2QOO) H BLeN lB
2000 rORHAT(I/' LECTURE DES CONDITIONS ,\UX LIHITES (H .. ',12,')'" BLeN 19
c
c
l 33('.')/) BLCN 20
If(LHEO.EQ.l) CALL ESPAC&(NDLT,O,TBL(l),LNCO) BLCN 21
IF(LDIHP.EO.l) CALI. ESPACE(NDLT,1,TBL(2),LDIKP) BLCN 22
CALI. EXCOND(VA(LCORG),VA(LDLNC),VA(LNEO),VA(LDIHP BLCN 23
CALI. VIDE(LDIHP+NCLT,1,TBL(2 BLCN 24
RCTURII IILCN 25
,ND
OLCN 26
SUBROUTINE CXCOND(VCORG,XDLIlC,XNEO,VDIHP)
EXCN
EXECUTION DU OLOC 'COND' EXCN
LECTURC OES CONDITIONS AUX LIKITES CT CREATION DE LA TAOLE (NEO) EXCN
3
IKPLICIT REAL-O (AII,OZ) &XCN 6
COHHON/COOR/NDIH,NNT,NDLN,NOLT EXCN 7
COHHONjCONDjNCLT, NCLZ, NCLNZ EXCN 8
COHHONjRESOjN&O EXCN 9
COHHON/CS/H,HR,HP,Hl EXCN ID
COHHON/TRVL/ KV(16),V(10),H(20),ICOD(10) EXCN Il
DIHENSION VCORC(l),KDLNC(l),KN&O(l),VDIHP(l) EXCN 12
DATA 1.7/7/,1.8/8/,1.16/16/ ,Xl/0.0DO/,xa/0.000/,X3/0.000/,lERO/0.OO/EXCN 13
C . EXCN 14
C.. TABLE CUHULATIVE KDLNC EXCN 15
DOIOIN_l,NNT eXCN 16
10 XOLNC( IN+l ).IWLNC( IN)+KDLNC(lN+l) EXCN 17
l1_"NT+l
IF(H.CE.2) VRITE(HP,2000) (KDLNC(IN),IN_I,ll)
2000 FORHAT(II' NOHBRE DE 0.1.. PRECEDANT CNAOUE NOEUD (DLNC)'I
1 (lX,IOIlO
c. - .. INITIALISATION
IIC1.T_O
NCLNZ_O
NCLZ_O
IF(H.CE.O) VRITE(HP,2010)
2010 FORMAT(/I' CARTES DE CONDITIONS AUX 1.IHITES'/)
C LIRE UNE CARTE DE GROUPE DE C.L.:I0 CODES + VAL.IHPOSEES
20 READ(HI,IOOO) ICOD,(V(I),r_l,L7)
1000 FORHAT(10Il,7FIO.0)
IF(H.GE.D) VRITE(HP,a020) ICOD,(V(I),I_l,L1)
2020 FORHAT(' >' ,1011 ,7E12.6)
C TEST POUR UNE CARTE BLANCHE
J_O
00301 .. 1,10
30 J_J+ICOO(l)
IF(J.EO.O) GO TO 110
Figure 6.15 Bloc COND.
EXCII 18
EXCN 19
EXCN aD
EXCN al
EXCN 22
EXCN 23
EXCN 24
EXCN 25
EXCN 26
EXCN 111
EXCN 2B
EXCN 29
EXCN 30
EXCN 31
EXCH 32
EXCH 33
EXCN 34
EXCN 36
eXCH 36
EXCH 37
450
Mthode des lments finis
c .... t.lRE: UNE CART E ADDIT I ONNEl.!.!: SI NtCESS AllIE
u _o
DO 40 IDel,NOLN
.r(JCOO(ID) . LT . 3) co TO 40
12_11h t
I reJa . NC . l.8) CO TO 40
READ(HI,IOIO) ( V(I) , I_l. 8,NDl.H)
10 1 0 rORKAT(IOk, lP10 . O)
I r( H, G& .O ) VRITE(NP ,a030 ) (V( l l ,I_L8 , NDl.H )
3030 rORNATe' >' ,IOX,JEla. S)
40 CONTINUe
c- _ ..... Lr.CTURE DES CARTES OC NOEUDS
BD RE AD(N), loao) (KV(JN), 111 .. 1,1.16)
1030 rOIlH11(1615'
IP(lL GE . O) IIRITP.(HP,Z040) (KV(tN),IN .. I,L16)
2040 rORNAT(' >' ,IOX,16IS)
C CONSTRUCTION DE NEO
00 100 IN_l,LI6
U_kV(IN)
c rIN oc CROUPE DE C.l.. ou F'It! DE NOEUDS OU ANALYSe DU Norun
IFeU) aO,20,60
80 1f' ( IlI.CT . HNT) CALL ERREUR(32,I2,NHT,I)
Il.KDLNC( U)
IDN_kOLNC(IZ.l)I\
c .. -.. . Cllttl VDINP ET PLACER DANS KHEO L ADRESSE DU O. L, I MPOSE
IV.O
DO 90 IO.t , IDN
Il.n.1
lC_ICOD( 10 ) 1
lF(IC) 90 , 10,80
10 NCLT.HCLT.I
VDINP(NCLT).zeRO
NCLZ. NCI.Z .. I
KNEo(J1 ) .. . NCLT
O TO 90
80 NCLT .. NCloT+ l
I Y.IV.-l
VDIHP( NCLT) - Y(IY)
NCLNZ_NCLNZ .. I
KNEO(II) NCI.T
90 CONTINUE
100 CONTl NUe
C . . ... AUTRe CARTe DE NUMEROS DE NOEUDS
00 TO 80
C CR&tR lotS NUHEROS D'EOUATIONS DANS NEO
110 11.0
00 180 tMI,NNT
10 .. 1(0I.NC( IN)
laD 10.10+1
If(I O.OT . XDLNC(INtl 00 TD 150
Ir(KNEO(I D 110,130 , 110
130 tl.ll+1
JCHEO(ID)l1
CO TO 120
180 CONTINUE
HEO_l1
C IMPRESSIONS
.r(M. LT . O) CO TO 110
WRITE(MP , 2080) NNT , NDLT,NEO,NCLNZ ,NCLZ,NCLT
8080 PORMAT ( 1/
1 18X, ' NOMBRE DE NOEUDS TOTAL
li 18X, 'NOMBRE DE D.L. TOTAL
3 l U, 'NOMBRE 0 EOUATlONS A RESOUDRE
.. 18X, 'NOMBRE DE 0 . 1.. IHPOSES NON NULS
Figure 6.15. (Suite).
(NNT) ' ,181
( NOL1)'" , 181
(NEO) . ' ,IBI
(NCLNl).' ,IBI
EXCN JO
EXCN JO
EXCN
EXCN ..
tllCN ..
EIICN
.,
EXCN ..
EXCN ..
E:XCN ..
eXCN
.,
EXCN ..
EXCN ..
EXCN 50
EXCN 51
EXCN
"
EXCN 53
EXCN 54
EXCN
"
EXCN
" EXCN
" EXCN
" EXCN
" EXCN S.
EXCN
'1
EXCN ..
tXCN
" tXCN ..
ElICN ..
EX CH ..
EXCN
"
=
EXCN ..
EXCN ..
EXCN 7D
EXCN 71
EKCN
"
EKCN
" EXCN
,.
EXCN
"
EXCN
" EXCN 17
EXCN 76
EKCN 76
EXCN 8.
EKCN 81
EXCN
"
E:XCN 53
EXCN ..
EXCN 85
EXCN ..
toXeN
" EXCN 88
EKCN ..
fiXCN
8'
EXCN 81
EXCN
"
UCN
" &)(CN ..
&)( CN ..
E)( CN
..
E:XCN or
EleN ..
EXCN ..
EXCN 1.0
EXCN 1.1
Technique de programmation
fi 18)(,'NOH8RE oc O. L. IHPOSES NULS (IlCLZ)_',I51
6 lU,'NOHBRE TOTAL oc O.L. IMPOSES (NCLT)_' ,15/)
If( H. CC.:3. AND. NCLT . GT. 0) 'IR IlECMP, 20110) (VDIMP (1).1 .. 1 ,NeLT)
2060 rORKATCll ' IHPOSEES (YDIHP)' II CIOI,IOEI2 . 8
"R JTECKP ZOTO)
a070 PORMATCII' TABLE Des eOORDONNCES Des NOEUDS'II
1 HO D.L .',III,'X', lZI,'Y ',IZX,'Z',10X,'NUHEROS D tOUATIONS
3CNf.0)'/)
13_0
00 160 IN_I,HIlT
lI-ra+1
ra_I1+HOIM
IOI_kOLNC(lN).1
ID a .. XDLNC( 111+ 1 )
ID_lOZIOI.l
IPClOZ.LT.IDl) lOZ.JDI
XI_VCORO(II)
trCHOIH.CE.a) la.veORC!II.l)
[r(NOIH.CE.3) X3_VCORG(Il+a)
160 VRITECMP , Z080) IN ,l D,1l.lI2,13,(KNEO(t ), I.IOI,I03)
1080 rORHAl(II , 218,3t l a.S ,IOX. 10III )
170 RelUItK
'"
Figure 6 .15. (Suite).
6.5.2.6 Bloc 'PRND'
Fonction
Ce bloc lit les proprit s nodales et cre la table VPRNG
Organigramme
,------,
H BLPRNO H EXPRNO 1
1 pnnclpal t. .. .
Sous-programmes
BLPRND : cre la table VPRNG (fig. 6 . 16) .
EXPRND : lit toutes les proprits en tous les nuds (fig. 6.16).
451
EXCH 103
EXCN 103
EICN 104
EXCN lOS
ElICN 106
ClICN 101
,;xCH
108
EXCN
1"
eXCH
Il'
EXCN III
ElCN
1 l ,
EleN 113
ClCN
Il'
ElleN
1 l '
EKCN
Il'
CleeN Il 7
tXe N 118
ExeN Il'
exeN
1"
ElleN
l '1
tXCN lU
EKCH lZ3
ElCN
1"
452 Mthode des lments finis
c
c
SUBROUTlUE BLPRND DLP"
APPEL DU IILOC 'l'RN!)'
LECTURE DES PROPRIETES NODALES
DLP"
8LP"
l"P LICIT DLP"
REAL-4 TOL BLPN
COHKON/COOR/NDIH, NHT BLPU
COHHON/PII:HD/NPRN DLPN
COHHON/E:S/H,HR,HP,HI IILPN
COHHON/LOC/LXX(4),LPRNC BLP"
CONNON VAI I) BLPH
DATA TBL/411PRNC/ 81,."H
C_-_ .... . ........... ... ....... ....... .. . - ... - ... .8I..PN
If'(Hl.EO.O) H.I_HR IILPN
READCHI,1000) "l'RN BLPN
1000 F'OIlHAT(l5) BLPN
VRITC( HP ,2000) H,UPIIN OloP"
2000 f ORMAT(/! ' LECTURE Des PROPRIETE;S NODALes ( H_',12, ')'/' ',30('.')/81.,,1'1-1
1 IBlI ,' NOHDRE DE PROPRICTl:S PAR NOCUD (HPRN) .. ',IS) BLP"
If(LPIINC. tO.I) CALI.. CSPACE{ NN,NPRN,I,TDL,LPRNC) DLP"
CALL EXPRVO(VA(LPRUC DLPN
RETURN eLPN
EHD BLPN
SUBROUTINE CXPRND(VPRNO)
C ___ n _____ _______ ___ _____ _____ ____ _____________ EXPN
c
c
EXCCUTTON DU BLOC 'PRNO'
LECTURE DES PROPRIETes NODALES
IHPLI CIT REA L8(A H,QZ)
COHHON/COOR/NDIH,NNT
COHHON/PRND/NPRN
COHHON/CS/H,HR,HP,Hl
DIMENSION VPRNG(l) .
EXPN
EXPN
EXPH
EXPN
eXPN
EXPN
eXPN
C...EXPN
....... LIRi': LES PROPRIETES NOEUD APRES NOeUIl EXPN
tl_NNT-HPRN eXPH
RI:AO(lti l DOO}(VPRNG() . J.l . Il) I:X,,"
1000 rORHAT(SflO.O) eXPH
InH . CE.D) YRITE(HP.2000) (VPRNG(I), ).\, Il) eXPN
&000 rORHATU/' CARTes DE PROPRIETES NOOALe S'1 (' >H',St!:!.!! eXPH
RETURN eXPH
END eXPN
Figure 6.16. Bloc PRND.
6.5.2.7 Bloc 'PREL'
Fonction
,
3
5
,
,
8
9
10
1 1
" 13
1.
l'
l'
l'
18
18
"
' 1
"
" 24
Z
3
,
,
8
9
10
1 1
12
13
14
l'
1.
l'
18
l ,
Ce bloc lit et imprime les cartes de proprits lmentaires et cre la table
VPREG Qui contient tous les groupes de proprits lmentaires.
Organigramme
,-----,
1 Progra.;nme
1 printipal 1
ESPACE ERREUR
EXP REL
VIDE
,
Technique de programmation 453
Sousprogrammes
BLPREL : lit le nombre de groupes de proprits lmentaires NGPE, et
le nombre de proprits par groupe NPRE ; puis cre la table
VPREG, ainsi que la table de travail V (fig. 6 , 17).
ESPACE (fig. 6.5) ,
VIDE (fig. 6 . 5).
EXPREL : lit, pour chaque groupe, le numro du groupe et les NPRE
valeurs des proprits correspondantes ; puis transfre ces
valeurs dans VPREG (fig. 6.17).
ERREUR: (fig. 6.10).
Remarque
Le nombre et le contenu des propri tS doivent tre
cohrents avec les sous-programmes lmentaires ELEM01 ... qui les
utili sent. C'est ce bloc PREL qui lit les proprits physiques telles que
module d' lasti cit, conductivit, etc.
c
c
SU8RQUTINt BlPREl
Arpel. Ob BLOC ' PRr.i. '
LeCTURE oes El.E"ENTAI RES
8l.pe
8l.PE
,
3
C _ ft _ _ 8LPC 5
'"PLI CIT RCAl."8(A . K,OZ) Bl.PE 6
RCAl. -. T8l alPe 1
COHHON/pRn/ NCpc , NPRE fllpt a
COHHONtES/H , HR,Hp,"} al.PC 9
COHHON/LOC/l.XX(S),lPRCC IIlPE 10
COHHON/TRVL/IN(2) al.pt II
COHMON VA(I) BlPE 12
OIH t NSI ON T8l.(2) BLPE 13
OATA T8l./4HPREC, 411V 1 BlPE 14
c . .... " .. ,,,, BLPC 15
If(HI .CO. O) H""HR BLPC 16
c .. .. LIRC lC NOHBRt 01: CROUPES CT DE PROPRIETES l'AR CROUPE: aLPE 11
READ(Hl,1000) IN alPE 16
1000 r ORHAT(215) aLPE 19
Ir(IN(I) .GT. O) NGPE.IN(I) aLPE 20
If ( tN(2 ) . GT. 0) NPRE.IN(2) aLPE 21
VRITC ( Hr , 200 0 ) H,NcrC , NPRE
2000 f ORHAT ( 1/' LtCTURE DCS pROpll JETES ElEHENlA UES ( H. ' , 12, ' 1 ' l' "
1 3B('. ' l/15X ,' NOM8i1E DE GIIGUPES DE PROPRIETes (NCpE),,',nI I
c
c
3 lB)! , ' NOH8RE DE PROPRIETES PAR GROUPE (NpRE ) . , (5 )
Ir(LPPEG . EO . I) GALL ESPACE(NCpE-NPRE,I . T8L(I) , LpREG)
CALL ESPACE(NPRE,I , TBl.(31,LI)
CALL EIPREl. ( VA(l.PREG) . VA(Ll
CALL
RCTURN
EHO
SU8ROVTINE EX pREL(VpRCG , VI)
EXECUTI ON DU BLOC 'pRCL'
LECTURE DES PROPRIETES ELEHENTAIRES
IItf'e li li
8l.PE Z3
8LpE Z4
BlPE 35
8lPE 26
8l.PE 31
8l.pE 2B
8l.pE Z9
aLPE 30
Bl.PE 31
E)lPE
EX PC
EXpE
,
3
c ... ...... ................................................................................ EX PE
4
,
Figure 6,17, Bloc PREL,
454
Mthode des lments finis
IHPLI CIT tCAL
e
8( A-H ,OZ )
COHHOH/PRCLINCPE.NPRC
CXPC
I:XI'I:
CONNOH/CS/ K.HR . N,.."l eXPE
DIHeNSION YPRI:C( 1 ) . V 1 (I) CXPC
c . ............ " ... "" . ... . .. . ..... . ' .. ..... ........ .... eXfE
If <H . CC . O) VIITI:("',2000) eXPE
2000 fORHAT( /I' CARTES DC PROPRIETES ',} eXfE
C LIRC UN t'ROUH EXPE
Il .. HIHO(1 . HPRE) EXPE
).1 Expe
10 ICAD(Hl,IOOO) ICPE,(Vl(1),I -I,II ) EXPE
1000 rORH"T(lfI,1flO . O) E:XPE
1'(H. OI.: . O) VRITCeNP,2010) IGPE, (VI (1) ,1_\, Il ) EXPE
2010 rORHATe' >u:n',18,7E1Z.5) EXPE
Irelere . LE.D) GO TO 40 EXPC
If(lCPE.CT . NCPC) CALI. ERREUR(41,ICPE,NCPC,1) EXPE
rreNfle.LE.7) CO TO 20 EXPE
c LIRE LCS PROPRIETES EXPE
RCAD(HI,IOIO) (Vl(I),I .. a,NPRE) EXPE
1010 PORHAT(SX,7P10.O) EXPE
lr(H . CE.O) VRITE(HP,2020) (VI(I),I_8,NPRE) EXP!.:
2020 PORH,I,l'(' >;' ,!U,lEI2 .ts) EXP!;
20 DO 30 I_I,NPRE E.:XPE.:
30
YPRE.: O(J) .. YI(I) EXPE
J .. J. 1
CO 1' 0 10
/l:Cl'URH
EXPE
ElCPE
!;lCPI:
CND ClCPE
Figure 6.17. (Suite).
6.5.2.8 Bloc 'ElEM'
Fonction
6
T
,.
I!
" 13
..
"
10
lT
1.
19
zo
"
"
"
"
"
"
"
"
"
3.
31
" 33
Ce bloc lit les cartes de connectivit des lments et cre le fichier des
lments.
Organigramme
ESPACE ERREUR
LOCELD
r-----
1 Programme
XTRELM
WRELEM PRELEM
Technique de programmation 455
Sous-programme
BLELEM : Iii une carte conlenanl les variables NELl, NNEL, NTPE,
NGRE, NSYM, NIDENl dfinies sur la figure 6 , 9 el cre les
lables KLD, KLOCE, VCORE, KNE, VPRNE, VPREE (fig, 6 , 18).
ESPACE : (fig. 6 .5),
EXELEM : Iii une carle par sene d'lmenls gnrer conlenant les
variables IEL, IGEN, INCR, ITPE. IGPE, IGRE dfinies sur la
figure 6.9, ainsi que la conneclivit KNE, Puis EXELEM
excute les oprations suivantes pour chaque lment:
- vrificalion de la validil des donnes
- Iransfert des numros d'quations des degrs de libert
de l'lment, de KNEQ dans KLOCE
- transfert des coordonnes des nuds de l'lment de
VCORG dans VCORE
- mise jour de la lable des hauteurs de colonne KLD
- transte,. des proprits des nuds de l'lment, de
VPRNG dans VPRNE
- transfert des proprils lmenlaires de l'lment, de
VPREG dans VPREE
- appel de WRELEM
Enfin EXELEM transforme KLD en la table de localisation des
dbuts de colonnes de la matrice globale (fig. 6.18) .
. LOCELD : construit la table KLOCE puis met jour la table KLD, pour
un lment (fig. 6.18).
XTRELM : exlrail les coordonnes des nuds, proprits nodales et
lmenlaires des tables globales, pour un lment donn
(fig. 6 , 18).
PRELEM : imprime toules les informations correspondant un lment
(fig, 6 . 18) ,
WRELEM : crit sur le fichier des lmenls un enregistrement conlenant
Ioules les tables lmentaires construites par EXELEM
(fig, 6.18),
RDELEM : programme de lecture correspondanl WRELEM qui n'est pas
utilis par ce bloc mais par les blocs d'excution (fig. 6,18).
ERREUR : (fig. 6.10).
456 Mthode des lments finis
c
c
SUBROUT!NE BLELEM 8!..E!..
APPEL DU BLOC 'ELEH'
LECTURE DES EI,EriEUTS
BLEt.
BLEL
IHPLICIT REAL-a(II.II,DZ) BLEL
REAL-. TOL BLEt.
COHHON/COOR/NDIH,NNT,NDLN BLEt..
COHHON/PRNO/NPRN BLEt.
COHHON/PREL/NCPE,NPRE BLEt..
COHHON/ELEH/NEL T, HNEL, laPE, NGRE, HE, NIDENT, NPC BLEt.
COHHON/ASSE/NSYH,NKC BLEt..
COHHON/RESO/NEO BLEt..
COHHON/ESJH,HR,HP,MI,H2 BI.EL
COHHON/LOC/LCORC,LDLNC,LNEO,LDIHP,LPRNG,LPREC,LLD,LLOCE,LCORE,LNE,BLEL
1 LPRNE,LPREE,LDLE,LKE,LfE,LKGS,LKGD,LKGI,LfC,LRES,LDLG BLEL
COHMON VA( 1) BLEt..
DIMENSION TBL(6),IN{6) BLEL
DAn. TBL/4HLD ,4HLOCE,4HCORE,4HNE ,4HPRNE,4HPREE! BLEt..
_ ,_. _ .. _ .... _ ... - _ .. -BL.EL.
IP(HI.EO.O) HI_HR BL.EL.
IP{HZ.EO.O) HZ_HE BL.EL.
READ(Hl,IOOO)IN BL.EL.
1000 FORHAT(6I5) BL.EL.
IP(IN(l).GT.O) NEL.T_IN(l) BL.EL.
IP(IN{Z).GT.O) NNEL._IN(Z) BL.EL.
IF(IN(3).GT.0) NTPE_IN(3) BL.EL.
IF(IN(4).GT.0) NGRE_IN(4) BL.EL.
IP(IN(S).NE.O) NSYH_} BL.EL
IF(IN{6).NE.0) NIDENT_} BL.EL
VR tTt(Hf, 3000) H, NELT, NUE\.., UTPE, NGRE, NSYH, N IDENT BLE\..
ZOOO PORMAT(//' LECTURE DES ELEMENTS (H-',IZ,')'f' ',ZO('_')I BL.EL
1 MAX. D ELEMENTS (NEL.T)_',ISI BL.EL.
Z Jax, HAX. DE NOEUDS PAR EL.EMENT (NIIEL)_' ,151 BL.EL
3 lSX,'TYPE 0 EL.EMENT PAR DEFAUT (NTPE)_',ISI BL.EL
4 DE GROUPES 0 ELEMENTS (NGRE)_',ISI BL.EL.
Il 15X,'INDICE DE PROBL.EME NON SYMETRIOUE (HSYM)_',151 BL.EL
6 IIlX,'INDICE 0 CL.EMENTS IDENTIOUES (NIDENT)_',I5/) BL.EL
IF(LL.D.EO.I) CALL ESPACE(NEO+l,O,TBL(l),L.LD) BL.EL
IF(L.L.OCE.EO.I) CAL.L. ESPACE(NNEL.NDLN,0,TBL(3),L.LOCE) BL.EL
IF(LCORE.EO.I) CALI. ESPACE(NNEI.NDIM,J,TBL(3),I.CORE) BI.EL
IF(LNE.EO.I) CALL ESPACE(NNEL,0,TBL(4),LNE) BLEL
IF(NPRN.GT.O.AND.LPRNE.EO.l) CALL ESPACE(NNEI.NPRN,1 ,T8L(S),LPRNE)BLEL
IF(NPRE.GT.O.AND.LPREE.EO.l) CALL ESPACE(NP1E,I,TBL(6),LPREE) BI.EL
CAI.L EXELEH (VA( LCORG), VA( L.DLNC) ,VA (LPRNG) ,VA( LPREG) , VA(l,L.OCE) , BLEL
1 VA(LCORE),VA(LNE),VA(LPRNE),VA(LPREE),VA(LNEO),VA{LLD BLEL
VRITE(MP,ZOIO) NKG,NPG BLEL
ZOIO FORHAT(iSX, 'LONGUEUR 0 UN TRIANGLE DE KG (NKG)_' ,IlOf BLEL
1 J5X,'NOHBRE DE POINTS D INTEGRATION (NPG)-',IlOf) BLEL.
RETURN
END
BLEL
BLEL
SUBROUTINE EXEI.EH(VCORG,KDI.NC,VPRNG,VPREG,KLOCE,VCORE,KNE,VPRNE, EXEL
VPREE,KNEO,KL.D) EXEL
EXECUTION DU BLOC 'ELEN'
LECTURE DES ELEHENTS
IMPLICIT REALB(A-H,O-Z)
COHHON/COOR/NDIH,NNT
COMHON/PRND/NPRN
COHHON/PREL/NGPE,NPRE
COHHON/ELEH/NELT,NNEL,NTPE,NGRE,HE,NIOENT,NrG
COHHON/ASSE:/NSYH,NKG,NXE,NDLE
Figure 6.18. Bloc ELEM.
EXEL
EXEL
EXEL
EXEL
EXEL
EXEL
EXEL
EXEL
,
J
5
6
7
8
9
10
Il
'"
"
14
i5
16
17
" 19
20
21
" 2J
Z4
25
"
27
28
29
JO
"
=
32
33
34
35
J6
J7
JO
JO
4D
U
4Z
4J
..
..
46
47
48
49
"
51
,
J
8
6
7
8
9
10
Il
"
Technique de programmation 457
COHMaN/RGDT Il EL, ITPE, ITPEI , IGRE. IOLE, ICE, l PRUt. IPRr.r., INEL. IDEG, l PGEXEL 13
l,ICDDE,IOLEO,INELO,IPGO EX&L 14
COHHON/RESO/NEO EXEL 15
COMMON/ES/M,NR,HP,Hl,HZ EXEL 16
DIMENSION VCORG(I),KOLNC(I),VPRNG(I),VPREG(l),KLOCE(I),VCORE(I), EXEL 17
l KNE(I),VPRNE(I),VPREE(I),KNEO(I),KLD(I) EXEt. 18
DAU 110/10/,116/16/ EXEL 19
C - .......................................................... -EXEL 20
c- ..... INITIALISATION EXEL 21
NDt.E .. O
1&I..T .. O
ure_o
REWINO "12
If(H.GT.O) YRITE(HP,ZOOO)
2000 fORMAT(/I' CARTES 0 ELEMENTS'll
C LIRE UNE CARTE D'ELEHENT
10 READ( Hl, l 000) lEI.. IGEH, l NCR, lTrE. IGPE, JORE, (KNE( IN) , Bio. 1 , Il 0)
1000 PORHAT(1615)
IF(H.GT.O) VRITE(HP,2010) JEL,IGEN,INCR,ITPE,IGPE,IGRE,
l (KNE(IN),IN_l,I10)
2010 >' ,1(15)
IP(IEL) 80,80,20
C NOHBRE DE NOEUDS ET LECTURE DE CARTES ADDITIONNELLES
zo
30
1 NEL_O
Il_l
12_110
DO 40 INBIl, 12
IP(KNE(IN).EO.O) CO TO 50
INEL_INEL+1
CONTINUE
12_11+115
READ(Hl,1000) (KNE(IN),IN_ll,12)
IP(H.GT.O) VRITE(HP,2010) (KNE(IN),IN_Il,12)
GO TO 30
C VERIPICATIONS
50 IP(INEL.CT.NNEL) CALL ERREUR(81,INEL,NNEL,I)
IF(INCR.EO.O) INCR_t
IP(ITPE.EO.O) ITPE_HTPE
IP(IGPE.G1.HGPE) C"LL ERREUR(63,IGPE,HGPE,1)
IF(IGPE.EO.O) IGPE_.
IP(IGRE.GT.NGRE) CALL ERREUR(64,IGRE,NGRE,1)
C "GENERATION DES ELEHENTS
lP(IGEN.EO.O) IGEN_l
DO 10 IE;_l, IGEN
IF(IEL.GT.NELT) CALL ERREUR(66,lEL,NELT,I)
C EXTRACTION DE nOCE ET HISE A JOUR DE KLD
C"LL LOGELD(KDLNC,KNE,KNEO,KLOCE,KLD)
C .... . EXTRACTION DES COORDONNEES ET PROPRIETES DE L'ELEMENT
GALL
C. VERIPICATION DES NOHBRES DE NOEUDS ET DE D.L. DE L'ELEHENT
IPGO_O
ICOOE .. 1
CALL ELEHL6(VCORE,VPRNE,VPREE,VDLE,VKE,VPE)
IF(INEL.EO.INELO.ANO.IDLE.EO.IDLED) CO TO 55
VRITE(HP,2020) IEL,INEL,INELO,IDLE,IDLEO
2020 FORHAT(' ELEHENT',I5,' INCOHERENT'16X,'INEL_',!4,' INELO_',181
1 6X, 'IOLE.' ,18,' IDLEO_' ,18)
C HETfRE A JOUR LE NOHBRE TOTAL DE POINTS 0 INTEGRATION
66 NPC_NPGtIPGO
C ECRITURE DU fICHIER DES ELEHENfS
CALL WRELEH(H2,XLOCE,VCORE,VPRNE,VPREE,XNE)
IEL1_IELT+l
C IHPRESSION DE L'ELEHENT
Figure 6.18. (Suite).
EXEL 22
EXEL 23
EXEL 24
EXEL 26
EXEL 26
EXEL 21
EXEL 28
EXEL 29
EXEL 30
EXEL 31
EXEL 32
EXEL 33
EXEL 34
EXEL 35
EXEL 36
EXEL 37
EXEL 38
EXEL 39
EXEL 40
EXEL 41
EXEL U
EXEL .f3
EXEL H
EXEL 46
EXEL 46
EXEL .f1
EXEL 48
BXEL 49
EXEL 50
EXEL 61
EXEL 52
EXEL 83
EXEL 54
EXEL 85
EX EL 86
EXEL 51
CXCL 58
EXEL 59
CXEL 60
EXEL 61
tlCEL
EXEL
EXEL
EXEL
EXEL
EXEL
EXEL
EXEL
EXEL
EXEL
EXEL
"
" 54
" 66
61
"
" 70
71
72
EXEL 13
EX EL 14
EXEL 16
EXEL 16
458
Mthode des lments finis
CALL PRELEH(KLOCE,VCOR&,VPRNE,VPREE,KNE)
C-...... PROCIIAIN ELf.:HEHT A GENERER OU LIRE
DO 60 IN.l,
60 KNE(IN).KNE(IN)+INCR
1F'(IDLE.Cf.NDLE) NDLE.IDLE
70 U:L._IEL+l
co TO la
C .. __ VERIFICATION DU NONBRE TOTAL 0 ELEMENTS
80 rF'(IELT.HE.HELT) CUL ERREUR(61,IELT,HELT,l)
c IHPRESSION DES HAUTEURS DE BANDE
INA_O
IHO .. O
Il .. NEO+ 1
DO 90 1 .. 2,11
J .. KLD(I)
rreJ.GT.INA)IH"-}
90 IHO- INO+J
C .. INO
C .. C/NEO
VRITE(HP,Z030) C,IHA
Z030 F'ORHflT(/15X, 'HAUTEUR DE BANDE NOYENNE .. ' ,1"8.1,' HAXIHUM .. , 18)
IP(H.GE.3) VRITE(HP,Z040) (KLD(I), 1_1 ,Il)
3040 f'ORHAT<lj' TABLE DES HAUTEURS DE
C _..... TRANSFORMER KLD EH POINTEURS VERS L.ES HAUTS DE COLONNES
IF(NSYH.EO.O)
I(NSYH.EO.l)
00 100 ID_a, Il
100
NKC.KLD( Il) 1
l(H .GE. 2) VRITE(HP, BO.60) (KLD( ID), ID .. 1 ,Il)
2060 ORHAT(//' TABLE DES POINTEURS DE HAUTS DE COLOHNES
c
c
1 (lOX,BOI6
RETURN
END
SUBROUTIHE
CONSTRUCTION DE LA DE (LOCE)
ET HISE A JOUR DES HAUTEURS DE POUR UN ELEHENT DONNE
EX EL
P.XP.I.
EXEL
EXEL'
EXEL
EXEL
EXEL
EXEL
EXEL
EXEL
LOCL
LOCI.
77
78
79
80
81
82
83
..
SB
"
"
"
89
90
81
"
93
94
"
"
" 98
..
100
101
10'
103
10.
105
105
107
105
100
110
III
3
COHHON/COOR/HOIH,NNT LOCI. 6
COHHON/RCOT/HUL(4),IDLE,NUI.I(3),INEL LOCI. 7
DIHENSION KOI.NC(l),KNE(I),KNEO(l),KLOCE(l),KLO(I) LOCI. B
DATA NOLHAX/32000/ LOCI. 9
C ......... ..................... 1.0CI. 10
C....... EXTRAIRE KLOCE DE KNEO LOCI. Il
IDI.E .. O
1.0CHIH.NOLHAX
DO 20 IN.l,INEL
INN .. KNE(IN)
IP(INN.CT.HNT) CALI. ERREUR(86,INN,NNT,1)
IEO.KDl.tlC( INN)
IEOl.KDLNC(INN+l)
10 IP(lEO.GE. IEOI) GO TO ao
IDLE .. IDLE+1
J .. KNEO( IEO)
KI.OCE( IDI.E).J
IP(J.LT.1.0CHIN.AND.J.GT.0) 1.0CHIN .. J
CO TO 10
20 CONTINUE
C ....... HET1RE A JOUR LA TABLE DES HAUTEURS DE COLONNES (K1.0)
00 30 10 .. 1, IOLE
Figure 6.18. (Suite).
LOCI. 12
(,OCI. 13
LOCI. 14
LOC(, 1 B
LOCI. 16
LOCI. 17
1.0CL 18
LOCI. 19
LOCI. 20
LOCI. 21
1.0CL 112
LOCI. 23
LOCI. a4
LOCI. 28
LOCI. 26
LOCI. 21
LOCI. 28
c
c
c
Technique de programmation
J _ICLOCE{ID)
F(J . LE . D) GO TO JO
IN"J LOCIHM
If(III . GT. kLO(J.lKI.O(J.I).IK
JO CONTINUE
RtTURN
END
SUUROUTtN!: XTREI.H(ICPE,YCORG,YfRNC,VPREG,kHE,VCORC,YPRNE,VPREE)
EXTRACTION DES COORDONNEES ET PROPRIETes ELEMENTAIRES D'UH
la. EHENT, A PARTIR Dts TA8t.ES CLOUI.ES
(lOPE : NUKERO OU CROUPE DE PROPRIETE
L.oe\,
LOCI.
LOCl.
LOCI.
LOCI.
LOCI.
LOCI.
XTRt
XTRE
URt
URE
459
" 30
li
32
"
,.
36
3
c __ _________ ________ __ _______ ___ __ __ XTRE 1
IHPLI CIT RI:AL-8 ( AK,O-l) XUE 1
CONNON/COOI/NDIH XlRE 8
CONNQN/PRNO/KPIII xTRE 9
COKHOH/PREl./NCPE, KPRE XTRE 10
COHHQN/RCDT/HUL(5),ICC,IPRNE,IPREE,INEL lUE Il
DIMENSI ON VCORC(I) , VPRNC(I),VPREC(I) , XNE(l),Vcoru:(I) , XTRf: 13
1 YI'RNI!(l) , '1PRI!I:(I) lUE 13
c ...... ... ...... .. ..... . . .. ............ . ..... ....... . .............. ... . lTRI! 14
c I:XTRACTfON DtS COORDONN!;ES Dt L.'I:I.I:HENT xnc 18
IPRtlt .. O
ICE.O
DO 30 IH .. l, INCL
l e_ (X NC( IN)I ) -HDIH
DO 10 1_1, NDIH
IC.JC_I
10
XTRE 16
xnI: 17
XTU 18
C .. I:XTRACTIOH DES PROPRIETES NODALES DE L.'CL.ENENT
IP( NI'RN.CO.O) GO TO 30
XTRC 19
XTRC 30
XTRE al
XTRC 22
xnc 13
URE :u
XTRC 25
XUE 26
XUE 37
lUE 2B
XTRE 29
XlRE 30
XTU:: 31
xnE lZ
XTRE 33
XTRE 34
XUE 3B
XTRf: 36
XUE 31
IC_(kNC(IN)I)-NPRN
DO 20 I .. I,NPRN
IPRNf: .. IPRNC+1
tC_tC_l
20 VPRHt(IPRNE}.YPRNG( JC)
30 CoNTI l'lUC
C . EXTRo\CTIOH DES PROPRIETes ELE"ENTAIRCS oc ,,'C"CMCNT
IPREEO
IP(NPRE.CO.O) GO TO 50
IC. ( tGPC1 ) -NPRE
00 40 1_I,NPRC
IPRCC .. IPRCC_I
IC.JC_l
XTRE 38
40 VPREE(I PREE).VPRI:G(JC)
80 RCTURH
ENO
XTU: 38
XTRE 40
XTRE 41
suaROUTINC PRE"CH(X"OCE,VCORC,ypRNE,YPRE&,KNE) PRt ..
c IMPRESSION DES DONNEES DePINISSANT UH C"EHENT l'REt.
IMp"ICIT REAL-B(l N,O Z) PREI.
CONNON/ PRNO/RPRN l'REl.
CONNON/PRC .. /NGPC , NPR& PRI:L
CONHOH/IGDT 1 1 EL, J TPE, 1 TPC l , J GRC, J OL.E, ICC, 1 PINE, 1 PREE, J NEL P REL.
CONNoN/CS/M,NR,NP l'REL
DIMENSION kLOCC(l}, VCORE(l), VpRNE(I), VrREC(l) ,lCNE( 1) rREL
C ; .. PRE ..
If(M. GE , O) YRITE(NP,3000) IEL,ITPE,tNEt. , IDt.E,IPRNE,IPREE,JGRE PREL.
f OR MAT( IOX ,'El.ENENT :' ,III,' TYPE :', 13,' P.N.:',II1 ,' 0.[, .:' , l'REl.
13 , ' PROp 1'1 .:' ,1 3 , ' PRor El. .: ',13 , ' 010UPE:' , 13) PRE"
Figure 6.18. (Suite).
,
3
7
,
10
11
1Z
13
,.
460 Mthode des lments finis
IrC II .Ct . t) YRlTl:(MP ,2010) (IC"I:(I) , I_I , INI:I.)
a010 rORHAT(lU, ' COHHECTIVlTt (HE) ' ,201S/(32X,20 IS
lr(H. !.T . I) co TO 10
PRtl.
PRCL
PREt.
VR lT&(MP. 20tO) (UOeE( 1).1_1 .IOl.E) l'fiEL
2020 fORMATe 1 $X LOCAL 1 51TH (LOCE). 20 IS 1 (3 2X. 2(18
VItITC(MP ,2030) (VCORElll,l_t,let)
l'REL
PRCt.
2030 rORMAT( 1 SI{ . 'COORDONHECS( CORE )' SCI a. s/pu, 8 1: 12.8
Ir(HPRN ,CT.O) YRITE(MP ,Z0 40) (VPRNC(I) . I_l,IPRNC)
2040 rORHA.T(l8X, PROP . NO O. (PRNE)' .8Cl2 .8/(3aK, 8 CI3 .8
JF'(IPRCC . CT.D) VRITC(HP.2080 ) (VPREC(I),I_l,IPRtE:)
l'REl.
l'REl.
PRIa.
l'REl.
2080 rORHAT(lU, 'PIIOP , F.1.r:H _( PRr:r:), .8F.13.B/(3ZX,8E12 . 1I l'II!:!.
10 RtTURN l'REt.
<ND PRia.
SUBIIOUTJNt: YRELEH(HE,XLOCE,VCORE,VPRNE,VPREE,KNE) YREt.
c
ECRITURE DES DONNEES ELEHENTAIRES SUR LE fiCHIER HE VREL
IHPLI CI T VREL
COHHON/ReDT Il EL, ITPE, ITPEI , IORE, IOLE, ICE, 1 PRNE, IPRr;t, INEL VREL
OtHENSIOH KLOCE(I),VCORE(I),VPRNE(I),VPREE(I),KNE(I) VREL
C, VREL
IPRNEI_IPRNE VREL
Ir(lPRNEJ. EO . O) IPRNEl_\ VREL
tPIl.EtI-IPIl.EE VREL
If ( IPREEI . EO.O) IrREEI_I VIIEL
VRITE(HC) IEL , lTPE , ICRE,IOLE.ICE . IPRNEI , IPUE1 .INCL , VREL
) (kLOCC(1) , I_I , IDLC),(VCORE(I) , I_), I CE). VREL
l (VPRHE(I),I.l,IPRNEl),(VPREE(I) , ' .. I ,'PRCEI). VIIEL
3 (l(NE( 1) . 1oo1.IN&L) VREL
RCTURN VIIEt..
CHD VREL
SU8ROUTtNC RDEt..EH(HE,KLOCE,VCORE,VPRNC,VPREE,KNE) ROCL
C ______________ ___________________ _. ___ ._ _ _. ____ ................. _ROEL
c
LECTURe Des DONNEES ELEMENTAIRES SUR LE FICHIER HE ROEL c ________ _____________________________________________ .............. ___ ROEL
IHPLf CJT REAL.8(AN,OZ) ROEL
COMHON 1 ReDT Il EL. ITPE, ITrEl , 1 CRE, IOLE, 1 CE, 1 r RME, 1 PREE, J NEL R DEL
DIHCNSION kLOCE(l), VCORE( 1 ) ,VPRNE(l) ,VPREE( 1 ), KNE( 1 ) ROEt.
C - _ _ _ _ -_ - ROEL
lEI., ITPE, ICRE, IOLE, ICE, tPRNE, IPR&C, INEI.., ROEL
1 (Kl.OCE(I),I_I,IOLE),(VCORE(I),I.I,ICE), RDEL
a (VPRNE(I),I_I,IPRNE:),(VPREE:(I),r.l,IPRE:E). RDEI.
3 (KNE(I), 1.1, INEL) RDEt..
RETURN ROEt..
CND ROEL
Figure 6.18. (Suite).
6.5.2.9 Bloc 'SOLe'
Fonction
,S
16
"
'8
"
,.
al
"
"
..
"
" 27
2
3
,
8
7
8
10
Il
" 13
" '8
16
17
'8
,
2
3
,
,
7
,
,
10
Il
12
13
"
Ce bloc lit et accumule dans la table VFG les sollicitations concentr'es.
Organigramme
r
-----,
. ,
1 Programme
1 principal 1
L.. ____ .J
EXSOLC
-
Technique de programmation 461
Sous-programmes
BLSOLC : cre la table VFG (fig. 6.19).
ESPACE: (fig. 6.5).
EXSOLC : lit. pour chaque groupe de sollicitations concentres, le numro
du groupe, les valeurs des soll icitations pour Chaque degr
de libert et la liste des numros des nuds ainsi sollicits.
Puis EXSOl ajoute VFG les sollicitations correspondant
chaque degr de libert de chaque nud sollicit (fig. 6 . 19) .
ERREUR: (fig. 6.10) .
c
c
SUDROUTINE BLSOLC
APPEL DU BLOC 'SOLC'
LECTURE OES SOLL ICITATIONS CONCENTREES
IILSC
BLSC 3
BLSC 4
c ___ __________ _._. _______ 8L5C
1
BL5C
REAL-4 TBL BLSC
COHHON/RESO/NEO BLSC
COHMOti/ES/H , HR, HP, Hl BLSC
COHHOti/LOC/LCORC, LDLNC,LNCO,LXX(IB),LrC BLSC
COHMON VA( 1) BLSC
DATA. TBL/4I1fC 1 BLSC
C ........ .. .BLSC
10
Il
1.
13
14
1.
IrOU.EO .O) HI _HR BLSC
VRITE(HP,ZOOO) H BLSC
2000 rORHAT(//, LECTURE DCS SOLLICITATIONS CONCENTREES (H. .12 . ') ' l ' '.8LSC
" 11
c
1 39('. ' 8LSC
If(LfC. CO . I) CALL E5PACC(NEO.I . T8L . LrC) BLSC
CALL EXSOLC(YA(LfC),VA(LDLNC).VA(LNEO BLSC
RETURN DLSC
END ElLSC
SUDROUTINE EXSOLC ( VPC,KDLNC.KNEO) EXSC
1.
1
zo
21
EXECUTION DU ElLOC 'SOLC' EXSC 3
C LECTURE DES SOLLICITATIONS CONCENTREES EXSC
EXSC
C __________ ___ ______ __ _
I"PLICIT REAL-& (A.H . OZ) EXSC &
COHHON/COOR/NOIH.NNT,NOLN EXSC 1
EXSC a
COHHON/&S/H,HR,NP.HI EXSC 9
COHHON/TRVL/kY(18),V(14) EXSC 10
DIMENSION VfG(I),KDLNC(I),KNEQ(I) EX SC Il
DATA LI8/181 EXSC 12
C .. . .. .. .... . ............ ...... EXSC 13
C LECTURE DES DONNEES EXSC 14
If(H.CE.0)VRJTE ( HP,2000)
2000 fORHAT(/I' CARTES DE SOLLICITATIONS NODALES 'II)
IO .. HINO(l .NDLN)
10 IEAD(HI.1000) I G.(V( ILI.I.IO)
1000 fORHAT(IB . lfIO . O)
Ir(NDLH. GT . l) READ(HI.1006} (V(I),I .. a , NOLH)
1006 PORHAT(6X,lfIO . O)
Ir(N .GE.O) YRIfE(HP .2010)IC, (V( I ), I_l .HDLH)
Figure 6.19. Bloc SOLC.
EXSC 1 S
EXSC 16
EX SC 17
EXSC 18
EXSC 18
EXSC 20
&XSC 21
EXSC 22
462 Mthode des lments finis
3010 fORMAT(' Hn>',15,7CU.S/(' >H' ,SX, lE:12 .S
IF(le , Lt .D) c o TD 60
20 IttAO(Hl , I OIO)(ICY(I) ,I.oI ,l. I6)
1010 rORMAT CI'IS)
If(M . CE . 0 l VRJTI.:(KP . 3020 HICY (1).1 .. 1 .1.16)
3020 FORMAT(' .. ..... ,1615)
c- EXPLORATION DES NOEUDS
DO 60 IN_I ,1.16
IhlCV(lN)
If(II .CT . NNT) ERREUR(61,Il,HNT,I)
If ( I1)IO,IO,30
30 IDI-XDl.NC(11).1
IOa_XDl.NC(lhll
J_'
DO 80 JO.IOI,ID2
J-J+l
ItO-I(NCO(10)
Ir (Ir.O)80,60,40
40
60 CONTINUe
CO TO BD
C IMPReSSION
60 1 f{M . CE. I) VRJTE(HP. 2030Y(vrC( 1) .1_1 ,MEO)
2030 fORMATe/l' VECTEUR SOl.l.ICITATION TOTAL'/(lOX.IOEI3 . 8
RtTURH
END
Figure 6 .1 9. (Suite) .
6.5.3 BLOCS FONCTIONNELS
cne
"
CICSC ..
eue ..
EICSC
" &Ise 27
EXSC
" cxse
" use 30
EXSC
"
EXSC
"
EXSC 33
EXSC 34
EXSC
" EXSC
".
ex sc 37
EXSC 38
EXSC 39
EXSC
.,
EXSC
"
EXSC 4Z
exsc
.,
EXSC H
cxsc 4B
EXSC 48
EXSC
" EKse 4B
Les blocs fonctionnels d'excution existants dans la prsente version
de MEF sont les suivants:
Nom Fonction
SOLR Assemblage des sollicitations rparties
LlNM Rsolution d'un probh\ me linaire avec .matrice globale
en mmoire centrale
LINO Rsolution d'un problme linaire avec matrice globale
sur disque
NLiN
Rsolution d'un problme non linaire stationnaire
TEMP Rsolution d'un problme non stati onnaire linaire
ou ,
non linaire
VALP Calcul des valeurs propres et vecteurs propres
Technique de programmation 463
6.5.3.1 Organisation des blocs d'excution
Les diffrents blocs d'excution prsentent des structures similaires
puisqu'ils doivent tous
- construire des matrices et vecteurs lmentaires
- construire des matrices et vecteurs globaux par assemblage des
matrices et vecteurs lmentaires
triangulariser et rsoudre des systmes d'quations linaires
- imprimer des rsultats.
Seule la manire dont sont enchaines ces oprations diffre d'un bloc
l'autre. La structure gnrale suivante est commune tous ces blocs:
r-----
1 Programme
: principal
,
1
1
L- _____ .J
1 ESPACE 1
BLnnnn EXnnnn
Sous- programmes
communs
Choix de la d'assemblage,
mthode de rsolution
rsolution et impression
--l METH 1
METH 2
- -----
Le sous-programme BLnnnn fait la rservation d'espace pour toutes
les tables ncessaires.
Le sous-programme EXnnnn boucle sur les pas de charge ou pas de
temps ainsi que sur les itrations d'quilibre l'intrieur de chaque pas.
De plus il vrifie la convergence des processus itratifs et selon la mthode
de rsolution choisie, appelle M ETH 1, M ETH2, etc. Par exemple pour un
problme linaire M ETH1 consisterait simplement assembler la matrice
globale, rsoudre et imprimer les rsultats. Pur un problme non sta-
tionnaire, METH2 peut par exemple excuter l'algorithme d'Euler implicite.
Les sous-programmes METH1, METH2, etc. contiennent seulement
les oprations qui diffrent d'une mthode de rsolution l'autre, les
oprations communes tant effectues par d'autres sous-programmes :
voir figure 6.20.
464
Mthode des lments finis
HADELEM
H DLELM
Sousprogrammes qui boudent sur
les lments pour construire:
: ASKG,ASKGC
--l ELEMLB -
la matrice IX J
-
le vecteur { F } : ASFG
-
la matrice [K,] : ASKT
Choix
r-
-
le rsidu { R } : ASRESD
du type
d'lment
-
la matrice (M] : ASMG
-
d'autres' matrices ou plusieurs
matrices et vecteurs combins:
AS ...
(par exemple ASEULR,
ASNEWT) .
-
1., gradients ou contraintes:
ASGRAD
-l MODFG
METH
lf-
ASSELD
-IMETH 2J-
ASSEL
r---l--
L ___ .J
Sous-programmes de rsolution:
-
-
triangularisation : SOL, SOLO
rsolution partir d'une matrice
'.
-
triangularise: SOl, SOLO
Sous programmes d'impression des
:
'-
- pivots de [K J : PAPVTS
- rsidus d'quilibre: PAAESO
- solution: PASOl
lecture des tables
lmentaires sur 1 e
IS
fichier des lmen
Extraction des de grs
ment de libert d'un l
-l ELEMOl 1
ELEM02 1
-r-----,
L _____ J
Calcul des rnatri
et vecteurs lmeh
c.s
taires
CODE) (selon la valeur de 1
Modification de F G, due l
r compte
le limites
lment. pour teni
des conditions au
non nulles
Assemblage d'une
ou d'un vecteur l
matrice
mentain
Figure 6 , 20, Sous-programmes communs aux divers blocs d'excution,
6,5,3,2 Bloc 'SOLR'
Fonction
Ce bloc assembl e les vecteurs lmemaires correspondant des sollici-
tations de volume.
Technique de programmation
465
Organigramme
r-----..,
1 Programme 1
ASFG
ELEMLB
ASSEL
BLSOLR : cre la table VFG si elle n'existe pas dj (fig. 6.21).
ESPACE: (fig. 6.5).
EXSOLR
ASFG
RDELEM
ELEMLB
ASSEL
: ajoute au vecteur FG les sollicitations de volume (fig. 6.21).
: assemble les sollicitations de volume (fig. 6 . 21).
(fig. 6.18).
(fig. 6.22).
(fig. 6 .22) .
SU8RoutiNe 8LSOLR 8LSR
C-----------------------------------------------.-----__________________ 8LSR a
CArreL DU BLOC ' SOLR' 8LSR 3
C ASSEH8 LACE DES SOLLICITATIONS REPARTIES (fONCT I ON ELEHENTAIRE 1) BLSR 4 C ______ ________ __ _____________ __ ____ __ _______ __ _____ __ ._BLSR 8
IHPLI CIT REH-B(AN,OZ) BLSR fl
RtAL-4 TBL BLSR 7
COHHONfCOOR/ NDIH,NNT,NDLN,NDLT BLSR B
COHHON/CLEH/NUL(4) ,HE BLSR 9
COHHON/ASSE/NSYH,NKC,NKE,NDLE BLSR la
COHHON/RESO/ NEO,NRES,HRES BLSR 11
C0I'4HON /CS /H,HR,HI',Hl,N2 BLSR 12
COHHON/LOC/LCORC,LDLNC,LNEa,LDINP,LPRNC,LPREC,LLO,LLOCE,LCORE,LNE,BLSR 13
1 LI'RNE,LPREE,LDLE,LKE,LPE,LKCS,LKGD,LKCl,LPC,LRCS,LDLG BLSR 14
CONNON YA(l) 8LSR 16
DINENSION T8L(8) 8LSR 16
DATA T8L/4HfG ,4HKt ,4HPE ,"HDLE ,4HKCS ,4HKCa , 4HKCI , BLSR 17
1 4HRES / BLSR lB
c .. .... _ ... . . . .. ............. ...... BLSR 10
Jr(HI .EO.O ) Hl-HR BLSR 20
IrOI2 . EO . O) HiI_HE BLSR 21
VRllE(KP , aOOO) H BLSR 22
2000 FORMAT(/ / ' ASSEMBLAGE DES REPARTIES (1'4_',12, ' )'/ BLSR 23
1 1lI,40('.')/) BL8R 24
Ir(LFO. EO . l) CHI. ESPAGE(HEO,I,TlIL(I),LrC) BLSR as
Ir(LKE. tO. I) CALI. BLSR 2a
If(l.rE. EO.I) CALI. tSPACE{NOLE , l,TBL(3),LPt) BLSR a7
JP(LDLt.EO . I) CALI. ESPACE(NOLE . I , TBL(4) , LDLE) 8LSR aB
IP (LKGS.EO. l) CALI. ESPA.CE(NKG,I,l8L(8) , LKCS ) BLSR U
IP(LKCO.EO.l ) CALI. ESPACE(NCO,I,TBL(8 ), LKCO) &LSR 30
IP (NSYK.EO . I . AND . LKGI.BO,I) CALI. ESPAGE( Nk G,1,T8L.(7),LXCI) &LSR 31
IP (LRES.&O. I ) CALI. ESPACt(NDLT,I,T9L(B),LRCS) 8LSR 3a
CALI. EXSOLR(YA(LLD).YA(LDIHP),YA(LLOGE),YA(LCOR&).YACLPRNE), BLSR 33
VA( LPREE) ,VA(LNE) ,Y A(LKE) ,VA( LPE) . VAt LKGS) . VA e LKGD).. BLSR 34
Figure 6.21, Bloc SOLR.
466
2
,
Mthode des lments finis
VA(LKCl
VA(LRES),VA(LDl..E
8LSR 35
8l..SR 36
RElU RH 8l..SR 37
END OLSR 36
SUBROUTIKE EXS OLR( KLD,VDIHP,KLOCE,VCORE,vPRNE,VPREE,XNE,VkE,VfE, eXSR
HCS. YKeD. VXC l, YFC. VCORe, KDI,NC, XHEO. VRES, VDl.E) EXSR 2
c----------------........ ------.... -----................. _ .......... __ .. EX5R 3
c
c
EXECUTION DU BLOC 'SOLR' ElISR
ASSEMBLAGE DES SOLLICITATIONS REPARTIES (rONCT10N ELEMENTAIRe 1) crSR
c----------_._._.----... --.. _.----------...... _--.-.. -______ .. _ ........ _CX5R 6
INPLICIT REAL-S(A H,OZ ) ElSR 1
CONNONI ASSE/MSr" , "KC, NICE. NDLe eXSR 8
CONHON/RESO/HEO. NRCS CUR 9
E)(SR 10
DIHENSION tXSR II
1 KNE(l),VKE(I),YfE(I),YKCS(I) ,VKOD(I),VKCI(I),VFC(ll,VCORC(I), tXSR 12
2 KDLNC(l),KHEO(l).VRES(l),VDLE(l) tXSR 13
c .EXSR 14
C ASSEMD LER rc EXSR 15
CALL ASfC(KLO, VD IHP, ICLOCE, VCORE, VPRNE . VI'lItt, KHE, VICE, VPE, VICCS, CICSR 16
1 VJWD ,'oIKOI.HO.VOLt , vRES) tXSR 11
C, IMPRESSION tXSR 18
Ir(K. CE . I) VRITE(KI' .:>' OOO} (VfC(I},I .. I,NEO) EICSR )Il
2000 rORHAT(/' VECTEUR SOLLICITATIONS LODAL (Fal'/(IIC,IOEla.II CICSR aD
c
RETUR" EKSIt U
'HO
&IC5R 22
SUBROUT IHE ASrC( ICLO. VOIHI' ,nOCE, VCORE, VPIINE, VPIIEE, ICHE, VICE, HE, ASfe
VICes, HeD, VICCI vre, VOLE, VRES) ASPC
ASSEHBLAGE DE ra DUE AUX SOLLICITATIONS REPARTIES (rONCTION 1) ASFe
2
,
IHPLleIT REAL-8(AH ,O Z) ASfe 6
COHNON/ELEK/NELT,NNEL,NTPE.HeRE,NE,HIOENT Aspe 7
eOKNON/ASSE/ HSf" Aspe ft
eOHHOH/RESO/HEO Aspa t
eOMNON/IIGOT Il EL. Ill'E, ITPEI , 1 CR E, IOLE , let , 1 PltHE, 1 P Rtt, 1 NEL, IDEe, II"OASPC: 10
l,IeOD Asra II
CONHON/&S/H,HR,HP,MI.H2 Aspa 12
DIHENSIOW KLO(I),VDJHP(l),ICLOCE(l),VeORE(I),VPRHE(l),VPREE(ll, ASFe 13
1 KHE(I),VKE(I),VfE(I),VlCeS{I),VKeD(l),VICOI(I),Vfe(I),VDLE(I), Aspe 14
2 VRES(I) . ASre 15
C. ............................ ....... ASPa 16
c POSITIONNER AU DEBUT LE fiCHIER DES ELEMENTS (Na) ASpe 11
REVIND Ha ASPC 18
C DOUCLE SUR LES ELEMENTS Aspe 19
DO 20 IE_I,NELT ASPC 20
C LIRE UN ELEHENT SUR LE PleNIER ,ta Asrc zt
CALL RO&L&H<NZ.kLOC&,VCOR&.VPRHE.VPkEE,KN&)
C CAl.CUL DES PONCTIONS D'INTERPOLATION SI NECESSAIRE
If(ITPE.EQ . ITPEI ) CO TO 10
ICOO .. 2
CALL El.EKLB(VCORE,VPRNE,VPREE,VDLE,VICE,VPE)
C CALCUL DU VECTEUR ELENENTAIRE
10 ICOO .. 7
CALL ELEKLD(VCORE,VPRNE,VPREE,VOLE.VKE.VPE)
C INPRESSION DU VECTEUR ELEHENTAIRE VPE
IP(H.eE.3) 'llRITE(MP,2000) IEL,(VfE(I),1_1,IOLE)
2000 rORtlAT,,' VECTtUR (rE) , ELEHENT:',I6/(10X,10EI2.8
c ASSEK8L"CE
C"t.L ASSEL(O,I,IOLE,MS1K,kLOCE,KLO, VKE,vPE,VleS,VkCO,VKCl,VPC)
20 ITPEI.ITPE
RETUR"
END
Figure 6.21. (Suite).
,urG ZlI
ASPC 23
ASFC 24
"SFe 25
"ue a6
Aspa 27
ASPG 28
ASpe 29
ASFC 30
ASPe 31
Asre 32
ASpe 33
Aspe 34
ASFe 38
Asrc .16
ASPC 37
Technique de programmation 467
6,5,3,3 Bloc 'LlNM'
Nous prsentons ici un bloc fonctionnel d' excution, adapt, aux pro-
blmes linaires,
La structure gnrale dcrite au paragraphe 6,5,3,' se simplifie puisque
nous n'avons besoin que d'une seule mthode de rsolution consistant
en un assemblage de la matrice globale et une rsolution de systme
linaire.
Fonction
Ce bloc assemble la matrice globale, rsout le systme d'quations
linaires, pui s imprime les rsultats, dans le cas d' un problme linaire
dont la matrice globale rside en mmoire centrale.
Organigramme
1 ESPACE J
1
1 BLLlNM EXLlNMJ-
r-L---l
1 Programme 1
1 principel 1
L ____ ....J
r--------------- -----,
1
1
1
1
1
1
1
1
1
1
1
AS KG
ASRESD
ASGAAO
ri RDELEM 1
H DLELM 1
r-l ELEM01 1
ELEMLB ELEM02 1
r---- "'1
H ELEMnn 1
'- ___ ...J
H MOoFG 1
y ASSEL 1
L ___ _ ___ ..J
,----- ------:---,
l ,SOL :
1 SCAL 1
1 1
1 rsolution 1
_____________ ..J
r- -------- -------
1 1
1 PAPVTS 1
i PRRESO H MULKU 1 :
1 PRSOL 1
1 1
1 impression 1
L _________________ .1
468 Mthode des lments finis
Sous-programmes
BLLlNM : lit sur une carte l'indice NRES de calcul du rsidu de rsolu-
tion, puis cre les tables VKGS, VKGI, VFG, VKE, VFE, VRES,
VDLE (fig. 6 . 22).
ESPACE : (fig. 6 . 5) .
EXLlNM : assemble la matrice KG en appelant ASKG, pu is rsout le
ASKG
syst me linaire en appelant SOL. Pui s EXLlNM calcule et
imprime:
les pivots de la matrice globale (PRPVTS)
le rsidu de rsolution si NRES gale 1 (PRRESD)
la solution (PRSOL)
les gradients (ou contraintes) (ASGRAD)
les rsidus d'quilibre et les ractions (ASRESD)
EXLlNM est list sur la figure 6 . 22.
: assemble la matrice globale (fig. 6 . 22).
ASGRAD : calcule les gradients aux points d'intgration numrique
(fig. 6 . 22).
ASRESD
ELEMLB
. ASSEL
MODFG
PRPVTS
PRRESD
PRSOL
DLELM
MULKU
ELEM01
; assemble les rsidus et ractions (fig. 6 . 22) .
: choisit le sous-programme ELEM correspondant un type
d'lment donn (fig. 6.22) .
: assemble un vecteur ou une matrice lmentaire (fig. 6.22) .
; modifie le vecteur FG pour tenir compte des conditions
aux limites non nulles correspondant un lment donn
(fig. 6.22).
; imprime les pivots de la matrice globale (fig. 6.22).
: imprime les rsidus de rsolution IKJ { U} - {F} (fig. 6.22).
; imprime la solution { U} (fig. 6.22) .
: extrait les degrs de libert d'un lment donn (fig. 6.22).
: eff ectue le produit de la matricp. global e par un vecteur
(fig. 6 . 22) .
: sous-programme lmentaire pour les lments quadratiques
une, deux ou trois dimensions, correspondant l'quation
quasi harmonique (fig. 4.4) .
ELEM02 : sous-programme lmentaire pour l'lment quadrilatral
huit nuds correspondant l'lasticit plane (fig. 4. 5).
SOL, SCAL ; rsolvent un systme d'quations linaires (fig. 5.15).
RDELEM ; (fig. 6.18).
Technique de programmation 469
Remarques
Le bloc ' lINM' pourrait tre facil ement clat en plusieurs blocs ind-
pendallt s. par exemple ':
'ASKG'
'RESO'
'RES D'
' GRAD'
assemblage de la matrice globale
rsolution du systme linaire
calcul des rsidus d'quilibre et ractions
calcul des gradients ou contraintes
La structure de 'U NM' est valabl e pour tous les types de problmes linaires
(lasticit, fluides parfails irrolati onnels, quilibre Ihermique, elc.) el
pour tous les Iypes d'l ments (dfini s par leur forme el le degr de leurs
fonctions d'interpol at ion) : il suffit d'ajouter un sous-programme ELEMnn
adapl aux Iypes de probl me el d'lmenl choisis.
c
c
SUBROUTINE BLLIN"
APPEL DU BLOC 'LINM'
ASSEMBLAce CT KCSQLUTION D' UN PKQ8LCHE LI NEAIRE EH NCNO IKE
aLLH
BLLM
BLL"
c _____ __ __ ._ ______ ___ __ __ __ _ _. BLLM
,
3
6
6
7
6
9
10
Il
I" PLICIT REAL-8 ( AII .OZ) BLLM
REAL-4 l'BI. BLLN
COKMON/COOR/NDtN.NNT,NDLN.NDLT BLLK
CONNON/ELEK/ NU L ( 4 ) , ME aLLH
CONN ON/ ASSE/NSYH.NKC, NKE ,NDLE 8LL"
CONNON/RESO/ NEO, NRCS, NRES BLLN
COMNON/ CS / N. MR ,HP, Il l ,HZ. N3 aLLH
COIINON/LOC/LCORG,LDLNC, LNEO , LDIIIP ,I.PRNC, LPREC,LLD , LLOCE, LCORC, LNE,BLI. H
1 LPR NE, LPREE ,LOLE,LkE,LPC,I.KGS,LKCO,I.KGI,LFC,LRES, LOLC aLL"
COHMONVA(I) aLL"
DIMENSION TBL(8) 8LLH
DATA T8L/4I1KGS ,4HkGD ,411"CI ,4NFC , 4NKE ,4I1FE , 4I1RES ,4110l.E / 8LI.H
c 8LLH
I P( NI . CO . O) MI .MR IILLM
tF(N2 . CO . O) Ha -HE DLLH
If(K3 .CO. O) H3_HRES 8 1,.1.."
READ("I,IOOO) IN Dl.LH
" .3
..
6
.7
.6
.6
ao
2.
" 1000 FORJoIAT(l15) BLLN 33
IF ( JN . HE.O) NRES.) BLL" 24
VRITE(HP.llOOO) ",tiRES DLLH 26
2000 PORMAT ( /!' ASSEMBLAGE RESOLUTION LINEAIRE (H_', TZ,')' l' ',30('. ' )/Bt. LH 26
1 lex, ' INDICE DE CHCUL DU RESIDU ( NRES) .',I8) aLl. H Z7
tr(I.KCS . EO. I ) CALL ES PACE(HKC,I.T&L(l), LKCS) aLI.H 28
IP(LXCO . EO . ') CALI,. ESPACE(HEO,I.T&L(2) , LKCO) BI.I." 29
JP(HSYII . EO . l.AND.L"CJ.CO . I) CALL ESPACE(NkG,l , TBL(3), I.KGI) BL!..M 3 0
IF(LFC. EO.I ) CALL ESf'ACE(NEO,l,TDL(4 ), LPC) DLI..H 31
IP (LkE . EO.l) CALL CSPACE(NKE,1.T81.(B), LKE) 8LLH 32
IP( LFE, EO. 1) CALL ESPACE( NOLE ,1 ,TBL ( 8) ,LFE) 8LLH 33
IF eLRES.EO.I) CALI. CSPACE(NDLT,I,TB\..(7),LRES) BLLH 34
IP(LOLC.EO.l) CALI. CSP ACE(NOLE , l ,TSL(B ), LDLE) Bt.t." 35
CALL EILINH(VA(I..LD). VA (LDIHP) , VA(LLOCE) , YA ( LCORE), VA(LPRNE), 81..t.H 36
YA ( 1.PREE),YA(LNE),YA(LKE ) ,YA ( LPE) , YA(LKeS),VA(LKCD), aLLH 37
Figure 6.22, Bloc LlNM.
470
2
3
Mthode des lments finis
VA(LKCI),YA(LFC),VA(LCORC ), VA(LOLNC),VA(t. NCQ ) ,
'l'AC LRCS) ,Y A (t.Dl. C
BLL" 38
BI.I..H 39
RETURN l'I LLII 40
END eLL" U
SUBROUTINC EXLINH(KLD,VOIKP , KLOCE,VCORE , VPKNE ,Y PREE ,KNE ,YXE, VPC , EXLH
YKCS ,VKCO,vKGt , vfC,VCORG,KDLNC,KNCO,VRES,VDLE) &Xl..M 2
EXECUTION DU BLOC 'LI"N'
AS 8EHBI. ACC ET RE SOLUTION D'UN PROBLEME LINEAIRE EN MEHOIRE
EXLH
EX!.."
IKPLICIT IEAL-B(AN,D Z) EXLH 1
COHHON/ "SSE/NSYH. "KG . NkE. NOLE CliLH 8
COHHON/ RES O/ NEO,NRES , HRES ElILH Il
COHHON/ESfH,HR,HP,Hl.H3,H3 EX LH 10
DIMENS I ON KLD(l),YDIHP(1 ) ,KLOCE(1),YCORE(l),VPRNE(I ),VPREE(l), EX !. H Il
1 KNC(l),VK&(I),VPC(l),VKGS(I),YKCD(l),VkGl(l),VrC(I ) ,VCORG(l), CILH 13
2 KDl.NC(l),KNCO(I),VRtS(l),VDLE(l) EXloH 13
C . EXloK 14
RE VJND H3 EXLH 18
c
C ASSEM8LER XC
EX"H 16
EXLH Il
EXl. H 18
c
C. SUR M3 I,E VECTEUR fC HOH HOD IfIE PAR LES C.L. EXLH. 19
WRlTE ( H.') (VPG(I),t-l,NEO) EXLM ao
tP(K .CE. a) IIRITE(MP,a OOO) (VPC(I),I-l.NEO) EXloM al
aooo PORHAT ({' VECTEUR SOL lo JCITATIQMS HON MODIPIE PAR loES C.L. ( EXLM 22
I PG)'{( IX , lOEI2 . 8 EXL.H a3
c. ... ASSEH8t.ER ICG,MODlfIER PG POUR LES C . L. ET LCS S AUVCR EXLH 34
CALI. ASKC(KLO,VOI"',KLOCE,VCORE,VPRNC. VPREE,ICNE , VICE,VF'E,VKGS, EX"H 2S
1 VIC GD,VKGI , VfC ,VDLE .VRES) EXloH a6
\fRITE( "3) ( YrG(I) , t_I , HEO ) EXL.H 31
VRITE(H3) (VKGS(I ),l _l.HKG),(VKGD(I),I .. I,NEO) EXloM 38
n'(H8YM.EO.I) VRITE ( M3 ) (VKGI(I),I_I , HKG) EXL.H a9
C IMPRESSION DE kG ET fC EXloH 30
If(H . loT 2) GO TO aD EXl." 31
II RITE( HP , a OOB ) (VK(:S( I ), 1_1,NKG) EXLH 3a
2008 rORHAT<{ ' HATRI CE GLOBALE (KG)'{' TRIANGLE S UPERIEUR '{ ElCt.H 33
1 (H, IOEU . 8 EXl." 34
VRITE ( HP ,aOlO ) (VICGD( I ) ,I_I , NEO) EXLH. 36
aOlo PORHAT (' DUGONALE 'f( lX,IOElZ . 6 EICL.H 3 8
IF'(NS YH . EO.l) VRITE ( HP,20aO) (VKGI(I) , I .. l,NKG) &XloH 31
2020 PORHAT(' TRIANGLE INPERIEUR'f(lX,10Ela.8) EXLH 38
VItITEe HP ,2030) (vrG( 1 ), 1.1, NEO) EXLH 311
203 0 rORHAT( { ' VECTEUR SOloLIC ITATIOH8 GloOBAL MODIfIE PAR LES C.L. (fG) 'EXLH 40
l j (lX , IOEaa . B)) EXl.H. 41
C Enlt 42
C RESOLUTION EXl." 43
C EXl." 44
20 CAL.lo SOL.( VJiC5, VI(GD, VI(O, ,vn;, KLD, HEQ , 1'11' , l ,1 ,Ni5Y", ENEll a)
IP(HS YM . NE.I) VRITC(MP.a03B) CNCRG
3038 fORMAT ( HIX,'CNCRGIE ( ENERG) .. ',lCli , 8)
IP(M .loT . S) GO TO 30
VRITE(HP , a 0 40) (V K08 ( 1 ) ,I.I , NkG )
2040 PORKAT(f' MATRICE TRIAHGUloARISEE (ICG)' j' SUPERIEUR'{
1 (IX,IOEI2.8
VRITE(MP,a010 ) (VXGD ( I) ,I _l , NEO)
If(NSYH .EO.l) VRITE ( HP, aOaO) ( VKGI ( I ),I_l,NKC)
C PIVOiS DE KG ET DET&RHIN ... HT
30 CALL PRPVTS(VICGD)
C CUCUL ET IMPRESSION DES RESIDUS DE RESOLUTION X, U r
IP (NRES .EO. 1 ) CALI. PRRESD(VICGS,VKGD,VkCI,YfG . KLD , VRES )
c IHYRESS I ON DE loA SOLUTION
Figure 6.22. (Suite).
r:XLH
EXl.M
EXLH
EUH
EU"
EKloH
EXl."
EXl.H.
EXt."
EXLH
EXlo"
EXlo"
EUH
EXLH
..
..
47
..
..
BI
52
B3
54
..
..
B7
..
Technique de programmation
'l'JllT&( HP ,20S0)
Z050 PORHAT(II' SOLUTION' Il >
CALt. " RSOL 1 KOUIC, 'l'CORe, '1'01 KP uu:o , vrc)
c
C CILCUL ET IHPRESSION DES eRAOIENTS ( CONTRAINTES)
c
c
CALL i SCRAO(KLD,VOIHP ,KLOCE.VCORE ,VPRHE.V'RCE ,KHE,VKE , vrE ,vKes,
1
C C1LCUL ET IHPRESSION DES R&SIDUS D'EQUILIBRE
c
C , LIRE Le VeCTeUR rc ET LE CItANeER DE SICHE
REVIND H3
R&AO(M3) (VR&S(I),I.I,H&O)
00401_I,H&0
40 VR&S(i ) .. . VRES(I)
C A$SENBLr.R LES RESIDUS
CALL ASRESD( l, l, KLD, vOINr, nOCE, 'l'CORE, VPRN&, VPRCt, KNC. VKI:, vrE,
1 VKCS,VKCD,VKcI,vrC,vOLE,VRES,VRES(NEO+l)
C lMPR&SSION DES RESIDUS
'l'R ITE(HP, a060)
2060 r ORHAT(/I' RESIDUS 0 EOUILIBRE ET REACTIONS'II)
CALI,. PRSOLIKDLNC,VCORC,VRES(NEO+l),KNEO,VIE8)
RETURII
c
c
'HO
SUBRO. TINE ASKC(KLo,VDIHP , KLOCE , VCORE,VPRIE , VPREE,KNE , VKE.VPE ,
VKCS,YKCO,YKC I , VrC , VOLE , VRES)
A88tH8LAc e DE LA HATRICE CL08ALE XC (rONCTI ON ELEMENTAIRE 3)
AV&C PRISE EK COHPT& O&S D. L. IMPOSES NON NULS
EXLH
ULM
ElILH
ellLH
EUH
en"
eXLH
EXLH
EXLH
EXLH
EXLH
EXLH
eXLH
EXLH
EXLH
EXLH
EXLH
EXLH
EXLH
EXLH
EXLH
EXLH
EUH
EXLH
EXLH
ASIIC
ASIIC
ASKC
ASKC
471
" 60
..
"
63
..
"
"
"
"
"
70
71
"
73
,.
75
76
77
78
"
80
81
" 83
,
,
c . . ...... . --- . ..................................... -----.. - ASKC 6
IHPLI CJT REAL-8(AH . OZ)
COHHOM/COND/NCLT, NCLZ,NCLNZ
ASICC
ASICC
7
eONHOM/ CLEH/ NELT , NNEL,NTPE,NCRE,ME,NIDENT ASKC 9
COHMOM/ASSE/HSYM ASICC ID
e OHHOM/RESO/NEO ASICC Il
COMMOII/RGDT IIEL, ITrE, 1 TPEI , IGRE, IOLE ,ICE, IPRN&, JPREE:, 1 NEL, 1 OEC, IPGASICC 1 a
l ,J eOD ASIIC 13
eONHON/ES/H,HR,HP,HI,Ha ASICC 14
DJMEUS10N KLD(l) ,VDINP(l) ,nOCEII) ,VCORE(I) ,VPRNE:(l) ,VPRCE(I), ASICC 15
1 ICNC(I),VICE(I),VfE(I).VICCS(I),VICGO(I),VKCI{I),VrC(),VDLE(I), ASICG 16
t VR&3(1),1C&8(1) ASICC 11
C ... .. .............. ........... ... ...... . .... ,,ASICO 18
C , POSITIONNER AU DEBUT LE fICHIER D&S (Ht) ASKG 19
R&W INO H3 ASICG 20
G .. BOUCLE SUR LES ELEHENTS
DO 30 Il:.I,NELT
C NE PAS RECALCULER LES ELEHENTS IDENTIOUES
IrOllOCNT . EQ.1.AND. U: .CT.l) co TO aD
C LIRE UN ELEHENT
ADELEH(H3 , ICLOCE , VCORE.VPRNE,VPREE.ICNC)
C C .... CUL DES FONCTIONS D'INTERPOLATION SI NECESSAIRE
IP(ITPE. EO . ITPEI) CO TO 10
I COD 2
CALL tLEML8(VCOkE,VPRNE,VPREE,VOLE , VKE,VfE)
C CALCUL DE LA MATRI CE ELEMENTAIRE
10 ICOo .. 3
CALL ELEHLB(VCORE , VPRNE,VPREE , VOLE,VICE.vrE)
C, " IHPRESSION DE LA HATRICE ELEHENTAIRE
Ir(H . LT , a) co TO 20
JF(HSYH , EO.O) IKE.IDLE-(JDLE+l)/Z
If ( NSYM ,EO.I) HE.IOLEIOLE
WR nt(HP, 2000) lEI... (VICE( 1) , 1.1 ,IKE)
Figure 6.22. (Suite).
ASKC III
ASKC 2a
ASKG 33
A81((; 24
ASICC as
ASICG 26
ASIIC 27
ASIIC 28
ASKC 29
ASKC 30
ASIIC 31
ASICC 3a
ASICC 33
ASICG 34
ASICa 33
ASICC 38
ASKC 37
ASKC 38
472 Mthode des lments finis
aooo l'ORHA1(/' MATRICE (!CC) , EI..EI1I:N1:',18/(10)(, 101:12.9 ASICG 39
C MODIrICATION Oc ra DUE AUX D.l.. IMPOSES NON NUl.S ASICG 40
aD II'{NCLNZ.NC.O) CHL 1100I'G(IDLE,NSYH,KLOCr.,YO IHP,YKE,YI'G) "SICG 41
C ASSEHBLACf. ASKC 43
CALI.. ASSEL( l ,0,1 OI..E. HSHI, KLOCE. Kl.D, VICE, vPt, VlCS. VKGD, VICCI vrc) ASICG 43
30 ITPEI.oITPE " SIeG 44
c
c
RETURN ASKG 46
END ASlee 46
SUBROUTINE ASGRAO(KLD,VOIHP ,KLOCE , YCORE,VPRNE , VPREE,ICNE , VICE , YI'E, ASOR
VKCS , VICCO,VkGJ.YrC,VDLE,VRES) ASeR a
CALCUL ET IMPRESSION DES GRADIENTS (CONTRAINTES) AUX P.C . DES
ELEMENTS (l'ONCT ION ELEMENTAIRE 8)
ASGR
ASGR
8
IMPlolCIT RE.u. e(A H,Q-Z) ASOR 7
COHHONfELEH/HELT,NNEL.HTPE,NCRE,HE,HIDENT ASGR 8
COKHON/Asst/NSYM ASGR Il
eOKMON/RESO/NEO ASCR 10
COMHON/ RCDT J1 El,., 1 Tf'E, 1 HEl, 1 CRE, 1 Dl.E, 1 CE, t f' RIfE , J PREE, 1 NEl., 1 DEC , t PC ASCR 1 1
l ,JCOD ASCR 12
CO""0N/E5/H,IR , I(P,I(I , K:& ASCR 13
DIMENSION XLD(I),VDIKP(I),KLOCE{I),YCORE(I),VPRHE{I),YPREE(I), ASCII 14
1 KNE(I) , YXE(I),VrE(I),YKCS(I),YKCO(I),VKCI(I),VrC(I),VOLE(I) , ASCR 18
2 VRE8(l) A8CR 16
C ............... ............ .............. ....... ........... A80R 11
C POSIiIOHNER AU DEBUT LE PICHIER OES ELEMENTS (H2) ASCR 18
REVINO H2 ASCR 19
C BOUCl.E SUR LES EI.EKENTS ASCR 20
DO 20 lE_1,NELT ASCR 21
C LIRE UN ELEMENT ASG' R 23
CALI. RDELEM(H2,Kl.OC&,VCORE,VPRNE,VPREE,KNE)
C CALCUL DES PONCTIONS D'INTERPOLATION SI NECESSAIRE
tP(ITPE .CO. ITPEl) CO TO 10
ASCR 23
ASGII 24
IIS CR 2S
ASCR i6
ASCR 31
ASCR 38
ASCR as
ASCR 30
ASCII 31
ASCR 33
ASCR 33
ASCR 34
ASCR 35
ICOD_2
CALL ELENL8(VCORE,VPRHE. YPREE.VDLE,VKE,VrC)
C .. .... eXTRAIRE LES D. L. OC L'ELEMENT
10 CALI. DI.ELN (KI. OCC,VPC,YOINP,VDLE)
C CAI.CUL ET INPRESSION DES CONTRAINTES OU GIIADIENTS
1000-8
CALL ELEHL8(VCORC,VPRNE,VPREE,VDl.E,vKE,Vrc)
20 ITPEI_tTPE
RETURN
END
SUSROUTINE II SRESD( IRESD , IREAC,KI.O,VDINP,KLoce,vCORC,vPRNE,'PREC,
KNE , vKE,vrC,'KCS,VKCD,VKCI,VPC,VDLE,'RES,VREAC)
IISRE 1
ASRe a
c
c
A8SEHBLACE DES RESIDUS INTERNES DAMS VRtS (81 III:&SO. &O . I)
ET DES DANS VRtAC (SI
ASRt
ASRE
INPI.ICIT RCAI.S ( AH,OZ) ASltE
COHNON/ELCH/NCI.T,HNEl.,NTPE,NCRC,HE,NIDENT ASRE
CONHON/ASSE/NSYN ASRE
CONNON/RESO/NEO AS RE
COHNON/RGDT /lEI., 1 TfE, ITfEI , 1 CRE, IOLe, ICE, J PR!4E, 1 PREE, 1 HEl., 1 DEC , IPOASR&
l ,JCOP ASRE
CONNON/ES/H, NR, HP , Hl ,Ha ASRE
DIHENSION Kl.D( 1) ,'OIHP(1) ,KLOCE(l ) "CORE(1) ,YPRNE( 1) ,'PREE( 1) , ASRE
1 !CNE(1 ) , VKEO ), VPE(1 ), VKCS( 1), VKCD{1 ) . UCJ (1 ) ,YPC(1) , VOI.C( 1 ) , ASRE
a YRES(I),VREAC(l) ASRE
C ....... ..... ... . .... . . . ................... . .. ' ................... ASRE
c POSI TIONNER AU DEBUT I.E PICHIER DES ELCMENTS (Ha) ASRE
RCVIND H2 AS RE
Figure 6.22. (Suite).
,
8
8
,
8
,
10
11
" 13
H
18
..
"
18
19
Technique de programmation
c- BOUCl.E SUR LES ELEHENTS
DO 60 lE .. l,NELT
C LIRE UN ELENENT
CALL ROELEH(H2,KLOCE,VCORE,VPRNE,VPREE,KNE)
C CALCUL DES PONCTIONS D'INTERPOLATION SI NECESSAIRE
IP(ITPE.EO.ITPEI) CO TO 10
Icon .. z
CALL ELEHLB(VCORE,VPRNE,VPREE,VDLE,VKE,VPE)
C EXTRAIRE LES D.L. DE: L'ELEHENT
10 CALL
(; ... _.. CAl.CUI. DES RP.ACTJOIHl ELEMENTAIRES
lCOD .. 6
CUL EI,EH LB (VCORE, VPRNE. V P REt, VOLE. VU:, HE)
C _.. IMPRESSION DES REACTIONS ELEHENTAIRES
Ir(K.CE.a) VRITE(HP,20DO) IEL,(VFE(I),1 .. 1,IOLE)
2000 rORHAT(f' REACTIONS (PE) ELEHEHT:',I5/(lOX,lOE12.6
IF(IREsn.NE.l) co TO 20
C--- ASSEHBLAGE DES RESIDUS INTERNES
CALL ASSEL(D,I,IDLE,NSYH,KLOCE,KLD,VKE,VPE,VKGS,VKGD,VICGI,VRES)
ao IP(IREAC.NE.l) GO TO 60
C ASSEMBLAGE DES REACTIONS EXTERNES
C MODIPIER LES TERMES DE KLOCE POUR ASSEMBLER SEULEMENT LES O.L.
C IMPOSES
DO 60 ID_I,IOLE
IP(KLOCE(ID 30,60,40
30 KLOCE(ID)_.KLOCE(IO)
GO TO 60
40 KLOCE(ID) .. O
60 CONTINUE
CALL ASSEL( 0 ,1 ,IOLE, NSYH, KLOCE, KLD, VKE, HE, VKGS, VICGO, VICCI, VREAC)
60 ITPE1_ITPE
RETURN
,"D
suaROUTINE ELEHLB(VCORE,VPRNE,VPREE,VDLE,VICE,VPE)
473
AS RE 30
ASRE
"
ASRE
" ASRE 23
ASRE 24
ASRE
" ASRE
" AS RE
"
ASRE Z8
ASRE
" ASRE 30
ASRE 3l
AS RE 32
ASRE 33
ASRE
,.
AS RE 35
ASRE 36
ASRE 37
ASRE 38
ASRE 35
ASRE 4D
AS RE ..
ASRE 42
ABRE
" ASRE: ..
ASRE ..
AS RE:
" ASRE
.,
ASI!.E 48
ASRE
.,
ASRE: 50
ASRE 61
ASRE
"
EL LB
C CALCUL DE:S GRANDEURS ELEHENTAIRES POUR TOUS LES TYPES D'ELEMENTS ELLB
2
3
IHPLICIT REAL.S(AH,OZ) ELLa
,
COMMON/RGDT/IEL,ITPE ELLB
,
7
8
8
10
DIMENSION VCORE( 1), VPRNE:( 1), VPREE( 1), VDLE(l), VICE( 1), VPE(I) ELLa
C .... -.- ............. - ............... ELLB
GO TO ( 10, ZO, 30, 40, 60, 60, 10, 80, 90,lOO),ITPE ELLB
C . . ELEHENT DE TYPE 1 ELLB
10 CALL ELEHOI(VCORE,VPRNE,VPREE,VDLE,VKE,VPE)
GO TO 900
c .. .... ELEMENT DE TYPE 2
20 CALL ELEHOZ(VCORE,VPRNE,VPREE,VDLE,VICE,VPE)
GO TO 900
....... ELEMENT DE TYPE 3
30 CALL ELEH03(VCORE,VPRNE,VPREE,VDLE,VKE,VPE)
GO TO 900
C _. ELEHENT DE TYPE 4
40 CALL ELEM04(VCORE,VPRNE,VPREE,VDLE,VKE,VPE)
CO TO 900
C ELEHENT DE TYPE fi
60 CALL ELEHOB(VCORE,VpRNE,VPREE,VDLE,VKE,VPE)
GO TO 900
C _.. ELEHENT DE TYpE (1
60 CALL ELEH06(VCORE,VPRNE,VPREE,VDLE,VKE,VPE)
GO TO 900
C ELEHENT DE TYPE 1
10 CALL ELEH07(VCORE,VPRNE,VPREE,VDLE,VKE,VPE)
GO TO 900
Figure 6.22. (Suite).
ELLB 11
ELL8 12
ELLa 13
ELLa 14
ELLa 16
ELLa 16
ELLB 17
ELLa 16
ELLa 19
ELLa 20
ELLa 31
ELLB 3a
ELLB a3
ELLB a4
ELLa 26
ELLa 36
EL LB 37
ELLB 28
EL LB 29
ELLB 30
474 Mthode des lments finis
c-_ ELEMENT DE TYr& 8
80 CALL ELEH08(YCQRE,YPRNE.VPR&&, VOLC ,YKC,VPE)
CO TO 900
C Cl.EHCNT DE TYPE: 9
90 CALL tLCK09(VCORE , YPRHE , YPR&& . VOLE , VKE,VrC)
GO TO 900
C CLeMENT oc TYPE 10
100 CALI. EL&HIO(VCORE , YPRNE,VPREE,VDLE,vKE,VrE)
GO TO 900
C AUTIIES [a, &HEIH5
C
900 RETURH,
,"0
SUBROUTTHE ASSEL(IKG,JrG,IOLE,NSYH,KLOCE.KLD,VKE,VPE,VKOS,
1 VKCO .VKGI ,VrC)
Et.L8
CUB
ELLe
f;l.LB
El.l.a
ELU
ELLB
ELU
ELI.II
ELLS
ELL8
ELLa
ELLB
ASSE
ASSE
C ASSEH8LAO'E D'UNE KATRICE ET/OU D'UN VECTEUR ELEMENTAIRE ASSE
C (HATRICE SYMETRIOue ou NON) ASSE
C ENTREES ASSE
C IKC SI lICe.EO.1 ASSEMBLAGE oc LA HATRI CE ELeHeNTAIRE KE ASSE
C Ire SI Ife . EO.l ASSEHBLAGE DU VECTEUR ELCMENTAI RE fC ASSE
C IOLC N0l10RC OC O.L. OC L'CLCHCNT
c
c
c
c
c
c
c
c
c
c
HSYH
KLOCC
,Le
ne
'" SORTJtS
O .. PROBLCH& SYHETRIOUE, l .. PROBLEHE NON SYHETRIOUE ASSE
VECTEUR DE LOCALISATION DE L'ELCHeNT ASSE
HAUTEURS CUHULEES DE COLONNES DE KC ASSC
HATRICE ELeHeNTAIRE K&(PLCIN& ou SUPERIEUR ASSE
PAR COLONNES DESCENDANTES) ASSE
VECTEUR ELENENTAIRE PE ASSE
VIC GS , VICGO . VICCI MATRICE GLOBALE (LIGHE DE CIEL)
ASSE
ASSE
ASSE
ASSE
(SYMETR IOUE DU NON)
VECTEUR SOLLI CITATIONS CLOBAL
I"PLICIT ItAL- B( A H ,OZ) ASSE
DIMENSION KLOCE( 1 ), KLD(l), YKC(1). vn;.,( 1), VKCS(I), VICGO( 1), ASSE
1 VICCJ(I) , VfC(I) ASSE
c ............ . .... ..................... . . . .......... . ........... . ...... ASSE
C ASSE
C AsseMBLACE: DE: LA MATRICE eLeMeNTAIRE
c
If(IKC , NE:.I) GO TO 100
IE:OOIDl.C
IE011
C POU R CH AOUC COLONNE DE KE
DO 90 JO. I,IOLE
Ir(NSYH . NC , I ) IEOO.JO
n . KLOCC(JD)
IP(JL) 90.90,10
10 IO.l( l..O(JL.l )
)[::O.IEOI
10 .. 1
C POUR CHAoue LIGHE DE KC
DO 80 ID. } . IOLE
ILKLOCE( ID)
I P(NSYH . EO . I) CO TO 30
I f(ID-JO) 30 , ZO , ao
10.JO
ASSE
ASSE
ASSE
ASSE
Asse
ASSE
ASSE
ASSE
ASSE
ASSE
ASSE:
Asse
ASSE
ASSE
ASSE
ASSE
ASSE
ASSE:
30 H ( IL) 80 , 80 , 40 ASSE
40 )JJLIL ASSE
Ir(l!) 10 , 80 , 60 AS SE
- ... - - . TERHES DIACONAUX DE KG ASSE
SO VKCD(1L) . U:CD(lL)+vKE(lEO) ASSE
CO TO 80 ASSE
Figure 6.22. (Suite) .
31
" 33
"
38
38
31
38
"
40
..
.,
.,
,
3
,
6
6
7
6
,
ID
Il
..
.3
H
. 6
.7
.6
ao
a.
"
"
"
as
"
Z7
"
"
3D
3.
"
33
" 3B
" 37
3B
"
"
,.
..
"
"
"
"
"
"
"
BD
Technique de programmation
C TtRKt.:S DU TRIANGl.E SUPERIEUR DE ICC
60 1_10 JJ
VKGS(I)_VKCS( I )+VKE( IEO )
GO TO 80
c .... TtltHes ou TRIANGl.E INrERICUR oc ICG
10 IrCNSlH. NC.I) CO TO 80
1.ICl.O(Il.+I)+1J
80 U:O-JED+IO
90 ICOI.IEOI+ IEOO
e
C ASSEHBl.AGE: DU veCTeUR el.EHeNTAIRe
e
IDO Ir(JrC. N&.I) GO TO 130
DO 120 10.1,IOLE
JI. _I(l.OCE( ID)
,r(Il.l 130.130.110
110 vrcc IL).vrG(IL)+vrE( ID)
120 CONTINUE
130 RETURI-I
eND
SU8ROUT INE HODrG(IDl.E,NSYH,kLOCE,vDtHP,YKE.vrG)
475
ASSC 81
ASSC
"
ASSC 53
ASSC ..
USE 9S
ASSE ..
ASSC
" ASSC
" ASSE
" ASSE 60
ASSE
'1
ASSE
" Asse 63
ASSE ..
ASSE
" ASSE
" ASSE
" ASSE 6B
ASSE
" ASSC 10
ASSE 11
HODr
c
e
e
e
e
e
e
c
e
e
e
HonIrl CATION nu YECTEUR rc POUR TENIR COHPTE DES DEcRES oc LIBERTEHoDr
INPOSES NON NUl.S CORRESPONDANT A UN ELEHENT HO Dr
1
3
1
ENTREES
IOLE
NSYH
noce
VDINP
\'ICE
SOUIC
'fC
HODr
NOMORe oc O. l. . De l. ' CLCMeNT Hoor
0-PR08l.EHC SYMeTR IOUC. I_PROBl.CHC NON SYH&TRIOUC Hoor
VECTEUR oc LOCALISATION OC l.Cl.CMENT Noor
YALEURS 01: :> u . .. . 1"1'0:>1,;1> HODf
HATRICE El.EMENTAIRE (PLEINE OU TRIANGLE SUPERICUR PARHOOf
COl.ONNES DESCENDANTES) HO Of
10
Il
veCTEUR SOL"ICITATIONS GLOBAL
HO Dr 13
HOOf 13
C _ __________ --- Hoor 14
IHP LI C1T REALeS(AU,OZ) HOOP 18
DIMENSION Kl.OCE(I),VOIHP(l),YkE{I).vrC{I) HOOf 16
DATA ZERO/O .DO I HOOP 17
C .. HOOP 18
IEOO .. 1Dt.E
1&01-1
C POUR CHAOUE LIGNE DE LA HATRICe
00 80 JO.l, IOLE
Ir(NSYH.NE.l) IEOO_JO
IEO-HOI
J l..oIe LOC E (J 0 )
10 .. 1
Irol. ) 10,60,80
la ]l JL
DI .HP.VOTHP(Jl. )
co Ta Ba
C .... POUR CHAOUE COl.ONNE DE l.A HATRICE ELEftEMTAIU:
DO 40 IO-I.IDt.E
IL .. kLOCE(ID)
lr(MSYK . tO . I) co to 30
Ir(IOJO) 30 .aO, tO
tO 10 .. 10
30 IrCll. .CT .O ) YrC(Il.) .. vrC(IL)VXE(IEO) eOIHf'
40 lEO.IEO+IO
50 IEOI_IEOI.IEOO
RETURN
END
Figure 6.22. (Suite).
HOOf 19
HO OP 30
HOOP tl
HOOP 22
23
HODP 24
HODP 25
HO OP 26
MODf 21
HODf za
Hoor 29
HO Dr 30
HO OP 31
HO Dr 32
HOOP 33
HOOP 34
HOOP 35
HOOP 36
HO OP 37
HOOf 38
HOOP 3&
HO Dr 40
HO Of U
476
Mthode des lments finis
Sualt OUTINt PltPV
C CALCUL &T IMPRESS ION PtS PIVOTS ET DU DETl: ."INANT Dt LA MATRICE JeCPRPY
1"'I.ICI1 REAL-B(A- N. O-l}
COMKON/ RESO/NEO
COMMON tES/ K. HR,HP
DIMENSION VKCD(I)
DATA UN/1 . DOI ,CROSIl038 /
ABS(X) .. DAl\S(X)
PRPY
pltpy
PltPV
pltpy
PRPY
PRPY
c ...... . ... . . .. ..... . .. PR'y
Xl_CRoS PRPY
xa_CROS PRPY
DET_UN PRPV
10&T_0 PRPY
c ....... IMPRESS ION DES PIVOTS DE KC PRPY
IP(N . OE . al VRITE(HP,ZOOO)(VKGD(I),I_I,NtO) PRPY
2000 rORMATel' PIVOTS DE LA HATRleE CLOBALE'j(IX,lDEI2.8)l PltPV
00801.1,NEO PRPV
c- _..... P IVOT MINIHUM EN 'lUEUR ABSOt.ut PRPV
X_ABS( VICCDe 1 PRPV
tf(X .GT.XI) GO TO 10 PRPV
XI_X PRPV
Il.t
c- PIVOT IUNIMUM EH VALEUR ALGEBRIQUE
X.VKOD( 1)
papy
papv
PIPV
PIPV
papv
papv
PRPY
papv
papv
pRPV
papv
10 Ir(X.eT.X2) co TO 20
xa.x
U.I
c .. . OtTtRIUNANT (LE LIMITEa A ID PUISSANCE. OU - ID) .
ao OCT_OCTvrcO( t)
30 Ol:ll_ABS(oET)
Jr(OCTl.1,. T.1.010) 00 TO 40
DET.O&T-1 ,Dl0
JOEl_! OET.1 0 papv
40 Ir(0&11.01'.1.0-10) CO TO 80 papy
0&T_0I:T.I . 010 PRPY
10&1-10I:T 10 PRPY
co TO 30 PRPY
!1O CONTINUE PRPY
c- _ .. _. - IMPRESSIONS PRPY
VRJTE(HP,8010) Xl, ILU, 12,OET, 10ET PRPY
2010 rORMAT(/UX. 'PIVOT MINIMUM VALEUR ABSOLUE .' ,E18.6,' EOUATION:' ,PRPY
J8 lUX, 'VALEUR ALCEBRIOUE.' ,EU . 6, ' EOUATION:' ,PKPY
2 18 lUX, 'DETERMINANT.' ,EU . 6, 10" PRPV
3 19/ 1 PRPY
RETURN PRPV
END
PKPY
8UBROUTINC PRRE
c
CALCUL ET IMPRESSIOH DES RESIDUS DE RESOLUTION I .U - P PRRE
INPLICI1 REAL8(A-H,O-i) PRRE
CONMOH/ASSE/HaYM.Nle paRt
COMMOH/RtSO/NEO,NRES . "RES PRRE
CO""OH/E8/M.NI."p . "1 . "2."3 . PRRE
D,MeNS ION vrGS( 1) , VKCD(l), VKCI( 1). vrc( 1). KLD(.), VRES( 1) PUE
DATA ZEROfO.OOl PRIC
AB8(K).DA8S(X) PRRt
c ... ___ . _ ...... -. - _. - - -- _ ... -- _. - -- -- _. - _. - .. -..... - - - - - _. - - -_. - _. _. _ .. PIRE
REVINO H3 PRRE
C ...... BAUTER LE VECTEUR rc MOM MOOIrIE PAR Les C.L , SU R rl CH IER HS PRRE
ItEAO(JU) (VRES(I), 1.1, HEQ) PItRE
Figure 6.22. (Suite).
,
3
1
10
"
12
13
14
1.
1.
17
1.
l'
20
21
"
"
..
26
26
"
,.
,.
3.
31
"
"
,.
"
" 31
"
"
41
..
.,
..
H
,
3
1
1.
11
l'
13
14
1.
Technique de programmation
c ... LUt 1.1; VECH UR HOIHrJE PAR LES C. L. Cf LA MATRI CE IC C
ReAO(Hl ) (VItI:S( 1) ,I.I . HEO)
REAO(N]) ( VICCS( 1) ,I.I , NKC), (VKCD( 1) , 1.1 ,NEG)
IF(NSYIt . CO . l) REAO(N3) (VKGI('I).I.I , NICC)
C CAI.CULER I.E RESIDU DE RESOLUTION
00 10 l_l,NEO
10 Y.ES(I ) ..
CALI. HUI.K U(VKCB,VKCO , VKCI,KLO,VrC . NEO.NSYM,VIIES)
0 0 20 t_I.NEO
20 YRES( I ). VRES(I )
Xl.zell O
DO 30 t .. l . NEO
X_A8 S( VRES( Il)
IF(XI . GE . X) CO TO 30
)(1. X
Il.''
30 CONTINUE
tr(N . CE . 3) YRITE(HP,aOOO) (VR&S(I),I_I,NEO)
2000 rORNAT(/' RESIDUS DE RESOLUTION' Il lX, 1 OEI2. 5
YRITEIMr , 2010) XI.II
2010 FORMAT(/, RESIDU DE RESOLUTION HAX ... ',E13 . 5.' COUATION' .18)
RETURH
EN D
SU8ROUTINE PRSOL( KDI.NC, VCOIIC,VDIHI',XNEO,VrC)
c IMPR ESS ION DE LA SOLUTION
PRRE
l'RIIE
PItRE
l'RRE
PRRE
l'RRE
l'RRE
l'RIIE
PRRE
PRRI:
PRRI:
l'RRE
PRRE
PRRE
l'RRE
l'RRE
PRRE
PRRE
PRRE
PRRE
PIRE
PRRE
PRRE
l'ISO
l'RSO
477
" 17
" ..
ID
"
"
" ..
"
"
"
"
"
3D
31
32
33
,.
"
"
31
"
1
3
c _____ ._ ...... _ .... _ .... _________ .. _ .. _. ____ .. _ ....................... - _ .............. _rllso
,
IHI'LI CIT REAL8(A H, O, Z)
CONNON/ COOR/ NDIN,NHT
CONNON/ ES/N,NR,Nr
COHHOM/ TItVL/ V(10),rX(10)
DIMENSIOM VDIMI'(I),KOLMC(I) , VCORC(l) , KHEQ(I ). vrCII )
DATA Rf / tH /. RL / 4H / ,ZERO/ O. DO/
l'RSO
PRSO
,
l'RSO 1
PRSo 8
l'RSO 8
PRSO 10
c,,, , .. ... .. . . . .......... , ... , ... ,. , .... .......... ... . . .. . .. PRSO II
xa.ZERO l'IISO 12
X3_ ZCRO PIISO 13
VRtTE(MI',3000l PIISO 14
3000 fORMAT , /' NOEUDS' ,4X, 'X' ,IIX, 'y' ,IIX, 'z ' ,IGX. 'oCCRCS DE LIBERTE ("PRSO 16
ID
20
3D
1 IMPOSE) ' /) PRSO 16
ra.o PI!SO Il
DO Ba IN .. l,NNT PRSO lB
1 1001 a.fl
U .. U ... I(OIM
101_KDLNC(IN)+1
102_KDLNC(IN .. I)
10 .. 102 101+1
If(l02.I.T . IOl) CO TO 50
Xl.VCOI!C(JI )
If(HOJM. CE . I ) XZ_VCORC(II.l )
I r, HDIM .OE. 3 ) X3.VCOIIC(II.f2 )
J .. IDI
00401';1 , 10
JJ_KNCO(J)
Ir(JJ) 10,20.30
Y(I) .. VDlkp( JJ)
FlI( 1 )_Rr
co TO 40
y (1 )_ZERO
n(I).Rf
GO TO 40
Y( I)_VfCI JJ )
PX(I).R!.
J_J+I
Figure 6.22. (Suite).
PRSO 19
PIISO aD
PRSO 21
PRSO aa
PRSO a3
PRSO a4
PRSO 3S
PRSO 38
PIISO 27
PRSO 38
rRSO 21
l'RSO 30
l'RSO 31
l'RSO 32
l'RSO 33
'RSO 34
,RSO 36
PRSO 3e
l'RSO 37
'RBO 38
l'IIBO 39
l'RSO 40
478
Mthode des lments finis
VRITC(HP, ZOIO)I N,X I ,X2,X3,(V(II),rX(II),Jla) ,ID)
2010
PRSO 41
PRSO 42
80 CONTI NUE
RETURN
'"V
PRSO 43
PI!S O H
PRSO 45
SUBROUTINE DLELH(kLOCE,VDLG, VDIHP ,VDLE) DL.EL
c
EXTRACTION DES D. L. D'UN CLEHENT OLEl. 3
IHPLI CIT REAL-S(A M. OZ) OLe!.. s
CONNON/IICOTIIE!.., UIUl.(l) , I OLE: OL&L 6
COHHON/ESf ",HR , HP OLEI.. 7
DIMENSI ON KLOCt(l),VDt.G(l),VDIHP(l),VOLE(I) OLEL 8
DATA ZERO/D.DOI OLEf.. 1)
c- ..................... ... --" .- ......... ...... . . -, ' .... . .. ... OLE!.. 10
DO 40 ID_l, ID!.E oua. Il
IL_nOCE( ID) OLEL 12
IP(IL) 10,20 ,30 DI..EL 13
10 VDLE(ID) .. VDIHP( [L) Ot. CL 14
CO TO 40 DL.EL 15
aD VOU:( ID). ZEJIO OLEf., 16
GO TO 40 oua. )1
30 VOLE(IO)_VOLC(IL) OLCL 18
40 CONTINUE OL&L 19
IF(H . GE . 2 ) VRITE ( MP, 2000) I&L ,(VOLE(IO), IO-I,IOL&) DIo&1. 20
2000 FORHAT(' DEGRES DE LIElERTt DE L &LEHENT ',IS/llX, IOtIZ.S
R&TURN
OLCI. 21
01.&1. 22
EHV DIoEI. 23
SUSROUTINE HUIoKU (VKCS, VKGD,VKGI,KLO,VFG,NCO,NSYH,VRES) HU I. K
c -- ______ "UI.K
CE SOUS PROGRAMME RETRANCHE OU VECTEUR VRES 1. & PRODU IT DE I.A
MATRI CE KC PAR LE VECTEUR FC
ENTREES
1KGS ,VKGO. VKGl HATRI CE KG STOCKEE PAR LI GNE 0& CIEL (SVH,
OU HON
KLO HBLt DtS POINTEURS DES NAUTS OC COL.O NNtS DE KG
MUL K
HUL.K
HULK
HULX
MULK
HULK
1
,
3
,
,
c
c
c
c
c
c
c
c
c
c
c
c
'"
HEO
V&CTJ:UR FG HUloK 9
NSYM
VRtS
DIMENSION DES VECTEURS FG ET RCS
.EO. 1 S I I.E PROBI.EME N'EST PAS SYMETRIOUE
veCTEUR RES
HU I.K 10
HUI.K 11
SORTit
VRES veCTEUR RES
HUI.K
HUI.K
HULK
IMPLICIT REAL-S ( R. H,DZ) HU LK
OIHENS IDN VltGS( 1 ) , VKCD( 1) , nCI( 1 ), KI.D( 1), VFC( 1), VRES(l) HUI.K
c -...... _. --.... ........ .... -............ MULK
C" POUR CNROUE COI.DNNE DE LA HATRI CE KC HULK
00 20 n:.l.HCO HUI. K
JNK_KLO(IK) HULK
JNKI_KLD(IK+I) MULK
LNK_JHKlJNK MULK
C - TERME DIAGONAL HULK
C_VKCO(IK)-VFC(IK)
IF(LNK.LE.O) GO TO 30
10.II(LIIK
C _ - TERMES DE LICNe
rF (NSYH. NE. 1) C .. C.SCAL( VKGS(JIIK) ,VFG( ID) ,LHIC)
IF(NSYH . EO.I) C_C.SCAL (VKC I(JHK) , Vr C(ID),LHI)
C . TERMES DE COLONNe
J-JHK
Il.IK- '
Figure 6.22. (Suite).
HULK
HULK
MULK
HULX
MUl.K
MULIC
MU LX
HUl.X
MULK
12
13
14
IS
16
"
" 10
,.
"
"
" ..
"
"
"
"
" 3D
li
" 33
Technique de programmation 479
10
"
DO 10 1) .. 10,11
VR ES( IJ ) .. VRES(IJ) .VKCS( J ) VrC(IK)
J.,J +1
YRES (IK) .. VRES ( IK He
RETURN
HULK 34
HUI.K 35
HULl( 36
HU Ll( 31
HULl.: 3a
END KUI.K 39
Figure 6.22. (Suite).
6.5.3.4 Bloc 'LINO'
Fonction
Ce bloc est semblabl e au bloc LI N M. par contre la matrice globale est
segmente sur disque par la mthode dcrite au paragraphe 4.6 . 3g. Cette
matrice est assemble sur le fichier M KG1 puis elle est triangularise par la
mthode du paragraphe 5 . 2.4 . 2 et rcrite sur le fichier MKG2.
Organigramme
BLUND
.... -----.,
1 Programme
1 principal 1
"- ____ ..J
Sous-programmes
EOBLoe
ASKGD
ASSELD
SOLO
_ SOUS-Drogrammes
communs tous les
blocs d'excution
BLLlND : est semblable Il BLLlNM; il lit les variables NRES, NLBL et
NBLM et cre les tables VKGD, VFG, VKE, VFE, VRES. VDLE,
KEB. KPB, VKGS, VKGI (fig. 6 . 23) .
EXLlND :est semblable Il EXLlNM (fig. 6.23).
480
Mthode des lments finis
EQBLOC : construit les tables KEB et KPB qui dcrivent les blocs de la
matrice globale (fig. 6.23).
ASKGO : assemble la matrice globale segmente sur disque (fig. 6.23).
SOLO : rsout un systme dont la matri ce est segmente sur disque
(fig. 5.16) .
ASSELO : est semblable au sous-programme ASSEL du bloc LlNM, mais
n' assemble que les degrs de libelt dont les numros sonl
complis entre IE1 e11E2.
Remarque
Les sous-programmes ASKGO et SOLO seraienl plus efficaces s'ils
ulilisaient des f ichiers accs direcl au lieu des fichiers squentiels; par
conlre ils ne 'seraienl plus alors indpendants du type d'ordinateur ulilis.
SU8ROUTIHC ~ ~ l H D 9LLD
C APPEL DU BLOC 'LINO' BLLD
C ASSEMBLAGE CT RESOLUTION D'UN PRQBLEHE LINCAIRE AVEC SEGHENTATION aLLD
c 0& LA MAniee KG SUR DISOU/; aLLD
c--------- ___ ........... ______ ............. ___ ........ --_._---___ ... _. __ BLLO
aLLD
REAL'. T81. BLLD
COHMON/COOR/ NDHC. NNT HoLH. HOLT 8l,.LD
COHNON/ELCH/ NUL(4).HE 81.1.0
CONNON 1 AS SE/ Nsn. NICG. "Kt:. NO!.E 81.1.0
CONNON IR ESO (NEO . KR &S. HR CS SUD
COHtlON / LIND{ NLBL , HB LH,HKCI , HICG3 8LLD
COHHOHfES/H,HR,HP,HI,H3,H3,H4,H8 BLLD
COHHON/ALLOC/ NVA,TVA,lVAHAX,HREEL BLLD
COHHQN/LOC/LCORC,LOLNC,LNEO.LDIHP.LPRNC.LPREC.LLD.LLOCE.LCORE.LNE.8LLD
l LPRNE,LPREE.LOLE,LKE,L'E.LKGS.LKGO.LKCJ.LrC,LRES,LOLG aLLD
COHHON HO) aLLO
DIMENSION TBL(lO), JH(3 ) aLLO
DAU TSL/4UKCS . 4HKGO ,4HKGI ,4H'C ,4HKE , ure , 4HRES , 4HOLE , !lLLO
l 4HE8 .4HP8 /, DCUX / 3 . DO/, N!lLHAX/lOO/ 8I..LD
c .. .. .. ..... .... .. .. ........... ... . Sl.l.D
C FICHIERS aLLO
JP<HI . tO . O) HI_HR
tr(Ma.EO . O) Ha_HE
1'(H3.EO.0} H3-HRES
IP(M4.EO.0) H4-HKGl
IP(H8.EO.0) HB_HKG3
C. LECTURE DES PARAHETRES OU BLOC
RCAD(Hl.lOOO) IN
1000 PQRHAT(3IB)
IP(lH(1).NE.0) NRES_1
NL8L_IN(2)
N8LH_IN(3)
VRITE(HP.2000) H. NRts
3000 fORHAT(//' ASSEMBLACE RESOLUTIOH LINEAIRE SUR DISOUE
l .411{ .. )/U INDIC& DE CALCUL DU RtSIDUS
IP(LKGD . EO . l) CALL ESPACE(NEO . I . TBL(3) , LKGD)
Figure 6.23. Bloc LINO.
111..1..0
8L. L.D
eLLD
eLLO
!lI..LD
8t..LD
BLLD
BLLD
BLLO
eLLO
8I..l.D
DLLD
( K. , 13,)/ al.LO
(NRES).' .18 ) BLLO
eLLO
,
3
,
,
7
8
8
10
Il
..
13
,.
"
" 17
18
19
30
.1
"
"
..
as
"
"
"
"
30
31
" 33
,.
"
" 37
"
'='
Technique de programmation
Ir(LrC, EO . I) CALL ESPACE(NEO , I .TBL(4),LFC)
Ir(LKE. EO . I) CALL ESPACE(NICE,I , TBL(S),UE)
Ir(l.Ft . EO . I) CALL ESPACE(NOLE,I,TBL(6),LFE)
Ir(LRCS . EO . I ) CALL ESPACE(NOLT . l.T8L(1),LRCS)
IP(LOLC. CO . I ) CALI. ESPACC(NOLE,I , TBL(B).LOLC)
C .. DCTERMINATION DE LA LONCUEUR DES BLOCS
13 .. 1 +NSYH
I P(NLBL . EO.O) GO TO ID
U'(NOLK .E"O. O) N8LH.NKG/NLBL.+2
CO TO 30
10 Il.NVA I VA (2N8L.KAX+2)/NREELl
JF(II.GE .( NKC12+2 GO TO 30
c ., CAS OU LA KATRICE DOIT ETRE SEGHENTEE
NL.BL._Jl/(DEUXI3)
NBLH.HKC /NL8L+ a
co TO 30
c. CAS ou lolo "ATRICE TIENT EN HEHOIRE
30 NL.BL. .. NKC
N8 loH 1
13.1
30 WRrTE(MP,aOlO) NL8L,N8loK
2010 rORHAT(
1 I8X,' LONGUEUR DES BLOCS DE KC (Nlo8lo) .. ' , 181
2: 16X,'HOM8RE HAX. DE BLOCS DE ICC . ',18)
CUL CSI'ACE(N8I.H+l,0,TBL(9),LEB)
CALL tsI'ACE(NBLH ,O, TBL(lO),LP8)
tf(LKCS , EO.I) CALL ESPACE(NLBL13,I , TBL(I).LXCS)
IF(HSYH . 1:0 . 1 . AND . UCI. EO . I ) CALL ESI'ACE(NLBL13 , l, T8L(3), UCI)
CALL CXLIND(VA(LLD),VA(LDIHP),VA(LLOCE),VA(LCORE),VA(LPRNC),
1 VA(LPRCC),VA(LNE),VA(LKE),VA(LFC) , VA(LKCS),VA(LKCO),
2: VA( LXCI), VA(LFC), VA(LCORe) , VA(LoLHC) , VA(LHEO) ,
3 VA( LRES) , VA(LDLE) , VA( LE8) ,VA( LPB
RETURN
E",
aLLD
8LLO
BLLO
BLLO
81.1.0
BLLO
BLLD
l'ILLD
l'ILLo
81.1.0
BLLD
81.1.0
8L.LD
81.1.0
8LI.D
81.1.0
8LLD
81.1.0
8L.LD
BLLO
81.1.0
BI.LD
BLLD
BLLO
BLLO
BLLO
8LLD
8LLD
BLLO
BI.LD
BLLD
BLLD
8LLD
DLLD
8LLD
SU8ROUTINE EXLIND(KLD,VDIHP,KLOCE,VCORE,YPRHE,VPREE,KNf:,VKf:,VPE, EXLD
481
"
..
"
" ..
"
"
"
" ..
s.
"
"
"
" 66
" 51
"
"
61
"
63
..
6S
6S
"
" ..
,.
"
"
"
EXLD 2
C EXLO
C EXECUTION DU 8LOC 'I.INO' EX!.O
C ASSEHBLAGE ET RESOI.UTION D'UN PROBI.EHE LINEAIRE AVEC SEGHENTATION EXI.D
C DE L.A HATRICE KG SUR OISOUE EXLO
C ... ......................................... EXLD
IHPI.ICIT REAL-B(A.N,OZ) EXLD
COHNON/ASSE/NSYH,NXG,NKE,NDLE EXLD
COHNON/RESO/NEO, NRES, NRES EXLD
COHHON/LIND/NL8L,NBLH,HKOl,HKC3 EXLD
COHHON/ES/N,HR, HP ,Nl,H2, H3 EnD
DIMENSION HD(1), VDIHP( 1) ,KLOCE( 1) ,VCORE( 1) ,YPRNE( 1) ,VPREE( 1) , EXLD
KNE(l), VKE( 1), VFE{ 1), VICGS{ 1), YICGD( 1), YJ( OI ( 1), vtG( 1 ) , YCOKG( 1), EXL.lI
2 ICDLNC(I),KNEO(I ), VKES(I),VDLE(1),KE8(1),KPB(I) EXLD
C . . . ........... . .................. . ... .. ......... .. .......... EXLD
REVINO H3 EUD
3
,
7
,.
11
la
13
H
16
16
17
C " CALCUL DES TA8LES E8 ET P8 DEfiNISSANT I.ES &l.OCS D'EOUATIONS EXl.O U
CALI. EOBLOC(KLO,NL8L , H8LH,NEO,KE8,KP8)
VRITE(HP,2000 ) HBL"
2000 PORHAt(18X.'HOHaRE DE 8LOCS 0& KG (H8LH).',10)
Ir(K . LT .a ) GO TO 10
JI.K8LM+1
VRITE( MP,2010) (KE8(1) , I.l , Il)
2010 FORKAT(/' PREHIERE EOUATION DE CHAQUE 8LOC: (E8)'/(8X,aOI8
VRITE(HP,20aO) (KPB(I) ,I.l,H8I.H)
2020 PORHAT(/' PREHIER BLOC CONNECTE A 81.0C : (PB)'/(BX,2018
C SAUVER PC NON HODIPIE PAR LES C.L. IHPOSEES
Figure 6.23. (Suite).
EXLD 19
&XLD 20
EXLD 21
EXLD 22
EXLD 23
ElLD 24
EXLD 38
EXLD 38
EXLD Z1
EUD 28
482
Mthode des lments finis
10 VlIITI: (H3) (YrC(I),I_I. NEO) Ell.O
If(H . CE . a) VRITE( HP,2030 ) (VrC(I) , I_l . NEO) EXLD
2030 fORMAT( , ' VECTEUR SOLL ICITATI ONS HON MODIFIE PAR LES C.L . (ElLD
IfC)'/(tx,IQE12 . S EXl.O
....... ASSCHat.ER ICC.KOD l f ll:R rc POUR LES C.L. Er SAUVER rc NQDlflE EXt.D
CALL ASICCD(ICLD,VOIHr ,kLOCE,VCORE , VPRH&, VPR&E,ICHE,VICE.vrr. . vlCcs, ElLU
1 VKCD,H:Cl , YfC,VOLt: , VRES,K(8) EnD
VRITE ( "3 ) ( vre( ll , I_t . NCO) cuu
.. _... . IHPR&SS IOH DE re EnD
Ir(H .CE . 2) 'IRITI:(HP,2040) (VrC(I),J .. l,NCQ) EXLD
20 4 0 'OftI1I1T(/' veCTEUR SOLLICIT"TIONS GLOB"!. HQD I !" I!:: PAR LES C.L. (PC)'EXLD
1 /(1)L IOEI2.5 El LD
e
c ReSOLUTION
EXLD
EXLD
EXLD
e
20 Co\l.I. SOLDe VICes, VKeD, VKGI. vrG, KLD, IH:O. HP ,1.1 MSYM, CNCRe, Kes, KrB) EXLD
H'(NSYH , tlE , 1 ) IIRITE(HP,2060) ENERC EXLD
2050 rORHAT (I$X,'ENERCIE (ENERC).',IE12,6) EXLD
C" " PIVOTS DE KG ET DETERHINANT EXLO
30 CALI. PRPYTS(VKGD) EXLD
C... .... IMPRESSION DE LA SOLUTION EXLD
IIRJT E( HP , 20601 EXLD
2060 rORMATe/ I ' SOI,.l/T I ON',/) EXLD
CAI,.L PRSOI,.(KDLNC,VCORG,VDIMP,KNEO,VrG) EXLO
C EXLD
C. ,. .... CALCUL t:T IHPRESStON DES GRADIENTS EXLD
C EXLD
CALL ASCRAO(kLO,VDtHP,KLOCE,VCORE,VPRHE , YPREE , XNE , VKE , VrE , YkCS, EXLO
1 VXCD , VlG I,Vf'C,VDLE,VRCS} EXLD
C r.XI.fI
c .. " . CALCUL &T IMPRESS ION DCS RES IDUS D'EOUILIB,RE CT REACTIONS EXLD
C EXLD
C . , Lill e Le VECTEUR rc CT I.E CHAHCER DE SICNE: EXLD
RE\lIHD Hl EXLD
READ(Ml) (VReS(1),t .. I,NEO) EXLD
00 40 1.I,Neo EXLD
40 VRESn ). , YReS( 1 ) EXLD
.. . . ... _;:;5 RESIDUS ET I.ES REACTIONS EXLD
CAI,.I,. ASRERD( 1,1 ,XLD, YDtMP, KLOCE, VCORE, VPRNE, YPREE, KNe, VKe, vrE, EXLD
1 VKGS,VKCO,VKCI,VrC,VDI,.E,VRES,VRES(NEO+l EXLO
C...... . IMPReSSION EXLD
VRJTE (NP,Z0 70 ) EXLD
Z010 rORHATCl!' RESIDUS D EOUIl.tBRE ET REACTIONS'II> EXI.D
CALL PRSOL(KDI,.NC, VCORG, VRE:S(HEO+l), KNEO, VRES) E:XI.D
RETURN EXI.D
END EXLD
SUBIIOl/TINE EOBLOC(XLD,NLBL,NBLHAX,NEO,KEB.KP8) EOBI.
C---.. - ............................................................. - .... - ................... _ .. ___ ........ _ ......... _EOBI..
e
CALCUL DES TABLES XEB ET KPB DEf'INISSANT LE:S BI,.OCS D'EOUATI ONS EOBL
e
ENTREES
E08L
e 'Ln
TABLE DES POINTEURS DES HAUTS DE COLONNE ilE KG EOBL
e
HI.B!. LONGUEUR DES BLOCS EOU
e
HBLNAX HOMBRE MAX . ilE Bl.OCS ADHISSIBLE EOBL
e
.'0
NOMBRE D EOUATIONS EOBL
e SORT IES
EOU
C
, .. TABLE DES HUMEROS DES PREMIERES EOUATIONS DE CHAOUE E08L
e
BLOC (DIMENSION HEO.I) E08L
e
KP'
TABLE: DE:S HUHEROS DES PREMIERS 8LOCS CONNECTES A EOBL
e
CHAoue BLOC (DIHENSION NEO) EOBL
e
N81.HAX HOHBRE DE BLOCS EOBL
C- ................. o.o. ......... _ ............. ____ ........................................................ _ .. EORL
COHMOH/ES/H,HR,HP
OIM1:NSION KLD(I',KEB(1),KPB(I)
Figure 6.23. (Suite).
EOBL
EOBL
" 30
31
32
33
34
" 36
31
"
"
.0
41
..
43
..
45
46
47
4B
49
.0
.1
"
63
..
" 56
61
-
89
60
'1
" 63
..
" 66
67
"
69
70
71
72
73
74
,
3
7
10
1\
1.
13
\4
16
l'
l ,
Technique de programmation 483
c ........................................ -,- ........ .............. EOSI. 10
c PREMIER BLOC
11.81. .. 0
NBL"I
KEB(I) .. 1
KPB(I)-l
lHlN_1
C POUR CHAQUE EOUATION
DO 70 1](_1,1{&0
C POINTEURS DE LA COLONNE IK
JIIK .. KLD(IK)
JHIC) .. KLO(n:+l)
LOK! .. JHK1JHK
IP(LBK1.LE.NLBL) CO TO la
VRITE(HP,ZOOO) n,LBKl,"LBL
ECSL 19
ECBL 20
EaOI. 21
E08L ZZ
EaSL 23
EOOL 24
EOOL 26
EOIlL 26
EOB!. 21
&08L 28
E08L 29
E08L 30
EOOL 31
E081. 32
2000 FORMAT{' ERREUR,COLONNE',IB,' PLUS GRANDE{',rS,')OUE LE BLOC('EOSI. 33
1,15,')') EaOI. 34
STOP EOOL 35
c- TEST POUR UN NOUVEAU BLOC EOOL 36
10 1 LBI.- ILl! L .. LOK 1
IF(ILBL.LE,NLBL) GO TO 60
NBL .. HBL+l
IF(NBL.LE.NBLHAX) GO TO 20
VRITE(HP,2010) IK
2.010 fORMAT('" ERREUR,NOMBRE DE BLOCS TROP EI,EVE,EOUATION',15)
STOP
20 KEB(NBL).IK
lL8L .. L8KI
C _ . _. RECHERCHE DU PREMIER BI,OC CONNECTE AU BLOC TERHINE
IB .. N8L
40 If(IMIN.GE.KEB(IB GO TO 60
IB_IBI
ca Ta 40
50 KPB(NBLI).IB
IHIN.n
C _ . _. RECHERCIIE DU NUMERO DE LICNE MINIMUH DES HAUTS DE COLONNE
60 I .. ULOK1 .. I
If(I.LT.IHIN)IHIN.I
70 CONTINUE
C _ . - -. PREHIER BLOC CONNECTE AU DERNIER OLOC
BO
90
c
c
c
III .. NBL
If(IHIN.CE.KEB{IB CO TO 90
IB_JB}
CO Ta 80
KPB(NBL)_III
KEB(NBL+l).NEO .. 1
NBLMAK .. NB1,
RETURN
&ND
SUBROUTINE ASKGD(KLD,VDIMp,Kt.OCE,VCORE,VPRNE,VPREE,KNE,VKE,VPE,
VKCS,VKGD,VKGI,VrC,VDLE,VRES,KEB)
ASSEMBLAGE DE LA MATRICE GLOBALE KG (l'ONCTION ELEHENTAIRE
DE TYPE 3) AVEC PRISE EN COHPTE DES 0.1.. IHP05ES NON NULS
VERSION AVEC MATRICE KG SEGHENTEE SUR LE fICHIER H4
EOBL 37
EOBL 38
EOBL 39
EOBL 40
EOIIL 41
EOBL 4Z
EOBL 43
EGBL 44
EOBL 45
EOBt. 46
EOBL 41
EODL 48
EOBL 49
EOSL 80
EOSL 51
EOSL 82
EaSt. 83
EOSL 54
EOSL 55
EOSL 56
EOSL S7
EOSL 88
EOSL 59
EOSL 60
E08t. 61
EOBL 62
EOSL 63
EOSL 64
EOSL 65
EOBL 6S
ASKD
ASKO 2
ASKD
ASKD
ASKD
6
IHPLICIT REALS(A-H,OZ) ASKO 8
COMMON/COND/NCLT ,NCLZ, NCLNZ ASKD 9
COHHON/ELEHjNELT,NNEL,NTPE,NGRE,HE,NIDENT ASKO 10
COHHON/ASSEjNSYH ASKD 11
COHHON/RESO/NEO ASKD 12
COMHON/RCDT / IEL, ITPE, ITPEI , ICRE, IDt.E, ICE, IPRNE, IPREE, 1 NEt., 1 DEC, 1 PGASKD 13
l ,ICOD ASKO 14
Figure 6.23. (Suite).
484
Mthode des lments finis
COMMON/L 1 NO/HI..BL.. NBl. H. KIWI. NKez ASleD 1 B
COHHOH/ESfH.HR,HP.HI,H2,H3,K4,IUI ASKD 16
DIMENSION KLD(I ) ,YOIHP(l),KLOCE(l),YCORE(I ),' PRHE(l),VPREE(I), "SICO 17
1 KNE(I) ,VIC!:(I) ,yre( l) ,HGS(I), VIWD(I), VICOI(I), VrG(l) ,VOLE(I), ASkO 18
1 VRES(l), KEB(I ) ASKD 19
DAT.'r. ZERO/O. 001 ASleD 20
c .............................. __ ... ..... . . . ................ . . ASleO 21
c rOSITIONHU AU DEBUT LE fICNIER Hi ASleD a3
RE'OND "4 ASICO 23
c- BOUCLE SUR L.es BLOCS
DO 80 18 .. I,N81.N
c INITIALI SER LE BLOC
10
DO 10 I-I,NLBL
IP(NSYH.EO.l) VKCI(I)_Zf:RO
VKGS(I) .. ZERO
IEI_K&8(18)
IEZ_KEB(IB+l)_)
c- POSITIONNER AU DEBUT l.E FICHIER DES ELEHENTS (H2)
RCVIND H2
c -". - BoUCLE SUR LES ELEMENTS
DO 70 lE_l , NELT
C LIRE UN ELE"ENT
CALL RDELEM<N2,KLOCE , YCOIIE,VPRNE , vrIlEE,KME)
C . L'ELEMENT 1 "TERV 1 CNT. 1 L DAMS LE BLOC
DO 20 ID_l ,IOLe
J .. KLOCE(IO)
IP(J.LT.JC1.01l .J . OT.IE3) 00 TO 3D
GO TO 40
20 CONTINUE
30 IP(IB.NE.l.OIt.(NCloNZ.CO.O.ANO.IB.EO.I CO TO 1'0
C. CUCUL DES PONCTIONS D' INTERPOLATION ~ I HECESS,\IRE
40 IP(ITPE.EO.ITPEI) 00 TO 80
Icon .. a
CALL ELEHLB (VCOltE ,VPRNE,VPRtt,VDLt ,V KE,VPE)
C. CALCUL . ... E LA MATRICE ELtHENTAUE
80 ICOO.3
~ L L ELEMLB(VCORE,VPRME,VPREE,VOLE.VKE,VfE)
C IMPRESSION DE LA MATltlCE ELENENTAIRE
tr(N,LT .a) 00 TO 80
IP{NSTH.EO.O) lKE_IDLE_(IDLE+I)/2
IP(NSYH.EO.l) IKE-IOLE-IOLE
VRITE(HP ,2000) IEL, (VKt( 1),1-1, IKE)
2000 rORHAT(/' HATRICE (KE) , EloEHENT:' ,18/nOlC,1()E12,6
C HODIFICATION OE PO DUE ,\UX D.L. IMPOSES NON NUl.S
80 IP(NCLNZ.NE .O. AND .IB.EO. l) CALL HODPO(IDLE,NSYH,KloOCE,VOIHP,VKE.
1 VPG)
C ASSEHB LAGE
CALL ASSELO(I. O. lDLE , NSTH,IEI,IE3,KLOCE,XLD,VXE , VPE,VXOS ,VKGD,
1 VKGI . YrO)
ITrCI_ITrc
70 CONTINUE
c l'IN D'UN BLOC
VRITE(H4) (VKGS(I),t_l,NLBL)
IF(NSYH.EQ.l) WIlIfE(H4) (VXGI{I),hl,rH,81.)
IF(H.LT.2) GO TO 80
VRITE(HP,aOIO) JR,(YKGS(I),I_I,NLBL)
3010 fORHAT(' BLOC DU TRIANGLE SUPERIEUR DE (ICC) NO:',UI/(1X,IOEU.8
If(NSYH,EO.I) 'lRlTE{HP,,aoaO) IB,(VXGI ( I),I-1 , NL8L)
3030 fORHAT(' BLOC DU TRIANGLE INPERIEUR DE (Ka) NO:', la/(IX,IOEla.8
80 CONTINUE
If(H. CE,3) '1I11&(MP,3030) (VXCD(I ) ,I_I,NEO)
3030 fORNAT(' DIAGONALE DE (KC)'/(lX,JOCU.I
R&TUIIN
END
Figure 6.23. (Suite).
UkD :u
AUD as
ASKD 31
ASkD 201
ASkD 2B
ASKO 29
ASKD 30
A8kO 31
!\SkD 32
ASKO 33
ASKO 34
UkD 38
ASKD 36
ASICD 31
ASKD 38
ASKD 38
ASKD 40
AUO U
ASKD 43
ARKD 43
ASICD 44
ASKD 46
ASKO 46
ASKD 47
ASKD
ASKD
UkD
ASKO
ASKD
AUO
ASKD
ASKD
ASKO
ASICD
~ S I O
ASKD
ASKD
ASICD
ASXD
UkD
ASICD
ASKD
ASKD
ASICO
ASKD
ASKD
ASkD
ASKD
ASKD
ASICO
ASlCD
ASKD
", SKD
Asn
ASXD
..
" ..
" ..
"
"
"
"
" ..
"
Bi
.3
..
..
..
" ..
..
70
71
" 73
,.
78
" 77
78
Technique de programmation
485
SUBROUTINE ASSELD ( U t:, IfC, IOLE, NSYM, lEI, IEl!, KLOCe ,ICLO . VKE, VPE. ASSD
1
2
3
1 YKCS, VKCD , VKCI , H e ) ASSD
c --- __ ___ __ _ __ __ _______ ASSD
ASSEMBLACE D'UNE MAfRI CE ELEMENTAIRE (S'"ETRIOUE ou HON) ET/OU
D'UH VECTEUR ELEMENTAIRE . LA HATRI CE EST SECMENTEE SUR DI SQUE
ENTREES
ASSb
ASSD
ASSD
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
c
IKG SI IICe . EO. 1 ASSEMbLACE DE LA HATRICE ELEMENTAIRE KI: ,1.88 0
1
!PO SI Ife. CO.I ASSEMBLAce ou VECTEUR ELEHENUtRE fE ASSD
8
,
IOLE
NSYM
IEI , IE2
" LOCE
n.
NOHBRE DE D. L. DE L' ELEMENT ASSD
m
'"
SORTIES
O.PRODL EHE SYMETRIQUE , j.PROBLEHE NON SYMETRIOUE
Pl ENIERE ET DERNIERE COLONNE DE KG A ASSEMBLER
VECTEUR DE LOCALI SATI ON DE L'&LENENT
HAUT EURS CUMULEES DE COLONNES DE KG
ELEMENTAIRE .C(PLEINE OU TRIANGLE SUPERIEUR
PAR COLONNES
VECTE UR PE
VKGS,VKGD,VKGI GL0 8ALE (LIGNE DE CIEL )
(SYKETRIOUE OU NON )
VFG VECTEUR SOLLICITATI ONS CLOBAL
ASSD 10
ASSD II
ASSO 1 a
ASSD 13
As e D \4
ASSD 16
ASSD 18
ASSD 17
U SD 18
ASSD 19
ASSO 2 0
IMPL ICn RE/IL8(AII , O Z) ASSD 22
DIMENS I ON KL OCE (11 ,KLD ( 1 ), VKE ( I) , VrC ( 1 ), VK GS ( l l ,VICGD( I), AS SD 113
1 VIC C I(l),YrG(l ) ASS D 24
C .. . .. . . . .......... . .... ... ...... ... . . ... ......... .. . . . .. . .... . ... .. ASSP 26
c
C . ASSEMBLAGE DE LA HATRICE ELEMENTAIRE
c
I F (IICG . HE . I) GO TO 10 0
IOBLOC.KLD(IE1 }- 1
I EOO .. I OLl:
IEO l .. 1
... .. . . POliR CHAOUE COLONNE DE KE
DO 80 JO_l, IDLE
ID
Ir ( NS YIC.NE.I) IEOO_ J O
n .. nOCE(JO)
IF(1L) 80,90 , 10
10_XLD( JL.I)IOBLOC
IEO.oIEOI
10 .. \
GO TO 80
C . POUR CHAQUE LI GNE DE XE
DO Ba ID_l, IOLE
IL_KLOCE(ID)
rF(NSYM . EO.I ) GO TO 30
IF(IDJ D) 30,aO,ao
20 10 .. JD
30 JF(JI..) 80 . 80 , 40
40
Ir ( IJ ) 80,"0,110
C TERNES DUGONAUX DE XG
60 VKOD( IL)_VICGD(IL).VXE(IEO)
GO TO ID
C .. TCIMES DU TRIANGLE S UPERIEUR DE XC
60 1-10 - 11
VKGS(I ) .. VKGS( I ) .VKE(IEO)
IF ( NS YM . NE . I) GO TO 80
C TElMES DU TRIANCLE INFERIEUR DE KG
IEOt_(ID.l)IDLE+JD
80 IEO_IEO.I0
00
c
1&01_1&0I+1EOO
C ASSEMBLACe DU v eCTEUR ELeMENTAIRe
Figure 6.23. (Suite) .
ASSD 26
ASSD a1
AS SD 38
ASSD ait
ASSD 30
.U SD 3 1
ASSD 3a
AS SD 33
ASSD 34
ASSD 36
ASSD 36
ASSD 31
ASSO 38
ASSD 38
ASSD 40
ASSD 41
ASSD 42
ASSD 43
ASSD 44
ASSD 48
AS SD 4S
ASSD 41
ASSD 48
ASSO U
ASSD 60
ASSD SI
ASBD sa
ABBD 83
ASSD S4
ASSD 88
ASSD 81
ASSD 81
ASSD 88
AS SD 69
ASSD 60
ASSO 61
ASSO 6a
ASSO &3
ASSO 64
486 Mthode des lments finis
c
100 If(IrC . Mt . l) co ta 130
DO 120 ID.I, JDLE
IL_KLOCI:(ID )
Ir(IL) liO,IZO,110
110 YrC(IL).YrC(IL)+VFE(ID)
130 CONTINUE
130 RETURN
CND
AS5!) ..
Asse
" ASSD 67
ASSD
" ASSD ..
AS50 70
ASSO li
ASSD
" ASSD Tl
Figure 6.23. (Suite).
6.5.3.5 Bloc 'NlIN'
La structure du bloc 'NLlN' est conforme la structure dcrite au para-
graphe 6 . 5 . 3 . 1. Tous les sous-programmes de construction des matrices
globales, de rsolution et d'impression sont les mmes que dans le bloc
'LlNM'; ils ont t dcrits au paragraphe 6,5,3.3.
Fonction
Ce bloc rsout un problme non linaire par l'une des mthodes de type
Newton-Raphson dcrites au paragrapll e 5.3.
Organigramme
r----'
1 Programme 1
1 principal
L ____ ..J
INIT
NORME
ASNEWT
NEWTON communs;) tOus
[
~ ~ ~ t Sous-programmes
les blocs
d'excution
Sous-programmes
BLNLIN
ESPACE
EXNLlN
: cre les tables VKGS, VKGD, VKGI, VFG, VKE, VFE, VRES,
VDLE, VDLG, VME (fig. 6 , 24).
: (fig, 6 , 5).
: met en uvre l'algorithme de la figure 5.19. Il lit les variables
DPAS, NPAS, NITER, EPSDL, IMElH, OMEGA dfinies
par la figure 6 , 9. Puis il excute la mthode de Newton-
Raphson en bouclant sur les pas de sollicitations et les
itrations d'quilibre (fig, 6.24).
Technique de programmation
487
NEWTON
: excute les oprations de la mthode de Newton-Raphson
correspondant une itrati on (fig. 6.24).
ASNEWT
: assemble le rsidu et la matrice globale (matrice [KJ ou
[K,l) (fig. 6.24).
INIT
MAJ
: initialise un vecteur (fi g. 6.24).
: excute l'opration vectorielle (fig. 6 .24) .
( V, ) = X, ( V, ) + X, ( V, )
NORME : calcule la norme (fig. 6.24)
(
< bU > { t!.U ))'11
< U >{ U} .
Remarques
Selon le type de problme non linaire tudi, nous pouvons modifier
la mthode de rsolution (NEWTON) et le type de norme choisi (NORME).
c
c
SUBRout INE ~ H ~ I N
APPEL DU BLOC 'HLIH'
RESOLUTION D'UN PROBLEKE STATIONNAIRE NOH LINEAIRE
DLHL
8LM1.
81."1.
,
,
CM ______ 81."1.
,
I"PLI CIT REAL.S(AK,OZ)
REAL-. TBL
COHHOH/ELEH / NUL ( 4 ), HE
CONHONJASSE/ NSYH, NKG,HKE,HOLE
CONNON/RESO/ KEO .
COHHONjHLIH/EPSDt.,XHORH,OHEGA,XPAS,OPAS ,DPASO,NPAS,IPAS,NITER,
1 ITER,IHETH
BLM\. 6
IH. NL 7
aLNt. 8
aLML 9
BLHL 10
Bt.NL Il
BLNL 12
COHHOHjES/ H. HR , NP, Hl , HZ , H3 , H4 SLNL 13
COHHON / LoC/LCORG,LDLNC,LNEO,LDIHP,LPRNG , LP'EG,LLD,LLOCt , LCORE,LHE ,BLNL 14
1 LPRNE, l.ru:t;, LDLE , LU, l.YE , l.KCS , LKCD ,l.ICC I , H C ,l.RES, LOLe , LHE IILNL 16
COHHON VA (1 ) BLNi. 16
DIHENSI ON TBL(IO). IN( 8) , XIN(3) ftL"l. Il
DATA T8L/ 4NKCS , 4NXCD ,4NICCI ,tNF'C , 4NKt BLNL 10
1 4NFt ,4HRtS ,4NDLE , 4NDLG ,4NHt / eUI L 19
C , . ,", - - _ ... _. - _ ... _ . .. . . . . . - _. _ - -. _ ..... . _ ..... _ . BLNL 20
IF'(HI.EO .O) Hl .. HR
IF(H2.EO .0) HS_HE
VRITE(HP,2000) H
2000 FORHATU/' Rt:90LUTION NON LINt:AIRE (H.',13,')'/IX,2J('.'
C ALLOCATION O'ESPACE
IF'(LKCS . EO . I ) CALI. ESPACE(NKC,l,TBL(I),LICCS)
1f'(LKGD. tO .I) CALL ESPACE(NEO,I,T8L(2),LICGD)
Ir( NSnI . EO . I . AND . 1,.1(01 . &0 . 1) CALI. ESPACt( NKC, l , T81.(J ) ,UCI )
1f'(Lf'C . EO . I) CALL ESPACE (NEO,I,T8L(4),t.PC)
1f'(l.KE .tO. I ) CALL ESPACE(MKt,I , TBL(8),LKE)
1f' ( LFE .EO . I) CALI. ESPACE(NDLt,I,T8L(6),Ln:)
If' (LRtS.EO. I ) CALL tSP ACt(NEO , 1 ,T8L( 1 ),LltES)
Figure 6.24. Bl oc NLiN.
BLHL 21
8LML 22
8LNL 23
BLNL 24
BL"L 2:6
8LML 26
BLML 21
BLHL 2B
8LHL a9
BLHL 30
BLNL 31
BLHL 3 2
488
Mthode des lments finis
IrO. OI.E . EO . I) CALl. ESf'ACE(NDl.l: . LTRl,(B) , I.Ol.E) Bl.Nl. 33
Ir(LOLG . EO . I) CALI. ESPACI!(HEO.I,TDL(9) , l.DLC) Dl.tlL 34
IP(LHE . EO . I) CALL ESPACE(NKE.l,TBL(IO) , LME) 8LtlI. 36
c ... eXECUlION DU Bl.OC BLHL 3&
c
c
CALL &XHLIN(VA(LCORC),VA(LOLNC).VA(LDIKP),VA( LNEO),VA(LLO), OLMi. 31
1 VA(LLOCE) , VA(LCORE),YA(LPRHEl,VA(LPREE),YA( LKE),VA(LXEl.YA(LHE),8LNL 38
t VA(LrC) , VA(LDLE),VA(LKGSl,VA{LKCD),VA(LKCI).VA(LrO) , VA(LItS), OLMI. 39
3 VA(LOLO ) 8 L N1. 40
RETORH 8LMI. 41
E"
SUBROUTINE CKNLIN(VCORG,KOLHC,VOIHP,KHEQ,KLD,KLOCE,VCORE,VPRNE,
VPRCE,KNE,VKE,YHE,VPE,YOLE,VKCS,VKCD,vKcI,vro,VRES,YOt.Cl
EXECUTiON DU BLOC 'HLIN'
RESOLUTION D'UN rROOLEHE STATIONNAIRE NON LINCAIRE
BLNL U
EXML
EXNI. 2;
EXNL.
EXNL
IMPklCIT l EAL-S(A.H,OZ) EXNL 7
COMt1ON/RESO/NEO EXNL 8
COMMON/ COND/NCL T, NCLZ, NCLNZ EXNL. 9
COMMON/ASSE/NSY" EXNL 10
COMMON/NL I N/ EPSDL, XNORM, OMEGA, XPAS, DrAS, orASO, NI'AS, IPAS, NITER, EXNL Il
lITER ,IM&TH EXNL 12
COMMON / ES / H,HR,Hr,HI,M2,H3,H4 EXNL 13
DIMENSION VCORC(I) , ICOLNC(I),VOIHP ( I),ICNEO(I),lCl.O(l ) ,KLOCE(I ) , EXNL 14
1 VCORE(I),VpRHE(I) , VPREE(I ), LNE(l) , l.ICE(I),LME(I) , LrE(I) , LOLE(I), EXHL. 16
Z YIC CS (I),VICCD(I),VXCI(I),VFC(I),VRES(I) , VDLC(l) EXNL 16
DATA ZEROIO , OO I EXHL Il
C" , , .. . .. . EXHL 18
DPASO.lCRO EX"L 19
xrAS.ZERO EXHL 20
IrA8.0 EXNL 21
C . . . .. .. LECtURe DES DeGRES De LIBCRn; IIUTtAUX SUR LE FICHIER M3 EXNL. 22
tr ( M3 , EO ,Q ) GO TD 10
REflNO 1013
REAO("3) ( YOL<:(I),I_I,NEO)
C LIRC UNe CARTE DErtNISSANT UN ENSEMBLE DE PAS IDENTIOUES
10 II&AO(M1.1000) DpAS,I1,I3,I3,X1,X2
1000 POR"AT ( Fl0,0,316,2PI0.0)
c
Ir(DpAS , EO,ZERO) GO TO 140
Ir(II . CT.O) N!'AS_II
Ir(12 . CT.O) NITER_I2
Ir(13 . CT.0) IMETM_I3
IP(Xl.CT.ZERO) ErSDL_XI
Ir(XZ .CT.ZERO ) OMEGA_X2
C BOUCLE SUR LES PAS
c
DO 130 IP_I , NPAS
IPAS.IPAS+\
XPAS.XPAS+DPAS
YIIIT&(MI' , 2000) IPAS , OPAS , XPAS,NITER , IHETH,EPSOL,OMECA
3000 PORHAT(/U , 13(' '),'PAS NUN&RO (IPI,S) :' ,1811
1 IU,'ACCROISSeM&NT (Ol'AS).' ,&12 . 8/
2 IU,'ltlY&AU TOTAL (XI'-'8) .. ' ,&12 . 8 /
3 IU,'HOHBRE D ITERATIONS (HIT&R). ' ,IU/
4 IU,'H&THOD&HUHERO (IHtTH) : ',IU/
a lU,'rR&CISIOH (&1'801. ) . ' , &12.SI
a lU, 'fACTEUR Dt SURREl.AXATION ( OMCGA). ' , EI2 . B/)
c
c BOUCL.E SUR LES IT&RATIONS D'EQUILIBR&
c
DO 110 J1'ER_l,NITER
C CHOIX DE LA HETHODE
IF(JHETH . GT . 3) GO TO 20
Figure 6.24. (Suite).
EXNL Z3
&XHl. 24
&XNL 2B
EXHL 26
EXHL 27
&XHL 28
EXHL 2"
EXNL. 30
EXHL. 31
EXHL 3Z
EXHL 33
EXNL 34
EXNL 36
EXNL 36
EXNL 37
&XHL 38
EXNL 39
EX"L 40
EXHL 41
EXNL U
EXNI. 43
EXNL 44
EX HL 48
EXHL 48
EXNL 47
EXNI. 4S
EXNL 49
&XHL 60
EXHL 61
EXNL S3
EXHL 63
EXHL 54
Technique de programmation
C IIETHODE:S DE: TYPC IfE:YTOU
CI: ,
1 XNC . YKC.VHC , VrE , YDLC , VKGS , YKCD,VKCI . vrC , VRCS,YDLG)
co TO ] 00
C AUTRI:S HCTUODES ..
3D CONT INUE
YRITC(Hr,3010) IIICTII
Z010 POII HAT( CRREUII, IIETIIODE:',13,' INCONNUE')
STOP
C CHCUL DE NORHE
100 CALL NORMC(NCO . VIICS , VOLC,XNORH)
Ir(" . CT. O) YRITE(HP.ZOZO) ITER , XIIOR"
3020 rOR"AT( SX,' ITCRATI OH (ITER) : ' . 1!, HORlle (JNOR") .. . CI 2 . 5)
If(H . GE.Z) CALL PRSOL(KDLNC.VCORG,VOIMP,INEO,VOLC )
Jf(XHORH.LE.EPSOL) GO TO IZO
110 CONTINUE
tTEII_NITER
c .. .... ru DU PAS
1 ZO DrAso.orAS
YRJTE(HP , Z030) ITER . HITER
2030 J'OR"AT( /1 OX, 14 .' tTl:RAT JOHS Ef"PECTUEES SUR'. 14f)
lr(M . LT .Z ) CALL PRSOL(IDLHC . YCORC,YDI"P.XHCO . YDLC)
130 CONTINUE
CO TO 10
C S AUVEGARDE OC LA SOLUTION SUR t'lCHIER H"
1"0 JP(H".UE.O) YRITE (M.) (VOLG(I),I-l,NEO)
RETURH
c
c
c
c
'"
SU8ROUTIHE NEYTOII(VCORC.KDLNC , VDIKP.KMEO , KLD. ILOCt.VCORC,YPRHE .
VPRCC , KNC,YXE,VHE,vrE,vDLE.VICS , VKCD,Y1CI.VPC.VRES , VDLCl
ALCORITUHE DES MCTHODes DE TYPE NEVTONRAPHSOIi
IM&TII. &0.1 CALCUL DE K A CHAOUE lTERATION
IHETH.EO.Z K CO NSTANTE
IH&TH. EO. 3 K RECALCULEr. AU DEBUT DE CIIAOUC PAS
EXNL
E:XHL
EXli L
ElIHL
CXHt..
CXNL
eXHL
CXNL
E:XliL
eXNL
EX HL
&X HL
tXNL
EXNL
EXNL
eXNL
r.XNL
CXNL
eXNL
CINL
tUL
CUL
tXNL
eXNL
CXNL
CXNL
CXNL
CXNL
Mcn
lIcn
NEIIT
NEIIT
NEIIT
NEIIT
489
55
" 51
5.
"
"
'1
"
" 54
"
"
" ..
" 70
71
7Z
73
"
"
" 77
"
79
.0
81
"
,
B
B
7
C_. ___ _ .. __ ... ____________ .. ___ ........... .. __________ NEVT 8
IHPLICIT REAL-D(A H.OZ) HEIIT 9
CONNON/ASSC/HSYK . HIC Mtn 10
COHHON/IiESO/NEO HEVT Il
COHMOH/NL 1 N/EPSOL. XHOIIM, ONEGA, XPAS, DP,\S. Dr,\SO, liPAS. IP'\s. NJTEII, NCVT 12
1 lTER. IHETH liEn 13
COHHON/ES/H,HR.KP NCVT 14
DIMENSION VCORG(I).IOLNC(I).VDIHP(l),KHEO(l),ICLD(I),KLOCE(I), NEIIT IS
1 VCORC(I).VPRME(l),VrREE(l),KliE(I),VKE(I),VH.E(ll,VPE(I).YDLE(I), MEIIT 18
li VKfiS(I) , VXCD(I),"KGI(1).vrC{1) . VIttS(I).VDLC(I) NEIIT 17
DATA ZERO/O . DO/ . UN/I . DO / liCIIT 18
C , ... . .......... . . ... ........... .............. .... .NEV1 10
C DECISION DE JlEASSEHBLAce DE LA HATUCE CLOBALE NEVT 20
1I(T .. 0 NCVT 21
IP(IH[TH.EO.I) GO Ta 10 Men 23
IP{lPAS.EO.I.AND.ITEII.EO.I) CO Ta la Men 33
lr(JHETH.EO.3.ANO.lTER.EO.l) GO Ta 10 MEn 24
GO TO ao MEn Z8
10 In_1 liEn aa
C INitiALiseR A zeRO LA KATRlce GL08ALE SI OM DOIT L'ASSEMBLER NEYT a7
ao 1f'(IXT . EO.O)CO Ta 30 NUT a8
CALL INIT(Z&RO,NKG,VI(CS) NCVT a9
CALI. INlT(ZERO , NEO,VKGD) NEVT 30
IP(HS1N.EO.l) CALI. tNIT{ZEIIO.MKG,VIOl) NCYT 31
C rLACeR LES SOLL I CITAT IONS DANS LE RESIDU Ncn 33
30 CALL HAJ(XPAS,ZERO,NEO.VPC,VRES) NEYT 33
c . , ASSEMBLER LE RCSIDU CT ,EVENTUELLEMENT LA HArRICE fiLOUt.E NEn 3.
CALL ASNEVT{TIT . Kt.O,YDJKP.ILOCt.YCORE.VPRNE.VPREE.IHt.Y1C.VPE. NCfT 38
1 YKcs . vrCD . VICI,VDLC ,V DLe , VRt S) NtYT 3&
Figure 6.24. (Suite).
490 Mthode des lments finis
C RESOLUTION N&WT 37
SOL(VKGS,VKGD,VKGI,VRES,KLO,NEQ,HP,IKT, I,NSYH,ENERG)
IF(IKT.EO.l .... ND.H.GT.l) CALI. PRPVTS(VKGD)
NEIIT
NEVT
38
"
c .. _. HISE'" JOUR DE LA SOLUTION
CALL HAJ(OHEGA,UN,NEO,VRES,VDLG)
RETURN
NElIT
liEVT
NEVT
40
41
42
END
SUBROUTINE ASNEIIT(IKT,KLD,VDIHP,KLOCE,VCORE,YPRNE,VPREE,-
KNE,VKE,VfE,VKCS,VKGD,VKGI,VfC,YDLE,VRES)
NEIIT
ASNE
ASNE
43
, c ____________________________________________________________________ ._.ASNE 3
c
c
c
ASSEMBLAGE DES RESIDUS ET DE LA HATRICE GLOBALE (SI IKT.EO.I) ASNE
DANS LA HEHE BOUCLE SUR LES EI.EHENTS (POUR LA HETHODE DE NEVTON ASNE
RAPHSON) ASNE
,
c_. ______ ._._. _______ ._ _ _ _ _._.---------
,
7
9
IHPLICtT
COHHON/ELEM/NELT,NNEL,NTPE,NGRE,HE,NIDENT
COMHON/RESO/NEO
COMHON/RODT /1 EL, ITPE, ITPEI , IGRE, IOLE, ICE, 1 PRNE, 1 PREE, INEI., IDEO,
l , ICOO
COMHON/ES/H, MR, HP, Hl ,H2
DIHENSION HD(l), VOIMP( 1) ,KLOCE( 1), VCORE( 1), VPRNE( 1), VPREE( 1),
1 KNE(I),VKE(I),VfE(I),VKOS(I),VKOO(I),VKGI(I),VfG(I),VDI.E(I),
2 VRES(l)
10
Il
" 13
..
" 16
C
17
1.
l'
go
C POSITIONNER DEBUT I.E fICHIER DES ELEMENTS (M2)
REIIIND H2
C BOUCLE SUR LES ELEHENTS
'1
00 40 IE_I ,NELT 22
G LIRE UN ELEHENT 23
CUL ROELEH(H2,KLOCE,VCORE,VPRNE,VPREE,KNE) 24
C DES fONCTIONS SI 25
If(ITPE.EO.ITPEI) CO TO ID 26
ICOO.2 27
ELEHI.B(VaORE,VPRNE,VPREE,VDI.E,VKE,VfE) 38
a .... EXTRAIRE LES 0.1.. DE L'ELEMENT DE VfC 39
10 OLELM(KLOCE,VfO,VDIMP,VOI.E) 30
C CUCUI.ER LES RESIDUS ET LEURS SIGNES 31
ICOD.6 32
ELEHLB(VCORE,VPRNE,VPREE,VOLE,VKE,VfE) 33
00 20 1_1, IOLE ASNE 34
20 VPE(I).VrE(l) ASNE 36
a ASSEMBLAGE DE LA MATRICE GLOBALE ASNE 36
If(IKT.ED.O) GO TO 30 ASNE 37
ICOO .. 3 ASNE 38
C ASSEMBLAGE DES RESIDUS ET DE GLOBALE ASNE 39
CALL ELEHLB(VCORE,VPRNE,VPREE,VDI.E,VKE,VPE) ASNE 40
.30 CALL ASSEL(IKT,I,IDLE,NSYM,KLOCE,KLO,VKE,VfE,VKGS,VKCO,VKGI,VRES) ASNE 41
c
ITPEl.olTPE
RETURN
END
SUBROUTINE INIT(X,N,V)
INITIALISATION DU VECTEUR V A LA X
A8NE 42
AS NE 43
AS NE 44
INIT
1 NIT
IHPLICIT INIT
,
3
,
DIMENSION V(I) IN li
a .. .. INtT
,
7
9
DO 10 1 .. 1, N INJT
ID V(I)_X JNIT
RETURN INIT
END INIT
Figure 6.24. (Suite).
10
Il
c
c
Technique de programmation
PU&ROUTIHE HAJ(XI ,X2 ,N,Yl,V2)
fXECUT10H DE L'OPERATION VECTORIELLE : Y2_XI"YI 12"V2
XI,U:SCALAlR&S VI,V2 : VECTEURS
KU
KU
KA>
491
3
c --------- ------------.- -._ ________ ___ __ HAJ S
l"rLI CIT REAL-8(AH , OZ)
DIM&NSION VI(I) .VZ( I)
KA>
KA>
7
c .. . ..... .. .. ... . ..HAJ B
DO 10 ' .. t.N HAJ 9
10 Y2(J) .. XPV1{I).Xll-Y2(J) HAJ 10
RETURN HU Il
&ND HAJ 12
SU8ROUTJNE NORHE(N,VDEL,V,XNORH) NORH
c
CALCUL DU RAPPORT DES LONGUEURS DES VECTEURS VDEL ET y NO RH 3
c __ ._ ... ___ _____ _________ ._. ____ __ .. ____ HORH 4
IHPLIelT REU"S(AH,OZ) HO RH S
DIHENSION VDEL(I),V(l) HORH 6
DATA ZERO/O.DO/,UH/l.DO/,rAC/l.D31 HORH 7
HORH 8
c ....... . .. .. .. .. ... ... .. . ... .. HORH
CI - ZERO HORH 10
ca" ZERO MORH 11
OOIOI.oI,N MORH 12
\0
CI.Cl .YOEL(I ) -YDEL(I)
ca-ChY( J PV( 1)
C_Cl -rAC
" ( C2 . LE . C) ca_UN
XNDRH_SORT(C1/C2)
RtTURN
<HO
MOR)1 13
HORH 14
HORN 16
HORH 16
NO RN 17
HORN 18
HORN 18
Figure 6.24. (Suite).
6.5.3.6 Bloc 'TEMP'
Le bloc 'TEMP' est trs semblable au bloc 'NLlN'; il n'en diffre que par
les sous-programmes NEWTON (remplac par EULER) et ASNEWT
(remplac par ASEULR).
Fonction
Ce bloc rsout un problme non stationnaire, linaire ou non linaire,
par l'une des mthodes de typo EULER dcrites au paragraphe 5.4 (algo-
rithme de la figure 5 . 21).
Organigramme
r-----'
1 Programme 1
1 principal '
L.. _____ .J
INIT
NORME
ASEUlR
communs tous
tes blocs
d'excution
492
Mthode des lments finis
BLTEMP, EXTEMP : sont pratiquement identiques aux sous-programmes
correspondants BLNLlN et EXNLlN (fig, 6.25).
EULER
: excute les oprations de l'algorithme d'Euler
correspondant une itration (fig. 6.25).
ASEULR : assemble le rsidu et, ventuellement la matrice
globale de l'algorithme d'Euler (fig. 6,25),
INIT, MAJ, NORME : (fig. 6.24).
Remarques
Toutes les autres mthodes de rsolution de problmes non stationnaires
(Runge-Kutta, prdicteur-correcteur, Wilson ... ) peuvent tre incluses en
rajoutant des sous-programmes qui s'excutent la place de EULER.
Il faut ventuellement ajouter quelques vecteurs pour stocker la solut ion
correspondant quelques pas prcdents.
SUBROQT IN& <EHP BLfE
c-------------.--------------------------------------- ____ ......... __ ... 8LTI':
c
c
APPEL DU BLOC 'TEMP ' BLT!:
Re SOLUTION D'UN PROBLEHE NON STATIONNAIRE LINEAIRE ou NON BLTE:
lHPLI CJT R&AL - S(A.H,O-Z) BLTE
REAL-" TBL BLTE
COHHON/ELEH/NUL(4),HE BLTE
COHHON/ASSE/NSYH,NKG,NKE,NDLE BLTE
CONNON/RESO/NEO BI.T&
CONNON/HL 1 N/EPSDI.., X HORH , OHEO A , XPAS , DP AS. OP ASO, NP AS J PAS ,IH TER, B L TE
1 nCR,INtTH Il!..TE
':UHHON/CS/H,HII,HP,Hl,H2,H3.K4 BLTE
COHHON/LOC/LCORG ,LDLNC,LHCO,LDIHP,LPRNC,LPREC, LLO,LLOCE ,LCORE,LN&,BLTE
1 LPRN&, LPR&&, LDL&, LKE, LF'E, LKGS, LKeD, LKGI ,LI'G, LitES, LOLa, L.H& , 8LTE
1 LOL.EO,LoLCO,Lrco 8LT&
COHHOH HO) 8LTE
DIMENSION TBL(l3),IH(3),xiH(3) 8L1&
DATA ,4HKGD ,4HKGI ,4HI'a ,4111CE , 8loTE
1 4Mft ,4HOL& ,4HOLa ,411M& ,4HOL&O,4HOL.OO,4Hroo / 8LTE
C. .. . 8LTE
l'(HI . &O .O) MI .. HR 8LT&
Ir(H3 .&0 .0 ) Ha_HE 8L1&
VRltE(HP,aOOO) H BLTE
3000 rOMHATCl!' RESOLUtION NON StATIONNAIRE (H_'.IZ,')'/IX.33( ' .' OLlE
G ALLOCAnOH D'ESPACE OLlE
11'(I.K05 .&0 . 1) CALL ESPACE(HKC , I , T8L(1),LKCS) BL1&
II'(LKOO .&O. I) CALL ESPACE(HEO , I,T8L(3),LKCD) 9LTE
II'{HSYH .EO. l . ANO . LKaI . EO . l) CALL ESPACE(NKG,l,TBL(3),L.KCl) BL1&
Ip(LI'G.CO.I) CALL EsrACE (tU;O,I,TBL(4 ), LI'C) 91.1&
li'(L.KE . EQ.l) CALL ESPACE(NKE,l,TB1.(5),LKE) B1.TE
If(L.f'E. &Q.I) CA Llo ESrAC&(ND1.E,I,TBL(6),LI'E) BLTE
11'(L.RES . EO.l) CALL ESPACE(NEO,I,TBL(7),LRES) BLfE
H'(LOLE . EO . I) CALL ESPACE(NDLE,I,TBL(8),1.DLE) B1.TE
Il'fLDL.G . EQ . I) CALL ESPAC&(NEO,I,TBL(9),LDLa) 8LT&
Figure 6,25, Bloc TEMP.
,
3
,
7
10
1 1
12
i3
14
15
i6
17
18
"
ao
21
..
" ..
"
"
"
"
" 30
31
32
33
34
38
=
Technique de programmation 493
IF'(LHE.EO.l) CALI, ESPACE(NIOO:,I,HIL(lO),LHE) 8LTE 36
If'(LDLEO,EO.l) CALL ESr,o.CE:(NOLE,I,TB1.(l1),LDLEO) BLTE 37
IF'(LOLGO.EO.l) CALL ESPACE(NEO,I,TBL(12),LOLGO) BLTE 38
IF'(LF'CO.EO.l) CALL ESPACE(NEO,I,TBL(13),LrCO) BLTE 39
c E:XECUTI0N DU BLOC 8(.1E 40
c
c
CALL EXTEHP(VA(LCORG), VA(LOLNC), VA(l.DIHP), VA(LNEO), H(LLO), 8(,1E 41
1 VA(LLOCE), VAC LCORE), VA(LPRNE), VA(LPREE), VA{LNE), VA(LKE), V!I(LHE) ,BLTE H
2 VA(LF'E),VA(LDLE),VA(LKGS),VA(LKGD),VA(LKGI),VA(LF'C),VA(LRES), 8LTE 43
3 v,o,,(LOLG),VA(LDLEQ),VA(LDLCO),VA(LF'CO BLTE 44
RETURN Bl.TE 46
'"'
SUBROUTINE EXTEHP(VCORG,KDLNC,VDIHP,KNEa,KLD,KLOCE,VCORE,VPRNE,
VPREE,KNE,VKE,VHE,VF'E,VDLE,VKGS,VKGD,VKGI,VPG,VRES,VOLG,
Z VOLEO,VOLGO,VPGO)
EXECUTION OU BLOC 'TEHP'
RESOLUTION D'UN PROBLEHE NON STATIONNAIRE LINEAIRE OU NON
fI[.TF: 4/!
EXTE
EXTE
EXTE
EXTE
BXTE
1
,
3
5
6
IHPLICIT REAL-S(AH,O,Z) EXTE 6
COHHON/RESO/NEO EXTE 9
COHHON/CONO/NCLT,NCLZ,NCLNZ EXTE 10
COHHOH/ASSE/NSYH EXTE II
COHHON/NL 1 N/EPSoL, XNORH, OHEGA, XPAS, DPAS, Ol'ASO, NPAS ,1 PAS, NITER, EXTE) Z
1 ITER,IHETII EXTE 13
COHHOHIBS/H,MR,MP,MI,H2,H3,H4 EXTE 14
DIHENSION VCORG(I),XDLNC(1),VDIHP(I),XNEO(1),KLO(1),KLOCE(11, EXTE 16
1 VCORE(I),VPRNE(l),VPREE(l),KNE(l) ,VKE(l),VHE(l),VPE(I),VDLE(l" EXTE 16
2 VKGS(l),VKGO(1),VKGI(I),VPG(I),VRES(1),VOLG(1),VDLEO(1), EXTE Il
3 VOLGO(l),VPGO(l) EXTE 16
DATA ZERO/O.DO/,UN/l,DOI EXTE 19
C...,. . EXTE 20
lIPASO_ZERO
XPAS"ZERO
IPAS"O
C, L&CTURE DES DEGRES DE LIBERTE INITIAUX SUR LE PICHIER H3
IP(M3.EO.0) GO TO 6
REVIND H3
READ(H3) (VDLG(I),I"l,NEO)
C SAUVER L'ET"'T DE SOLLICITATION DE REfERENCE
8 C"'LL HAJ(UN,ZERO,NEO,VfC,VPGO)
C.. LIRE UNE CARTE DEPINISSANT UN ENSEHBLE DE PAS IDENTIOUES
10 REAO(Hl,1000) DP"'S,Il,12,13,Xl,X2
1000 PORHAT(PIO.0,3I5,2fI0.0)
c
IP(OPAS.EO.ZERO) GO TO 140
IP(Il.GT.O) NPAS"Il
IP(12.GT.0) NITER_12
IP(13.GT.0) IHETH_I3
IP(X1.GT.ZERO) EPSOL .. Xl
u(Xa.Nt;.zt:IW) 011I;G ..... X2
C BOUCLE SUR LES PAS
c
DO 130 IP_I, NPAS
C"'LL IHIT(ZERO,NEO,VfG)
IPAS"IPAS ... )
XPAS_XPAS ... DPAS
VRITE(HP,2000) IPAS,DPAS,XPAS,NITER,IHETH,EPSOL,OHEG'"
2000 fORHA'i(/lX,13(''),'PAS NUHERO (IPAS):',I6/1
l I4X, 'ACCROISSEHENT (OPAS),,' ,E12.51
2 I4X, 'NIVEAU TOTAL (XP"'S) .. - ,E12.61
3 I4X, 'NOMBRE 0 ITERATIONS (NITER) .. ' ,1121
4 14X _ 'METHODE NUMERO (IMETH) : ' ,1121
5 IH, 'PRECISION (EPSOL).' ,E12.81
8 IH, 'COEPrICIENT ALPHA (OI1EGA) .. ' ,E12.5/)
Figure 6.25. (Suite).
EXTE 21
EXTE 22
EXTE 23
EXTE 24
EXTE 26
EXTE 28
EXTE 27
EXTE 28
EXTE 29
EXTE 30
EXTE 31
EXTE 3Z
EXTE 33
EXTE 34
EXTE 36
EXTE 36
&XTE 37
EXTt; 3S
EXTE 39
EXTE 40
EXTE 41
EXTE 42
EXTE 43
EXTE H
EXTE 45
EXTE 46
EXTE H
EXTE 48
EXTE 49
EXTE 50
EXTE 51
EXTE 82
EXTE 63
494
Mthode des .lments finis
c
C BOUCLe SUR LES ITERATIONS O'EOUILIBRE
c
DO t '0 ITER .. I,H1TCR
c . . . . .. CHO III OC l.A MEtHODE
IP(lKETII.Gt . 3) GO TO 20
c . . . . . . HETHODtS DE TYPE: E:ULER
CALL EULER(YCoRG ,KDLNC,YDIHP,KNEO ,KLD , KLOCt,YCORE,YPRNt,YPREE.
1 KHt, 't'Kt. VME. vrE, VOLE, 't'Kas, 't'KeD, VKGI, VFC, 'iRES, VOLe,
2 VOLED,VOLGO,VrCD)
co T O 100
. _..... AUTRES
20 CONT 1 NUE
VRJTCCHP,3010) IHETH
2010 rORI'Io\ T (' eRREUR. HETHODE:',I3,' INCONNUE')
STOP
c .. .... CALCUl. Dt L .... NORME
100 CALL NORHE(HtO,YII:ES,VOLC,KHORH)
Jr(M.CT . d) YRJTE(HP,ZOZO) ITER,XIIO!!:H
2020 rORHAT(BlC,'IT&RATIOH (17I:R):',13,' NORME (XNORH) .. ' ,&13 . 8)
treM . GE . a) CALL PRSOl.(KDLNC,VCORG,VDIHP,KHEO,VOLG)
IP (XHORH.LE. EPSDL) GO TD 1200
11 0 CONTINUE
C rlN DU PAS
120 OPASO .. OPAS
CALL HAJ (UN,ZERO , NE O,YDLC , YDLCO)
CALI..
l30 COHT JHu t
co TO 10
c . ...... S AUVECAROr. m: 1.1 SOI. UTION SUR rl CNIER M4
140 ,r( M NE . O) VRITE(H.) .. I ,"EO)
RETURN
'HO
SUBROUTINE EULER(VCORC,KDLNC,VDIHP,KNEO,KLO,rLOCE,YCORE,VPRNE,
1 VPREE,kNE , VkE,VHE,VPE,VDLE,VKGS,VKGD,VKCl,vrC,VRES,VDLC,
8
Ene
CXTC
UTe
EnE
CXTE
cnE
EXTI:
EXTt
EXTE
EXTE
EXTe
EXTE
EICTE
EXTE
EXTE
EXTE
EXTE
EXTE
EXTC
EXTE
EXTE
EXTE
EXTE
EICTE
EnE
EUE
cnE
CXTC
Enc
EXTC
EXTe
ene
EXTE
EU LE
EU LE
EULE
..
"
..
" ..
..
60
61
"
"
..
"
" 67
68
69
70
71
" 13
,.
"
" 77
"
" B.
"
"
.,
..
"
"
,
3
C ALGORITHME DES HETnODES DE TYPE EULER (IMPLICITE,EXPLI CITE ou CULE 8
C HIXTE SELON OMeGl) POUR DES PROBLEHES LINeAIRES ou NON LINEAIRES EULE 6
C LE PROSLEHE NON LINEAIRE EST RESOLU PAR UNE METHODE 0& TYPE EULE 7
C NewTON . RAPHSON EULE S
C IHETH ,CO. I NEYTON.RAPHSON STANDARD EULE 9
C IHE1H . &0 . 3 K CONSTANTE EULE 10
C IHE1H .&0 . 3 K RCCALCULEE AU DEBUT DE CttAOUE PAS CULE -li
IHPLICll REAL . S(AH,OZ) CULE 13
COHNONjASS EjNSYH,HKC CULC 14
COHNON j RESO/NtO EULC lB
COHHON/NLINjEPSDL, XNORN, OHEGA , XPAS, DPAS , OPASO , NPAs, J PAS, N If ER , EOLE 16
l lTEJl,I"ETN EOLE 11
CONHONj ES/K , HR , HP EULE 18
01H&N8 101 YCORG(I) , ICOLNC(I),YD1KP( I ),KMEO(1) . ILD(1) , ICLOCE( I ) , EULC 19
1 VCORC( I ),YPRN&(l),VPREE(l),ICNE(l),YICE(I),V"E(l),VrC(l), EU LE 20
a 81
3 VOL&O(I ),VOLGO(I ) , YfGO(I) CULt az
DATA ZE RO /O'. DO j , UH/l . DO / EULC U
c ...... " . . .. . ... ........................... EULC 24
c .... ". DECISION DE REASSCHBLAGE DE l.A HATRI CE Cl.OBALC EULC 28
IKT .. O EULE 28
IP(IHC1N . EO . l) CO TO 10 EULE 27
If(DPAS. NC , DPASO.AND.ITCR.EO.l) GO TO 10 EULE 28
If(IHE1 H. EO . 3 , AND.lTER.CO.I) GO TO 10 EULE 29
GO 1 0 20 CULE 30
Figure 6.25. (Suite).
Technique de programmation
la UT.}
C INI TIALISER A ZERO LA HATRICE CLOBALE SI NECESSAIRE
20 If(UT. EO . O) GO To 30
CALL 1"IT( ZERO . NKG,VKGS)
CALL IHIT(ZERo ,NtO, VKGD)
CALL INIT(ZERO,NKG.VKGI)
C ASSEHBLAGE DES RESIDUS ET DE LA H"TRICC GLOBALE SI NCCESS.\lRE
30 CALL HAJ(UH,ZERO,NCO.VfCO,VRES)
CALL ASEULR(IKT,VGORC,KDLNC,VDIHP.KNEO,KLD.KLOCC,VCOME,VPRNE,
1 VPREC,KNE,VKE,VHC,VfE,VOLE,VKCS.VKGD,VKCI,VfC,VRES,VDLG,
2 YOLEO,VDLCO,VfCO)
CI_UN
Ir( !TEI.GT.I) ChCI OMEGA
D04 0 1_I,NEO
40 VRES( II_DPAS_ (VRES( t) ci -vre ( 1
C RESOLUTION
CALL SOLI Vl(CS, VKGO, VKGI ,VRES, no, NEO, HP, 1 KT ,1 ,MSYH, ENCRG )
C .. .. HISE A JOUR Dt LA SOLUTION
c
c
CALL HAJ(UH,UN,NEO,VMES,VDLG)
RCTURN .
CND
SU8MOUTINE ASEULRCIKT,VGORG,KDLNC.VDIHP,KNCO,KLD,KLOCE,VCORE,
1 VPRNE ,VPREE,KNE ,VKE,VHE,VfE,VQLE,VKCS,VKGD,VKGI,VPC,VRES,
2 VOLG,VQLEO,VDLCO,Vfeo)
ASSEHBLAGE DES RCSIOUS ET DE L" HATRrCE GLOIlALE (51 rn.EO.l)
O"HS LA MCHE BOUCLE SUR LES ELEMENTS (POUR LA MCTNOOE DE CULER)
EULE
EULE
EU LE
EU LE
EU LE
CULE
CULE
EULC
EU LE
EULC
CULE
CULE
CULE
r.ULE
CULE
CULE
EULE
EU LE
EULE
EULE
EULE
ASEU
ASEU
"SEU
UEU
ASEU
495
3i
" 3J
"
3'
3.
37
38
39
.,
41
" 43
..
..
..
.,
..
.,
50
"
1
,
3
5
COHHON/ELEH/ HCLT , HNCL,NTrE,NCRE , MC , HIDENT A8&U ,
COHtlON/ASSl: /USYH ASEU 10
COHMON/IIESOIUEO ASEU Il
COHHON/RGDT/ItL, JTPl:,lTPEI, IORE, IOLC, I CE, IPRNE, IPREE, INEL, IDEO, IPCASE:U 12
l ,ICOO A8l:U 13
COHMON/NL 1 N/ EP5DI.., XNORH ,OMEe A, XP AS ,DPAS , DPASO, NI' A6 , II' AS ,N JTER , AS EU 1 4
l ITER, IHETH AStU 16
COHHON/ CS/H,HR,HI',HI , H3 A$EU 18
DIMENSION YCORG(l) , KDLIfG(I) , YDIHP(I),KNEO(I),KLD(I),KLOCE(J), AStu Il
1 YCORE( 1), VPRNE( 1) , vrJlEt(l), KNE(l} , VKE( 1 ), VHE( 1), Vf'E(l), VDLE( 1), AStU 18
3 VKeS(I),VKGD(I),VKel(I),vre(I),YRES(I),VDLC(I),VOLEO(I), ASEU 1&
3 VOLCO(l),Vf'CO(l) ASEU 3D
DATA UtlJl. 001 Astu 21
C , , , , ,, , , ASCU 22
CC.OPAS OMECA AStu 23
IfE_a ASEU 34
Ir(I1ER. GT . I) rrE .. 1 ASEU 38
G POSITIONNER AU DE8UT LE PICHIER DES ELEMENTS (t'lE) AStu a&
ReV IND H3 AS EU 37
C BOUCLE SUR LtS ELEHENTS
DO 90 IE .. l,NELT
C LIRE UN EL&HENT
CALL RDELEH(H3,KLOCt,VCORE,VPRNE,VPRE&,KNE)
C CALCUL DES PONCTIONS D' INTERPOt.ATION SI NECESSAIRE
IF(ITPE . EO , ITPEl) GO TO 10
ICOO .. 2
CALL ELEHL8(VCORE,YPRNt,VPRtE,VDLE,VKE , VrE)
C EXTRAIRE LES D. L . DE L'ELEH&NT DE vro-
10 CALL DLELH(KLOC&,VOLG,VOIHP,VDLt)
C .... .. CALCUL DU RESIDU K.U
1COO .. 6
CALL ELEML8(VCORE,VPRNE,VPREE,VDL&,VKE,VfE)
C CALCUL 0& LA HATRICE H
I GOO_6
CALI... ELEHL8(VCORt,VPINE , YPREE , VDLt,YME , VrE)
Figure 6.25. (Suite).
AS EU 29
.\SEU 29
ASEU 30
ASEU 31
ASEU 32
AStU 33
AStU 34
AStu 36
ASEU 3 6
AStU 37
.\Stu 38
ABEU 39
AS EU 40
ASCU 41
AStU 43
ASEU 43
496 Mthode des lments finis
C CALCUL DI: LA "'ATRI CE K SI NECESS AI RE
IP(II(T.I: O. O) CO Ta 18
IGOO .. 3
CALL Et.EHl.B(YCORE,VPRNE,VPREE,VOl.E,VKE,VfC)
C RESIDUS A LA l'R Clif!:RE ITeRATION oc CIIAQU& PAS (I.INE,I,lRC)
III IF(ITCR.CT . I ) CO TO 20
CALL ASSEL ( 0 , l ,J OLt , NS'tH. KLoce. KLO, 'Kt, yn; , HGS, VKGD, VKCI ,HG)
GO T O 60
C .. .. . .. RESI DUS fl PRES LA PREHIERE ITERATI ON
20 CALL DLELH(kLOCt . VDI.GO . VOIHP . YOLEO )
DO 30 I.I , IOLE
YDLE( I).(VDLEO(I) YOLE(I /DPAS
3 0 YPC(I ) _ _ OHECA_Vf'E ( I )
C . . PRODUIT H . U
VPE(I)_VrE(I ) .VHC( I ) VDLE(I)
II_l
DO 60 J_2,IDLC
Jl-J -1
D0401.d,JI
I1_II+1
YPE(I).vrE(I) .YHE( II ) +VDLE( J )
40 vrC(J).vrE(J). VHE( II) VDLE(I)
11_11.1
&0 VPC(J).VfCIJ).VHE(ll ) VOLE(J )
c- _. HATR I CE H. DPAS. OHEGA. le
41 0 If(IKT . EO .O) GO TO 80
Il _0
DO 70 1_ 1 , IDLE
DO 10 J_l,IDLE
II,,II ... }
10 VKE{ Il )"YKE( Il ) CC"'VI1&( Il)
c ASSEK8LAOE DU RESIDU ET DE LA KATRI Ct CLOBALE
BO CALL ASSEL(I KT, l PE, IDLE . NSYK,KLOCE, KLD,VKE , Vft , VKGS,VKGD,VK01,
1 VRES)
90 ITPEI.ITPt
RETURN
CND
Figure 6.25. (Suite) .
6.5.3.7 Bloc 'VALP'
Fonction
AStU H
ASEU 45
AStU ..
AStU 41
AStU 48
AStU 49
AStU 60
AStU 51
AS&U
" ASEU 83
ASEU ..
ASEU
" AStU
" AStU
"
ASEU
"
ASEU
"
AStU 60
AStU 61
AStU
" AStU 63
ASEU 54
ASEU
" ASEU
"
ASEU
" ASt U
" As t U ..
ASt U 10
ASEU 71
ASEU 73
AStU 73
ASEU
,.
ASEU
" AS EU 76
ASEU 77
ASEU
"
ASEU 79
ASEU BD
Ce bloc calcule des valeurs propres et vecteurs propres par la mthode
du sous-espace dcrite au paragraphe 5. 5. 3 . 4, lorsque [KI et [MI sont
symtriques dfinies positives.
Organigramme
ESPACE
1 pr incipal
L _____ J
BLVALP
MULKU
JACOBI ASMG
Sous-programmes
communs fi tous
les blocs
d'e)(cution
.-
Technique de programmation 497
Sous-programmes
BLVALP : lit une carte contenant les variables NVALP, NITER, EPSDL,
SHIFT, NSS, NMDIAG, NSWM, TOLJAC dcrites par la
figure 6,9, Puis il cre toutes les tables ncessaires (fig, 6,26) ,
EXVALP : excute l'algorithme du sous-espace (fig, 6,26),
ASMG : assemble la matrice masse globale (fig, 6,26),
M ULKU : effectue le produit [K] ( U) (fig, 6,22),
JACOBI : excute l'algorithme gnral de JACOBI prsent sur la
figure 5,24 (fig, 5,25),
c
c
c
SU8ROVTINC aLY"LP
APPEL DU IILOC 'VALP'
CALCUL oes VALEURS ET VECTEURS PROPRES PAR ITERATION SUR UN
sous - ESPACE
DLYA
8LVA 3
8LVA ..
ilLY A fj
Ca ____ __ __ __ ______ _____ _ 111.'1111 6
HtPLICIl REAL-8(A.t.,OZ) DLY" 1
RCAL-. T8t. BLYA 8
COHHON/&LEH/NUL(4) ,t'lE ilLY A 9
COHHOH/ASSE/NSYH,NKG,HKE,NDLE BLVA 10
COHHOH{RESO/HEO BLV" 11
COHHON I VALP / HITER,NHDIAG,EPSLB,SHIFT,HSS,NSVH , TOLJAC,NVALP DLV" 12
COMMONt ES/ H,MR,HP,Ht ,H2 Bt.VA )3
COHNOHf LOC/LCORC,LDLNC,LHEO , LDIHP,LPRHC,LPRCC,LLD,LLOCE,LCORE,LNE,DLYA 14
1 LPRNE,LPREE,LDLE,LKc,LrE,LKCS,LKGD,LKGI, LrC,LRES,LDLG DLYA IS
COHHONfTRVL/XI ,X2,X3,11 ,12,13,14,16 8LYA 16
COHHON YA(I) BLYA 11
DIHENSION T8L(20) DLYA 16
OAU TIL/ 4ltKCS , 4"KeD , 4HNCS ,"NNCO ,4HrC , 4MKE ,4Hn; , 41101.&, DLYA le
1 4HRES , 4HOLC .4HI' .4"LAHB,4I1LAHI . 4HR ,4HI'IlI .4MKSS , 4"HSS. DLYA aD
1 4MYI ,4HYX ,4t/va I,ZERO/D . DO I BLYA al
c. -... -. .. . ......... . . . . --. _. _ .. _ ......... -. . .............. . ....... 8LYA 2020
Ir(HI.CD . O) HI-HR BLVA 203
IP(HZ.CO . O) H2_HC 8LYA 204
REAO(H I .1000) Il , Ia , Xl,X2,13 , I4,IS , X3 DLY. 26
1000 PORHAT(aI6,ZPI0 . O,318 . lrlO. O) ILVA 206
Tr(Il C . O) NVALI'.1l DLVA a7
IP(12.IIE . O) NITCR .. U BLYA 208
HSS_I3 BloU 29
IF(I4.NC . O) NHDIAC_It
IP(IB.HE.O)
IP(U .IIE . Z&RO) &1'5L8 .. U
fr(Xa.HE . ZERO} SMIFT_xa
IF(X3 . HC . ZERO) TOLJACX3
IF(NSS . NC.O) CO TO 10
NSS_HIHO(NVALP+a.Z_NVALP)
NSS .. HIHO(HSS,NCO)
10 CONTINue
H,NYALP . HITER,HMOIAC.&I'SLB,SHIFT.NSS,HSVH,TOLJAC
2000 rOR"AT</I' ITERATION rAk SOUS ESPACE ( " .. .13 , ') " ' ,116(' ' ) 1
1 ISX,'HOHIIRE OC VALeURS rRorRES D&SIREeS (NYALP) .. ' ,1131
2 l6X, 'HOHBRe 0 ITERATIONS HAX. (tlITER) .. ' .113/
3 18X,'IHDJCE OE HASSE DIACONALE (NHOIAC).,l131
4 15X. 'PREClSION SUR LES VALeURS PROPRES (CPSL8).' .EU.SI
(!!. 15X. 'OCCiLAce (SHIPT) .. , &12.81
Figure 6.26. Bloc VALP,
fI!.VA 30
SI.YA 31
8LU 3a
BLYA 33
DLYA 34
DLVA 35
8LVA 36
81.YA 31
BLVA 38
BLU 39
BI.VA 40
8LYA 41
81.VA fa
BI.U 43
BI.YA 44
BLVA 48
498
c
C
c
Mthode des lments finis
6 15X, 'DIKeNSION ou SOUS ESPACe
7 15X,' NOHBRE: HU . n ITERATIONS DANS JACOB 1
e 15X . 'TOI.&RANCE DANS JACOBI
IP (U:CS.&O.I) CA!.L ESPAct ( HKe,I,TBL(I),I.KCS)
tf(LKGO.EO.l) CHI. CSPAct(NEQ,I,TOL( 2 ),LKCD)
CA:"!. ESPAC&(HKC , l , TIIL(J ) ,LKGS)
CA"''' ESI'ACl:( NEO, 1 T8L( 4) ,LHCD)
If(LPC.CO .I) CALI. CSPACE(NEa,I,TBl.(8),l.fC)
If(LKE.E:O.l) CALL ESPAC&(NKE, I,TBL(tI ),LKE)
p{Lre. CO: l ) CALL CSPAC&(NDLC,I,TBL(7 ) ,LfC)
If(I.DL.E.EO.ll CALI. ESPACI;(NOLC,l,TEU.(8),LDI.E)
(NSS).',lIZI BLV"
(H5 \/H ) .',I 131 DLVA
(tot-JAC)_ ' ICI Z . 5 /) BLVA
IlLV "
DLVA
8LYA
DLVA
DLV A
DLV"
DLY "
BLV"
rr(LRl: S . EO.l ) CHI. ESPACC(NEO,I,TBL(O),t.RCS) DLY,"
If(LDLG . r.O . I) CAt." ESPACC( NEO,I , TBL(lOl , LDI..C) BLVo\
CALL &SI'ACEpH:O-HSS.l, TBl.( Il), LVEC) IILVA
CALI. ESP .... CE(NSS, l, TBL(l2 ), LLAHB) IILVA
CALl. ESPACEe NSS, 1 TIlL(l3) . LLAH' ) IlLVA
CALI. ES'ACE(NSS(HSS.l )/Z, I,TIIL(16),LKSS) eLV A
CALI. Es r .... CE(NSSCNSS .. I)/ 'A,I,T8LCI 7) ,LKSS) IILVA
CALI. ESFAC&(NEQ,1.T8L(16).LVl) 8LVA
CALl. ESFACE{NSS NSS,I,TBL(l9),Ll() IlLVA
CALI. DLVA
VA(LPREE) , VA ( LNE) , YA(LfE) , YA(LKE ) ,VA( LKCS),YA(LXCO),YA(LtG), DLYA
1. '1,1.( LCORC) , VAC LOLNC) ,VA( LHEQ) ,YA(!.IIES) , V A' LO!.C) ,VA (LOLO) , IILVA
3
4,YA(LVl),YA( LX) ,HEQ,HSS) OLU
RETURN aLYA
END DLVA
SUDROUTINE EXYALP(KLO , VOIKP , KLOCE,VCORE , YPRKE,VPREE,KNE,VfE,VIE, eXVA
VKOS,VKGO,VfG,YCORC,XOLNC,KNEO,VRES,VDLE,VOLG,VHGS,YHGD, EXYA
2 VEC,VLAHB,VLAHI,VKSS,YHSS,Vl,YX,NEO,NSS) EXV ....
EXECUTION DU BLOC 'VALP'
CALCUL DES VALEURS ET VECTEURS PROPRES PAR ITERATION SUR UN
SOUS ESPACE
EXVA
EXVA
exVA
IKPLICIT REALa(AH,OZ) EXVA
CONHON / ASSE/ NS y H, NKC, HKt; , HOLt exVA
COMMON/VAt.P {NITEII . "HO lAC , EPS LB , SHltT, MSSI ,HSVH, TOLJAC, NULP EXV Il
COMMON /ES/M, HR, HP EXVA
DIMENSI ON KLOe 1), VOIHP(l), KLOCE(l), YCORt( 1 ) , YPRNE( 1) , YPREE( 1) , (;kVA
1 kNE(l ) . VrE( 1). YkE( 1 ) , 'lkes( 1 ), VICO( 1 ) , VFC( 1) , YCORC( 1) ,KOt.MC( 1) , EXVA
a KNEO( 1), VRESn), VDLE(l), VOLC ( l), VHCS( 1), YHGO( 1 ) , VEC(NtO, 1). eXVA
3 VL .... HB(I),VLAH1(1 ). YKSS ( I).VNSS(I).VI(l),VX(NSS,1) tKVA
DATA ZERO{O . OO/ . UHI I . ODO/ EXVA
ABS(X )_OABS (X) tXV A
c ......... ... .... .. .... .. .... .. ........... . .... .. ... ... .... .. .... .. .... EXVA
C eXVA
C CALCUt.S PREt.IMIHAlR&S eXVA
C CKVA
C ASSEMBLER KG ET HC eXVA
CALI. ASKC( KLO,YOIHP ,Kt.OCE, VCORE ,YPRMt,YPR&t,KNE,YKE,VtE,VKGS,VKCO,&XYA
1 YKCI,VrG,YOLE,VRES) eXVA
CALI. ASHC(Kt.O , YDIHP,KLOCE, VCORE,VPRKE,YPREt.XNE,VKE,ytt,VMGS, EXVA
1 VMCO,VKCS,YPC,VOt.C,VRE6) eXVA
C TRIANGULARISER Ke EXVA
CALI. SOI.(VKCS, VKGO , VKGJ ,vte, KLD, KEQ, HP , l , 0,0 , ENERG) EKVA
C VCCTEUII DES SOLLI CITAlIONS CCAt. A LA OIlCONAt.E 0&" EXYA
CHAX .. ZERO
00 10 10_1,NEO
C .. YKCO(IV) / VMGD(IO)
Yl(10) .. C
tP(C,CT.CHAX) CHAX_C
VEC( 10 , 1 ).VHCDI ID)
DO 10 J S_2 , NSS
Figure 6 . 26. (Suite).
EXVII
EXVA
&XVA
CKV A
EXVA
&XYA
&XYA
..
"
..
..
"
"
" 53
..
"
86
87
" 59
..
61
"
"
"
..
"
" ..
,.
71
"
,
, "'iii"
1
1.
Il
"
13
H
"
"
11
"
i9
,.
"
"
"
..
"
"
.,
"
" 30
31
"
"
,.
"
" 31
Technique de programmation
10 vtC( ID ,JS) .. Zl:II0
c V[CHURS DES SOl.l. I CIT"TlONS UNITES CORRESPONDANTS AUX HIN . DE
C K(I, I) /H(I, I )
00 30 JS_2 , HSS
00 ZO 10_I,MEO
I r{VI(ID).CT .C) CO TD ZO
C. O(lo)
J1 .. JO
20 CONT J Nlll::
"'1(lJ)_CI4H
YfoC( 1 t,JS)_UN
30 "'t."H!I(JS) .. UN
YLAH!I(1 ) -UN
c
C DEBUT DES ITERATIONS
c
tTH"hNITER+I
00 o ~ ITER .. I, ITHAX
C .. .... CALCUl. DES VECTEURS DE InTZ
110.0
00 80 JS_l,NSS
110.110.JS
00 40 ID-I,NEO
40 YI(IOJ-YEC( ID,JS)
cut. SOl.(VII'GS, VICGD, '1ICCI ,VI ,1Cl.U , MEO .HP, 0 , 1 ,0, EMERC)
C CAl.CUl. DE l.A PROJECTION DE IC
Il.110
DO 60 IS_J S, HSS
c_zeRO
DO SO 10_I , MEO
80 C_C.Y I ( 10) -YEC(10, IS)
YII'SS(IJ)_C
50 11_1 hlS
00 7 0 ID_l, NtO
70 VEC(IO,JS)-YI(ro)
80 CONTI NUE
...... , PROJECTION DE l.A NATRICE H
J 10-0
DO IZ0 JSooI,NSS
lIO_ttO.JS
00 88 10-l,NEO
85 YI(IO)-ZERO
CUI... HULKU ( YHGS, \lHGO, \lHeS, KLO, VEe( l ,JS) ,NEO, 0, VI)
JI .. 110
00 100 I S _J S,HSS
C.ZERo
00 to 10.I,NEO
90 C_C.VI(10)YtC(10 , IS)
Ir( ITERH.GT . O) CO TO 130
\lHSS (II ) .C
100 11-1..,18
00 110 lO .. I , NCO
110 UC(IO,JS)-VI(JO)
UO CONTINUe
C , CAl.CUL DES 'leCTEURS PROPRes DANS LE sous.eSPACE
CALI. JACOBI(VICSS , VHSS,NSS,NSYH,TOLIAC,YI,YLAHI , VIC)
....... MOUYEAU VECTEUR SOI.LICITATIOHS
DO 160 ID_I,HEO
00 130 JS_l,MSS
130 YI(JS)_VEC(IO,JS)
DO 180 JS_I,HSS
C.ZERo
00 140 l S .. 1, HSS
Figure 6.26. (Suite).
499
EXVA
" tXVA
" EXVA 40
EIlVA ..
EXVA
" EICVA 43
exv", ..
exv", ..
EXYA 46
EICV"
.,
EXVA ..
en "'
..
EXVA 50
EIlVA
"
EXVA 6Z
EXY" 63
foXYA
"
EXVA 58
EIlVA 56
EXVA 57
EXYA
" EXVA 63
EXYA 60
EXYA &1
EXYA
" EXVA 63
EXVA ..
EXYA ..
EXYA
" EXVA
" eXVA 5.
EK'tA ..
EXVA 70
EKVA 71
EK VA
" EXYA 73
EXVA H
EXYA 16
EXYA 76
EXYA 77
EXYA
" EXVA 79
EXYA .0
EXVA
.,
EKVA .a
EKVA .3
EXVA ..
EXV" ..
EXY"
" EXYA B7
EXYA ..
tXVA
.,
&:llVA ou
EXVA
"
EXVA ..
EX'tA
" EXVA ..
elC'tA ..
EXVA
"
EXVA
" EXVA
" EXVA
" EXVA 100
EXYA
10'
EleVA
'"
500 Mthode des Mments finis
140 C_C+Vl(IS) VX(IS,JS)
150 VE:C(JD,JS) - C '
HiO COHTUIUE:
_...... J"I'RESS I Ot< DE L ITERATION
1r(K .Ll . 1 ) GO TO 180
11ER
2000 rOR"AT e Il' .... . ITERATION ' . le/)
DO 110 15_1, H5S
IIRITt ( HP,2010) IS,nAttleIS)
20 10 rORH"1(/' VALEUR PROPRE NO . ',15,' - ' ,EI'L'6II' VECTEUR PROPRE:')
170 CALL PRSOL(KDLNC,VCORC,VDIKP,KNEO,VEC(1.1S
c-_ TEST DE CONVERCENCE
180 IfellERM. GT.O} co TO 210
C. ZERO
1&X,,0
DO 180 15_1,NS5
CI_ABS VLAHl(IS).VLAH8(IS/VLAHB(I S
If( e l .CT.C) C.CI
IP (Cl.L.E.EPSI.B) Il:X .. JEX+I
190 CONTINUE
IIJtlTE( HP ,aOIS ) ITEII , C,ltll
zou FORMAT( ' ITERAT ION ' ,14 , ' ERREUR HAX . o. ',Ee. I,' V"LEUU PROPRes
IACTES : '
Ire U:X . CE.NVlILP) I1ER" .. l
C NON CONV ERC&NCE
IP(ITER . LT.NITER.OR.ITERH.EO.l) GO TO 196
VRITC ( HP.!020) NITER
3020 FORMAT(' NON CONVERGENCE APRES ', 18,' ITERATI ONS' 1
ITERN"'l
C SAUVE. loES VAl.EURS PROPRES
196 DO 200 IS_I,NSS
200 YLAN8(JS) . VLAH1(IS)
C
C ReSUl.TAT
c
C PLACER DANS L'ORDRE CROISSANT l.ES VALEURS PROPRES
UO I8t _ NSS)
DO 230 I S_) , I S t
Il,,IS.1
C .. YLAHB( IS)
It .. rs
DO 220 JS .. I1, NSS
GO TO 220
C- VLAHB(JS)
n .. JS
zao CONTINUE
Vl.AHB(II).VLAHB(IS)
VLAHB( I S) .. C
DO 230 10 .. 1, NEO
C .. VEC(ID,IS)
VECC 10, IS) .. VEC (10,11 )
330 VEC(JD, II)''C
C.. IHPRESSION
VR ITE( HP , 2030 1 ITER
2030 f'ORHAT(/' . . . . CONVERCENCE EN'. lot, ' ITERATIONS' J)
DO a.o IS_I,NVAl.P
WRITE(HP.2010) IS.Vl.AHB(rS)
340 CALL PRSOL(KOLNC,VCORC,VOIHP,KNEO,VEC(I. I S
RETURN
'"0
SU6ROUTINE
VkCS .VkCD,VXCl.VPC.VDLE , VRES)
Figure 6.26. (Suite) .
EkYA
103
EXYA
, "
EXYA 10.
EXYA
, 06
un, 107
EXYA , 08
EXVA
, "
EXYA 110
EXVA
"' EXYA
"'
EXVA
, "
EXU ,1<
EXYA Il.
EXY A
'"
EXYA
117
EXYA
Il.
EXU
'19
EXYA 120
ElYA
,,,
EXYA ...
EXYA
'"
EXEXVA
'"
EXYA
'"
EXYA
",
EXYA 127
EXU
'28
EXVA
'"
EXYA
13'
EXU
13'
EXYA
'"
-
EXVA 133
EXYA 13.
eXYA
13.
EXYA 13.
EXVA 137
EXYA
, "
EXVA 13.
EXU 140
EXYA
14'
EXU 142
EXYA 143
EXYA 1<.
eXYA
'45
EXYA
'46
EXVA 147
EXYA
'48
.EXVA
'48
UYA
180
EXU
18'
EXYA
'82
EXYA 183
EXU
".
EXYA
'"
EXYA
'" EXYA
'87
EXVA
".
EXYA
".
EXVA
'50
EXVA
'"
EXVA
'"
ASHO
ASHC 2
Technique de programmation 501
c ASSEHBLAGE DE LA MATRICE HASSE GLOBALE (FONCTION ELEMENTAIRE 5)
ASHe "
IHPLICIT REH8(A-Il,O-Z) ASHO 6
COHHONfELEH/NELT,NNEL,HTPE,NGRE,HE,NIDENT ASHe 7
CONNON/ASSE/NSYH ASHC 8
COHHON/RBSO/NEQ ASHC 9
CONHON/RODT IIEL, ITPE ,11PE} ,ICRE, IDLE, IGE. 1 PRUE, 1 PREE. INEt.. IDEG, 1 PCASHO 10
1,IGOD ASHC Il
COHHON/ES/H,HR,HP,HI,HZ ASHe 12
DIHENSION KLDCI),VDIHP(l),KLOCE(l),YCORE(l),'r'PRNE(l),'1PREE{l), AS He 13
1 KNE(I),VKE(l),VFE(I),VKGS(I),VKCD(I),VKCI(I),VrC(I) ,VOLE(l), ASHe 14
li VRE;S(I),KEB(l) AS He 15
c 0"0- - _ -.-- --_ __ .---A5HO 16
C . POSITIONNER AU DEBUT LE rICHIER DCS ELEHeNTS (H2) ASHG 17
RE;VIND H2
. . . . . . . SUR U:S ELEHENTS
DO 30 IE_l,NEI..T
C NE PAS RECALCULER I..ES EI..EKENTS IDENTIOUES
IP(NIDENT.r.O.I.AND.IE.GT.I) GO Ta 20
C I..IRE UN ELEHENT
CAI..1.. RDELEK(H2,KLOCE,VCORE,VPRNE,VPREE,KNE) -
C CALCUl.. DES PONCTIONS D'INTERPOLATION SI NECESSAIRE
ITPEl) GO Ta la
JeOD_a
CALL ELEHI..B(VCORE,VPRNE,VPREE,VDLE,VKE,VPE)
C CALCUl.. DE I..A HATRICE ELEKENTAIRE
la ICOD-5
CALL ELEHI..B(VCORE,VPRNE,VPREE,VDLE,VKE,VPE)
C""" IHPRES510N DE I..A HATRICE ELEHENTAIRE
It"(H.LT.Z) GO Ta <la
IP(NSYK.EO.O) IKE_IDl.E*(IDLE+I)/Z
rp(NSYK.EO.l) IKE_IDl.E*IDl.E
VR ITE(KP, 2000) lEI.., (VKE( 1) ,1 .. 1 ,1 KE)
2000 PORHAT(/' HATRICE (HE) , ELEHENT:',16/(10X,IOE12.S
C " " " ASSEHBLAGE
20 CAl.l. ASSEI..(I,O,IDI..E,NSYH,KLOCE,KLD,VKE,VPE,VKGS,VKCD,VKCI,VPC)
30 ITPEI_ITPE
RElURN
ENO
Figure 6.26. (Suite).
6.6 Description des donnes de M EF
6.6.1 CONVENTIONS
ASHC 1 B
ASHC' 19
ASHC ao
ASHC al
ASHC aa
ASHC 23
ASHC 24
ASHC 25
ASMe 2S
AS He 21
AS He 28
ASHG 39
ASHG 30
ASHC 31
ASHC 32
ASHa 33
ASHC 34
AS HG 36
ASHa 36
AS Ha 31
AS Ha 38
AS Ha 39
ASHa 40
AS Ha u
ASHe 42
A chaque bloc fonctionnel de M EF correspond un ensemble de cartes de
donnes constitu :
d'une carte d'en-tte dfinissant le bloc
d'une carte de paramtres si ncessaire
de cartes additionnelles de donnes si ncessaire.
502
Mthode des lments finis
Les cartes d'en-tte prsentent le mme format pour tous les blocs
Variable
Colonnes Dfaut Format Description
lue
BLOC 1 - 4 A4 Nom du bloc exculer
M 5-10 0 16 Paramtre contrOlant le niveau
d'impression (0 M 4)
M'
" -'5
5 15 Numro de l'unit logique de
lecture des donnes du bloc
M2
, 6-20
15
}
Numros des units logiques
des fichiers utiliss
p"
ce
bloc
M,O 5,6 60 15
En gnral toutes les variables entires sont lues avec le format 15 et les
variables relles avec le format F1 O. O.
Pour toutes les cartes de donnes, nous utilisons la mme description
que pour les cartes d'en-tte ci-dessus.
Les blocs doivent normalement tre excuts dans l'ordre dans lequel ils
sont prsents au paragraphe suivant.
6,6,2 DONNf:ES CORRESPONDANT A CHAQUE BLOC
IMAG
Impression de l'ensemble des donnes
(facultatif, mais doit tre le premier
- 1 carte d'en-tte 'IMAG' .
bloc excut)
.-==.,...., Impression de cartes de commentaires
CO MT 1 (facultatif, peut tre excut tout moment)
1 carte d'en-tte 'COMT'
des cartes de commentaire termines par une carte blanche.
COOR
1
Lecture des coordonnes et nombre de degrs de
des nuds (obligatoire)
1 carte d'en-tte 'COOR'
1 carte de paramtres
Variable
Colonnes Dfaut Format Description
lue
NNT
, -5
20 15 Nombre maximum de nuds
NDlN 6-10
2 15 Nombre maximum de degrs
de libert par nud
NDrM 11 -1 5 2 15 Nombre de dimensions du pro
blme (l, 2 ou 3)
FAC(I)
'625
, ,0
FIO.O Facteur d'chelle de SeriS x
FAC(2) 26-35 1.0 Fl0.0 Facteur d'chelle de sens y
FAC(3) 36-45 1.0
F'O.O
Facteur d'chelle de sens z
libert
Technique de programmation 503
- des canes de nuds termines par une carte sur laquelle IN' .; 0
(chaque carte peut gnrer plusieurs nuds)
1 Nl 1 5 15
Numro du premier nud
;
gnrer
Xl (1 ) 615 Fl0.0 Coordonne x de ce nud
Xl (2) 1625 Fl0.0 Coordonne y de ce nud
XI (3) 26 35 Fl0.0 Coordonne z de ce nud
IN2 3640 INI 15
Numro du dernier nud
;
gnrer
X2(1 ) 41 50 XI (1 ) Fl0.0 Coordonne x d. ce
nud
X2(2) 51 . 60 XI (2) Fl0.0 Coordonne y de ce nud
X2(3) 6170 XI (3) Fl0.0 Coordonne z d. cc nud
INCR 71 75 1 15
Accroissement de numro de
nud utilis pour la gnra-
tion
IDlN 7680 NOLN 15
Nombre de degrs do libert
des nuds gnrs s'il eSI
diffrent du nombre par d-
faut (NOLN)
Remarques
- les nombres de degrs de libert en chaque nud doivent tre
cohrents avec les lments que nous relierons ces nuds.
- si les degrs de libert sont diffrents d'un nud l'autre sur une
mme ligne de gnration, il est possible d' utiliser le degr de libert par
dfaut et de modifier ensuite le nombre de degrs de libert en certains
nuds grce au bloc OLPN,
- si les nuds sont donns un par un, seules les colonnes de' 35 sont
ncessaires.
OLPN
Lecture des nombres de degrs de libert par nud
(facultatif)
- 1 carte d'en-tte 'OLPN'
- des cartes de groupes de degrs de libert termines par une carte sur
laquelle IDLN .; 0
Variable
lue
IDlN
KI
Remarque
Colonnes
1 5
680
Dfaut Format
15
1515
Descript ion
Nombre de degrs de libert
Liste des numros de nuds
ayant IOLN degrs de libert.
termine par un numro nul
Si ncessaire. la li ste K1 peut se poursuivre sur des cartes additionnelles
de format (5X, 1515) .
504 Mthode des lments finis
COND
Lecture des conditions aux limites
(obligatoire)
1 carte d'en-tte 'CON D'
des groupes de deux cartes termins par une carte blanche
.1 carte d'en-tte de groupe de conditions aux limites
Variable
IU8
ICOD
v
Colonnes Dfaut
1 10
11 -80
1
KV
carte de numros de
1 -80
Remarques
Format
1011
Description
Pour chaque degr de liben
(maximum 10) :
1 si impos
o si libre
7Fl0.0 Liste des valeurs des degrs
nuds
1615
de libert imposs (nuls ou
non nuls) dans le mOrne
ordre qua les codes '1' dans
ICOO
Liste des numros des nuds
termine par un numro nul
La liste des valeurs V peut s'tendre sur une carte additionnelle de format
10X, 7 E12. 5. La liste des numros de nuds KV peut s'tendre sur des
cartes additionnelles de format 1615.
"pn;RMN=D"1 Lecture des proprits nodales
. (facultatif)
1 carte d'en-tte 'PRND'
1 carte de paramtres
Colonnes Dfaut Format Description
Variable
IU8
NPRN 1 5 o 15 Nombre de proprits par nud
des cartes de proprits ((NNT x NPRN) 8 cartes)
VPRNG 1-80 0 8flO,O Li Sle des PlOprits (nud l ,
puis nud 2. etc.)
PREL 1
Lecture des proprits lmentaires
(ncessaire si les sous-programmes
proprits lmentaires)
ELEMnn utilisent des
1 carte d'en-tte 'PREL'
1 carte de paramtres du bloc
Variable
Colonnes Dfaut Format Description
IU8
NGPE 1-5 0 15 Nombre de groupes de pro-
prits lmentaires
NPRE 6-10 0 15 Nombre de proprits par
groupe
Technique de programmation 505
- des cartes de groupes de proprits termines par une carte sur
laquelle IGPE 0
IGPE
V1
Remarques
1-5
6- 75
15 Numro du groupe
7F10.0 Valeurs successives
diverses proprits
des
- Si NPRE > 7, la liste des proprits V1 se poursuit sur des cartes
additionnelles de format 5X, 7Fl 0,0
- le nombre de proprits par groupe doit tre gal au nombre maximum
de proprits requises par les lments utiliss,
L'lment de type 1 correspondant ELEM01 (quation harmonique)
utilise 4 proprits: les trois paramtres physiques d" d, et d, ainsi que
la capacit spcifique,
L'lment de type 2 correspondant ELEM02 (lasticit plane)
utilise 4 proprits: le module d'Young E, le coefficient de Poisson v,
l'indice de type de dformation (0 = contraintes planes, 1 = dformations
planes). la masse spcifique du matriau,
ELEM 1
Lecture des lments (connectivits)
(obligatoire)
1 carte d'en-tte 'ELEM'
M2 : numro logique du fichier des lments (dfaut M2 = 1)
1 carte de paramtres du bloc
Variable
Colonnes Dfaut Format
lue
NELT 1-5 20 15
NNEL 6-10 8 15
NTPE 11 -15 15
NGRE 16-20 1 15
NSYM 21-25 0 15
NIDENT 26-30 o 15
Description
Nombre maximum d'lments
Nombre maximum de nuds
par lment
Numro du type d'lment par
df aut
Numro du groupe d'lment
par dfaut
1 ndice : . EQ. 0 : la matrice (K]
est symtrique
. EG. 1 : la matrice [K]
est non symtrique
. EG.1 si toutes les matrices [k]
sont identiques.
des cartes d'lment termines par une carte sur laquelle 1 EL 0
(chaque carte gnre un ou plusieurs lments)
IEL 1 -5 15
Numro du p.remier lment
IGEN 6-10 1 15 Nombre d'lments gnrer
partir de l'lment IEL (in-
cluant le premier)
INCR 11 -15 1 15 Accroissement de "numro de
nud utilis pour la gnra-
tion automatique
506
ITPE
IGPE
IGRE
KNE
16-20
2'-25
26-30
3t -80
Mthode des lments finis
NTPE
,
,
15
15
15
1015
Numro du type d-lment
(si diffrent de NTPE)
Numro du groupe de pro-
prics lmomaires
Numro du g ~ o u p d'lments
Liste des numros de nuds de
l'lment termine par un
numro nul ( ordre coh-
rent avoo le sous- programma
de calcul de la matrice l-
mentaire)
SOLC
Lecture des sollicitations concentres
(facultatif)
1 carte d'en-tte 'SOLC'
des groupes de deux cartes termins par une carte blanche
.1 carte d'en -tte de groupe de sollicitation
Variable Colonnes Dfaut Format Doscrlption
lue
IG 1 5 J5 Numro du groupe
v 6-75 7Fl0,O Liste des sollicit ations corres-
.1 carte de numros de nuds
KV ' 80 1615
Remarque
pondant chaque degr de
libert
Liste des numros des nuds
ainsi sollicits, termine par
un numro nul
La liste V peut se poursuivre sur des cartes additionnelles de format
(5X, 7F10 . 0). La liste KV peut se poursuivre sur des cartes additionnelles
de format (1615).
SOLR 1
Calcul et assemblage des sollicitations rparti es
(facultatif)
- 1 carte d'en-tte ' SOLR'.
LlNM 1 Assemblage et rsolution d'un problme linaire en mmoire
. (facultatIf)
1 carte d'en-tte 'LlNM'
M2 : numro logique du fichier des lments (dfaut : M2 ~ 1)
M3 : numro logique du fichier de stockage de (K] et 1 F J pour
calculer les rsidus (dfaut: M3 ~ 2)
1 carte de paramtres
Variable,
lue
NRES
Colonnes
' -5
Dfaut
o
Format
15
Description
Calcul du r6sidu de rsolution
[K]{ U} - [F} ,;
NRES.EQ. 1
Technique de programmation
507
UND
Assemblage et rsolution d'un problme linaire avec matrice
segmente sur disque
(facultatif)
1 carte d'en-tte 'UND'
M2, M3 : voir le bloc UNM
M4 : numro logique du fichier contenant [KI (dfaut: M4 = 4)
M5 : numro logique du fichier contenant [KI triangularise (dfaut
M5 = 7)
1 carte de paramtres
Variable
Colonnes Dfaut Format Description
lue
NRES 1 -5
0 15 (Non utilis. voir bloc LlNM)
NlBl 6-10 (calcul) 15 Longueur des blocs de la
matrice IKI
NBlM 11-15 (calcul)
15 Nombre. maximum de blocs de
la matrice (KI
(. : c.slcul pour utiliser au maximum la mmoire disponible)
NUN 1
Rsolution d'un problme non linaire
(facultatif)
1 carte d'en-tte 'NUN'
M2 : numro logique du fichier des lments (dfaut: M2 = 1)
M3 : numro logique du fichier d'initialisation des D,L. (s'il existe)
des cartes de paramtres termines par une carte sur laquelle
DPAS = 0,0
Variable
lue
DPAS
NPAS
NITER
lM ETH
EPSDl
OMEGA
Colonnes
1 -1 0
11 -15
16-20
2125 ' .
26-35
36-45
Dfaut
0.2
1
5
1
0.01
1.0
Format
FIO.O
15
15
15
Fl0.0
FIO.O
Description
Accroissement de sollicitations
Nombra de pas de sollicitations
identiques
Nombre d'itrations par pas
Type de mthode :
1 calcul de IKI chaque
itration
2 [K] constante
3 calcul de [X] au dbut de
chaque pas
Erreur admissible sur la norme
Facteur de sur-relaxation
TEMP 1 Rsolution d'un problme non stationnaire
(facultatif)
1 carte d'en-tte TEMP'
M2 : numro logique du fichier des lments (dfaut : M2 = 1)
M4 : numro logique du fichier de sauvegarde des degrs de libert
(s'il existe)
508 Mthode des lments finis
des cartes de paramtres termines par une carte sur laquelle
DPAS ~ 0.0
Variable
lue
DPAS
NPAS
NITER
IMElH
EPSDL
OMEGA
Colonnes
1 10
11 15
1620
21 25
2635
3645
Dfaut
0.2
5
0.01
1.0
Format
Fl0.0
15
Description
Pas de temps
Nombre de pas de temps i e n ~
tiques
15 Nombre d' itrations par pas
15 Type de mthode :
1 calcul de (KJ chaque
itration
2 (K] constante
3 calcul de IK] au dbut de
chaque pas
Fl0.0 Erreur admissible sur la norme
Fl0.0 Coefficient de la mthode
de Euler
(a :: 0 : explicite
Q: :;:: 1 : implicite)
VALP 1 Calcul ~ s valeurs et vecteurs propres
. (facultatif)
1 carte d'en-tte 'VALP'
M2 : numro logique du fichier des lments (dfaut
1 carte de paramtres
M2 ~ 1)
Variable
lue
NVALP
NITER
EPSLB
SHI FT
NSS
NMDIAG
NSWM
TOUAC
Colonnes
15
610
11 20
2130
31 35
35-40
41 45
45-55
Dfaut Format
3 15
10 15
0.001 Fl0.0
0.0 Fl0.0
(calcul) 15
o 15
12 15
1 . E-12 Fl0.0
(. : NSS _ Min (NVALP + B, 2. NVALP
STOP
Fin
(obligatoire)
- 1 carte d'en-tte 'STOP'.
Description
Nombre de valeurs propres
requises
Nombre maximum d'itrations
Erreur admissible sur les va-
loUiS propres
(Non u1ilis)
. Dimension du sous-espace
(Non utilis)
Nombre maximum de cyclos
dons JACOBI
Tolrsnce dans JACOBI
Technique de programmation 509
6,7 Exemples d'utilisation de M EF
6,7,1 TRANSFERT DE CHALEUR
Considrons le problme de transfert de chaleur dans la plaque suivante:
,
0
c
7(3) ;/
"
-,
"
2
,-,
t6
,
"
/
6 9 (2)
'--
"
,.
17
,
"
19 20 21
b,.j
'-.
Pour un matriau isotrope, de conductivit thermique
d = d
x
= = 1,4 w/m-oC (bton) ,
la rpartition de la temprature u l'quilibre dans la plaque est dfinie par
l'quation de Laplace
Imposons comme conditions aux limites:
u = 0 sur AD et BC (temprature impose)
au = au = 0 sur AB et CD (isolation)
on oy
d ou = 1 sur le cercle intrieur (flux de chaleur impos),
n
510 Mthode des lments finis
II suffit de n'tudier qu'un quart de la plaque, cause des symtries,
Reprsentons ce domaine par quatre lments isoparamtriques huit
nuds de type 1 (paragraphe 4 , 3,4), Les conditions aux limites sur le
cercle intrieur sont introduites sous forme de sollicitations concentres
d'amplitude :
R aux nuds 1 et 17
24
n
12 au nud 9
n
6
aux nuds 6 et 14 ,
Les donnes et rsultats de MEF, obtenus en utilisant le bloc LlNM, sont
prsents sur la figure 6,27,
Le problme de transfert de chaleur non stationnaire correspondant est
rgi par l'quation :
u = 0 pour t = 0
Pour le bton la capacit thermique ~ est 2,03,10' J 'm"oC,
Les donnes et rsultats de MEF, obtenus en utilisant le bloc TEMP
(mthode de Euler implicite) sont prsents sur la figure 6,28,
"
"
" "0
w
""
o
N
o
,
W
"
V
o
v
"
v
"
o
J
o
V
o
o
o
.0
,
N
-
,
" N
- .0
,
" N
- .0
N
N
- .0
,
" N
- .0
,
N
-
NO
,
" N
-
_ 0
N
" N
w
o
V
J
V
V
o
,
V
,oo
""
3
o
Technique de programmation
OOOOQ
00000
010000
o "'..,..,
ocooo
00000
... OOCCI
, .
.,"
ON
01"1"''''0
00<;>1;1 ...
-N
"
o _
o
u_
J
W
o.
V
"
o
O.
-..
U
J
o
.0_
"' .... .., ... .
0 ...... ...
o o o
.... ... ....... ... .......
...... _ ...... _ ...... _ ...
Figure 6.27. Exemple de transfert de chaleur stationnaire.
511
ooo
,
-ON
,
"
N
-OOO
, V
" .
N
_ 0
ooo
J
N 0
V
N
_ V
o.
0
,
0
-0"
,
" N
-oN
,
" N
-
o
,
" N
V
0"
oooo
v.
"
V o
V
"
w
V
"
o
o
V
o
"Tl
co
c:
CD
en
N
.....
-Cf)
c:
",.
(!)
-
CO"NEMTllaES
---------_ .. _ ..
T'AHsrCRT oc CHALEU' DANS UNE PLAQUE CAaRCE PERcee
LECTURE DES NOEUDS ( H_ 0)
NOMBRE MAX. DE NOEUDS
NOMBRt DE D.L. PAR NOEUD
NOMBRE DE DIMENSIONS DU PROBLENt
FACTEUR D ECHELLE DES COORDONNEES
ESPACE CE TRAVAIL EN MOTS REELS
DES CONDITIONS AUX LIMITES (H_ 0)
-----------_ ......... _ ............ ---
CARTES DE CONDITIONS AUX LIMITES
(HHT ) .. 21
(MDLM) .. 1
( N'DIM) - li
(FAC)_ 0 . 50000&+00 0.50000&+00 0.10000&+01
( NVA) _ 20000
>1000000000 0.00000&+00 0.00000&+00 O.DOOOOC.OO D. DOCODe_oo O.OOOOOE+OO O.oooooe.oo
.. 13 16 :11 0 0 0 0 0 0 0 0 0 0 0 0 0
>0000000000 O.OOOOOE+OO O.OOOOOE+OO O. OOOOOE+DO O, oooooe+oo O. OOOOOE+DO O.OOOOOE.OO O.OOOOOE+OO
MOMBRE OE NOEUDS TOTAL
NQMBRE DE D. L. TOTAL
NOMBRE 0 EOUATIONS A RESOUDRE
NOMBRE Dt D. L. IMPOSES NOM NULS
NOMBRE Dt D. L. IMPOSES MULS
NOMBRE TOTAL DE D.L. IMPOSES
(NNT) _
(NOL!)_
(HED ) _
(NCLNZ ) _
(NCLZ ) .
,
") (
.,
.,
18
3
3
'" -
N
<l>-
-
:;,-
c
;}
<l>-
Oi:
:3
<::t
;:,.
".
<;;.
" o
"
z
"
"
o
z
o
o
"
"
" z
o
o
"
Technique de programmation
c
"
"
z
o
z
00000000000
00000000000
00000000000
oooocoooooo
<:>0000000000
00000<;>00000
00000000000
.0
"-
.0
o.
o.
000000
<;IoooaQ
000000
000000
OQOOOO
000000
000000
o.
00
00
o.
000000000000000000000
0
............ 0
0<;)00
+ + +
I4WWIol
OOOIfl
0000>
0 ... 0 ...
0""10'"
- -,
. -
--
0
00
.0
0000
0000
+ + .. +
(olIolWIol
0000
0000
0<;>00
0000
0000
000000000000000000000
o.
--
00
o.
00
00
.0
00
-"
,.
--
--
, .
MO
-.
N.
0 ..........
0000
gggg
OOIQO
1n0"'1'"
.... ............
000000000000000000000
.................................. .... ................. ....
... ... "' .... O>O .... ..,M.Ifl"' .... o>o ....
.................. .... ....... ..,N
Figure 6.27. (Suite).
t
-
-"
o.
zz
ti3
-"
"
-"
""
o.
M.
N.
00
-.
.0
""
.0
.0
, .
_ .
_ .
""
o
00
, 0
o
-.
o.
gg
,.
o
o.
, ,
, ,
, ,
, ,
, ,
513
"Tl
CC
t:
CD
'"
'"
"
-
V>
c:
",.
'"
-
LECTURE DES ELEMENTS (II _ 0)
........ _._---_ ........ -
NOMSRE MAX . 0 ELCMCNTS (NCLT) ..
NOMBRE MAX . OE NOEUDS PAR ELEMENT (MNEL)_
TYPE D t'LEMENT PAR DEFAUT (MTPE)_
M,OMBRE DE CROUPES 0 ELEMENTS (NCRE) _
INDICE DE PROS LEME NON STMETRIoUE (MSTM) _
INDICE 0 ELEMENTS IDENTIQUES ( NIDENT)_
El.EMENT : l TYPE : 1 P . IL: 8D.l..: 'PROPN. :
CONNCCTIVltE (NE) 1
10 Il
El.EMENT : Z TYPE : 1 P.N.: 80.l.. : a PROPN. :
CONNECTJVITE (NC)
,
.. 11 18 ..
ELEMENT : 3 TYPE : 1 P.N.: 8 O. L:: a PROP N.:
CONNtCTIVITE (Mt) 3 7 Il
"
13
ELEMENT : 4 TYPE: 1 P.N.: 8D.L.: 8 PROP N.:
CONNECTtVITE (NE) 11 .. ..
"
"
HAUTEUR DE BANDE MOYENNE. 5 . 3 MAXIMUM ..
LONCUEUR 0 UN TRIANGLE DE KG (KKG) ..
NOM8RE DE POINTS 0 INTECRATION (KPC) _
LECTURE DES SOLLICITArIONS CONCENTREES (M .. 0)
.... _ .. __ ........ -.... _ ......... _. __ .. _---.--........ -
CARTES DE SOLLICITATIONS NODALES
,.,.,.
1 0.65450&- 01
,.,.,.,.,.
1 17 0 Q 0 0 0 0 Q 0
,.,.,.,.,.
Z o. )3090&.00
,.,.,.,.,.
0 0 0 0 0 0 Q 0 Q
,.,.>,.,.
3 0 . 26180&.00
> 6 .. ' 0 0 0 0 0 0 0 0
>,.,.>,. o 0.00000&.00
8
1
1
Q
Q
o PROP EL .:
7 3
o PROP EL.:
"
11
o PROP EL. .:
,
o PROP EL .:
16 13
10
" 36
Q 0
0 0
0 0
.,
.. CROUPE :
,
.. CROUPE:
10
4 CROUPE:
4 GROUPE:
"
Q 0 0
0 0 Q
0 0 0
1
Q
Q
0
..
...
S-
C
*
Cl.
...
;;:
"
'"
,,'
<;; .
w
-<
" z.
-
z
o
-
-
o
o
"
o
o
JO
0"
J'
< "
" o
_0
z"
_z
"
o
z z
00.
--.
00_
132.
00.
000
"""
0
-
"<
000
" o
o
Jo
0"_
OJ<
.
-
00.
"""
JJ_
"
0
o
-
z
-
-
o
>
-
Technique de programmation
515
"
,
o
" <
z
o
-
-
o
J
o
" o
o
o
-
z
o
-
-
o
J
o
-
"
o
-
N
"
o
o
z
00000000
QOQClOOOO
.... + .....
uwuwwwww
0 ... 1-0<4> ...... <4> ...
NCI;IO'tN .... COIn ...
"' ...... "'>? ...... I
........ ..,"'''"_ ....
"' ...... ..,..,"''''..,
000 ... 0000
00000000
I<'}1O_0N ... 0
",..,ca..,ON_O
11)'" "'011)""0
ggggg
.. .. .. .. ..
WWIoJIolW _ 0
..0
0.0
NOO
0
0000000000000 00000000
00000
00000
.. .. .. .. ..
WWIolWIiI
001000
00000
0 00 00
00000
0<:1000
OOOOOClOOOOO
0 00000000 00
.. .. .. .. .. .. t .. .. .. ..
IoIWWIolIolIolWIolI.:lIolW
0 00000000 00
ggggggggggg
oOOOOOOOOClO
oooooooooco
00
00
""
00
00
00
00
00
000
000
""" g g,g
000
0 00
000
000000000000000000000
00_ ......
00000
.. .. .. ... ..
wwwww
00000"' ...
00 00o",.
000 .... 0_0
0..,0 ....... 10
ln ............ '"
_0
00
""
00
00
o.
.0
00
00
""
--
O.
<N
__ 0
000
""W
<o.
.0.
_o_
N.O
--
00
00
W"
00
.0
0 0
_0
<-
00
00
""
00
00
00
00
00
000
000
"""
000
000
g gg
000
000000000000000 0 00000
00000
00000
00000
00000
0 00 00
00000
00000
00
00
""
_0
.-
-- 00
""
00
00
. 0
N"
000000000000000000000
... ...,. ............... 11;1000_
--
Figure 6.27. (Suite).
516 Mthode des lments finis
000000000
000000000
.. .. .. .. .. .. t
wwwwwwwww
...... <lIeue"" .. ..., ...
00:>000
00000
0000
0000
... co,.. ......
.... 0"' ..
......... "'0
"'0"'" 0 ...... "'.., ..... 0 .. 0 ....... .
.. 0 .......... 0 ...... ...f'I ... ...
............. <'I ... ON
'"CIO ... ", ... ..,." ......
"'<'111) .. ...
.... "' ... ...
.............
... ..,co ....
000000000000000000
. . .
... 0 ... 000000000000000
000000000000000000
.. ttttt t.+ +
wwwwwwwwwwwwwwwwww
..................................... 00 ......... 0
.., ............ CIOCIOCIOO ........... ..., "''''''''''00
............. o ..... ... .., "'''' ............ ca ...
............ 0 ......... ..,.., ........ ..., ......... ..
.... ......... ..... f'I ........ M ... "' ....... ..
000000000000000000
"" It) It) It) "" .... .... ....
lOI lOI lOI 101 W W 101 W
wU)..,'"'.., .... WIt)WIllWI/tWIIIW ....
z .... z ... z ... z ... z .... % ... z ... z ...
ZZzzZZZZZZZZzzzz
QWOWOWOWOWOWOWOW
u
u
u
"
o
"
"
"
u
ou
OM
00
O.
00
ou
"
Figure 6.27.
00000
00000
OOQOOOO ...... _0 ...
0000000000000
00"'0'"
., ... MftN
............ ""
... 0 ... ..., ...
.., ... 10 ......
..,O ......... ... <O
...<oot-- ",..,,,,,,,t-- .. .
0.., ................ " .... (1)0
.." .. .., ... ..,0 ............ 010
.., ... .., ...... .., ............ ....
000000000000000000
.
0000000000
oeooeooooo
......... .,..10.., ... .., ... .
... 00"' ...... "' ...... ..,
"' ... ..,..,.,.(1)010 .... ....
... .... <D e ... 10 ... cD ... ..,
..... "''''10 ... (1)(1) ... ...
000
000
uuu
000
'00
HO'
H"O
oooee
eeooo
+ + + + +
101101101101101
... COOl 011)
....... 10...,..,
"'co ...... ...
.... co ... ...
cD ......... '"
oeoooooooooooooooo
III 1/1 III III
101 W W 101
WIIIWUlWUlWVl
:0: ... :0:"':&"':0:.-
'"''''''''''''''''''''''''''''' 0101010101010101
0 .... "' ... 0 .... 0 ....
":0":"''"'''''''0
0"'0"'00<00<
0":0,",o'"'0l1li
00000000
"
(Suite).
"
"
u
ou
OM
00
O.
o.
0"
n
"
"
u
u
"
GRADIENTS DANS L ELEMENT 3
P.G. 1 COORDONNEES
,
0.1143ZE+00 0.10553E+Ol
GRADIENTS ,-0.110SlE+00-0.Z5454E+00
P.G. 2 COORDONNEES
,
0.13821E+00 0.124i4E+Ol
GUDIENTS ;0.11648E+000.14037E+00
P.G. 3 COORDONNEES
,
0.16Z10E+00 0.14435E+Ol
GRADIENTS :0.13120&+000.25123&-01
P.G. 4 COORDONNEES
,
0.SOZI6E+00 0.10395E+Ol
GRADIENTS :-0.Z7711E+00-0.20122E+OO
P.G. S COORDONNEES
,
0.61034E+00 0.12405E+Ol
GUDIEHTS ;-0.28059E+00-0.11578E+OO
P.C. 6 COORDONNEES
,
D.7185ZE+OO 0.\4415&+01
GRADIENTS ;O.Z9573E+000.24060E-Ol
-<
P.G. 7 COORDONNEES
,
0.88222E+00 0.10049t+Ol
'"
."
GRADIENTS ;0.43817E+00-0.86922E-Ol
"
CC P.C. 8 COORDONNEES 0.10781E+<11 0.U210E+Ol
::.-
,
"
c:
CRADIENTS ;-0.44335E+00O.28634EOl -.
P.C. 9 COORDONNEES : 0.lZ740E+Ol 0.14311E+Ol
.Q
.,
<::
GRADIENTS :-0.46020E+00 O.40218EOl
'"
'"
"-
N
'"
....
"
-
C
<Q
CR1DIENTS DANS L ELEMENT
-
Cf)
.,
r:::
'3
-
'3
'"
P.C. 1 COORDONNEES
,
0.lOO49E+Ol O.88Z22E+OO
.,
GRADIENTS ;_O.4612ZE+OOO.9944ZE_Ol
--.
P.C. Z COORDONNEES
,
0.12&10E+Ol 0.10781E+Ol
C
"
GRADIENTS :-0.46380E+00O.47956EOl
P.C. 3 COORDONNEES
,
0.14371E+Ol 0.12740E+Ol
CRADIENTS ;O.45461E+OO-0.94S6SEOZ
P.C. 4 COORDONNEES
,
o .1039SE+Ol 0.50216E+OO
CRADIENTS :O.S161SE+OO-O.74187E-Ol
P.C. 5 COORDONNEES
,
0.1240SE+Ol O.61034E+OO
GRADIENTS :O.55835E+OO-O.36136E-Ol
P.C. 6 COORDONNEES
,
0.1441SE+Ol O.718SZE+OO
CRADIENTS :-O.S3S6ZE+OOO.7Z341EOZ
P.C. 7 COORDONNEES
,
O.10S53E+Ol 0.1143ZE+OO
CRADIENTS ;-0.6S031E+OOO.38Z70EOl
P.C. 8 COORDONNEES
,
0.1 Z494E+Ol O.138Z1E+00
'"
GRADIENTS :0.6Z23SE+000.20090E-Ol
P.C. 9 COORDONNEES
,
o .lH35E+Ol O.16Z10E+OO ....
GRADIENTS :-0.59409&+000.42941&-02
518
o
M
"
U
<
"
"
"
"
M
M
o
o
"
o
o
o
M
x
o
=
"
o
Mthode des lments finis
... "''''''''''''''''''' ...
.... .... ... ... ... ... 0 ........ 0 ................
. , , , .
. ... .. '
,
ltoJWlIl1rJ
... oN<oO
.". ... 0:0 ........
1')(00"''''
1-<11)"'00
"""
WM'
ILIt.:IIoJWWt.l1ol1oJ1oJ
"""
"' .......... 00 ........... ....
WWW
MM 0
"M
..,"' .... <000"' .... ..,0> ,.W
.OW
0.0
M ... CO .... N<DIOOO<D
"'''' .... CO 0 .. ..., .......
"' ... U).., .... <'lln"'C') M .... CO ...
000000000000000000000
000000000000000000000
000000000000000000000
+ t t + + + + + .. + .. t + + + + t + + + +
WtoJt.Jt.lt.lWWWWWt.lWt.JWt.lt.lt.lWt.JWt.l
000000000000000000000
000000000000000000000
000000000000000000000
000000000000000000000
000000000000000000000
000000000000000000000
OOM
000
000
000
000
o
MM
00
""
00
00
.0
".
11)"' ...........
OQ .... OOO
<:>00000
+ttttt
WWWWtolW
II)I-000NII1
... "'0 ....... '"
... OOMO<O
..,""..,"' .... N
.... "' ... MIDI!>
........ 0000
000000
.... 010(000
<')0<')1000
... 0 ... 000
... II) GO 0-. .... 0
.............. "'0
0000
0000
cScStStS
0.000
0000
0000
co <;1 0 0
0000
000000000000000000000
00
00
""
00
00
00
00
00
00000
00000
QQOII)CQ
OOOM",
000 .... 0
000<1>1-0
000 .......
0000
0000
+ + + +
fol fol fol fol
00""'00
010 ..... 1-0
tntn ... "",
1-0 Pl "''''
MM
00
'0
WO
MO
MM
00 ... 00 .........
00000000
+ + + + + + + +
folWfolWfolfolfolf.ol
tnl-oOOOOOO
"'<1>000000
..... OOOOOtnO
",oo",OtnO""'tn
... "' ... tnl-o .....
000000000000000000000
... ""'.., ... ","'1-000"'0 ..... ""'.., ... ","''"'00'''0 .....
.................................. ""''''''
Figure 6,27. (Suite),
o
o
o
o
"
"
o
=
o
M
"
."
'"
c:
CI>
0>
'"
al
m
X
ro
3
"0
CF
c.
ro
-
-
" ::J
!!l.
ro
:l
C.
a>
"
:T
'"
ro
c:
-
::J
o
::J
'"
-
"
-
o
::J
::J
"
-ro
M. E.r .3.
IMAGE DES DONNEES SUR CARTES
G.TOUZOT . G.DHATT
... _-
NUMERO
DE CARTE
,
,
3
4
S
,
7
9
"
"
"
" 14
15
16
H
"
" 20
"
" 23
24
"
" Z7
"
" 30
" 32
33
34
3S
36
NUMERO
DE CARTE
,
NUMERO
3
DE COLONNE
4
, ,
7
123456789012345678901234567890123456789012345676901234$6789012345616901234561890
COMT
TRANSFERT DE CHALEUR DANS UNE CARREE PERCEE
COOR
"
,
,
9
14
" o
CO NO
,
1
0.0
0.3821
0.707
0.9239
1.0
13 16
o
PREL
0
ELEM
SOLC
TEMP
STOP
4
1.4
4
, ,
3
,
0
1 0.06545
" 20.1309
9
3 0.2616
,
0
14
3.0E5
0.0
,
O. ,
1.0
0.9239
0.101
0.3821
0.0
"
1.4
,
,
1
"
o.,
0.0 5 0.0 3.0 0.0
0.0 8 1.5 3.0 0.0
0.0 13 3.0 3.0 0.0
0.0 16 3.0 l.5 0.0
0.0 21 3.0 0.0 0.0
1.4 2.03E6
, , ,
9
"
"
7 3
,
1 1 3 7
"
"
13
,
4
12345618901234561690123456189012345618901234567890123456789012345678901234567890
234 5 6 1 8
N UME RaO ECO LON N E
FIN o E , DONNEES
--<
'"
" ::Jo
'"
.z;.
<::
'"
;}
"0
Cl
:3
:3
.,
-
'
'"
()1
'"
w
o
-
o
-
o
-
-
o
-
"
o
w
o
520
.......................................................
<'t ........ "'.., "'..,,.., ...
N ...... ...... O
1""' ...... 1"1 .... "'.., ... "".,.
................................................
OC-C OC ""oC oC oC "'" OC OC OC
<oo;C..cCoCcocoe
...................................................
0>,* ... <0", ...... 010.'"
NN ....... =O l'llO .....
.... NNNN<"I""..,..,..,f")
..................................................
oeoe ....... oecoeOC..:OC
.......... ,... ..
1olIolIo.lIolIolWt.:lt.1t.lIolW
CCQOOQ!::IoOCCC
Io.lIolIolWWWWIolIolIolIol
IolIo.lIo.lWWIo.lWt.lWWW
OOI"lUUUUOOUO
...: ......... oo:oo:oeoo: ....
..J..l..J .... ..:...l.J..J..J..J..J
","a..","Q.o.Q.Cl.A.lI.o.a..
00
wua
W..J..JW..J..lU
a:Qc:lXClCI"-
IolIo.lWWWWIolWIolIolIol
...J..J..J..J...J..J..J..J..J..J..J
... CO .. COCOlIDcQCO ....
oeoe ...... oeoeocOCCOC<
....................................
o
W
=
Mthode des lments finis
... "' .........
o 0
o
WW
00
00
00
00
MM
WW
.0
00
00
00
00 00
o
.............................
..:o<W .... CO
o.Q.f-t.:Itlllol
... :o:;p..;II;
......... :.: .... 1010
..., ..... '-' .....
o
-
.0
Z..lWIol
loloe"'Z
0.0
o w
.... ::.WQ
0 ..... 0
IICIolOO::':
O>JE"
0"'0101
..... X II:
"
0_
_0
0-
-"
0"
WW
00
o
o
WW
ON
00
O.
00
00
00
MM
""
--
00
.-
00
--
00
WW
--
Figure 6.28.
"
o
-
o
" o
"
o
o
" o
N
o
W
o
o
o
0<:> ......... 0 ....
0000000
.. ... t
IolIolWWWWW
0 ... ", ... <1)<0>
.................... ."
"''''''''''0'1 ... 111
...... 0 ... 1'1 ...
....... "'I"II"IN.
. ' .
00
.. .
0000
CI 000 ...... 0
00000000
.. .... - . . ..
Wt.:lt.:lt.:lt.:lWWr.J
IIl..,O,,"GoO_O
0""0" ..... ..,..,0
_1n0 ... ..,1n..,0
0
t.lWWIol
"'0"''''
0"' .....
... ..,"'111
'1) .........
""N
o
"W
00
00
00
0
"0
.., .... ON ....... 0
N ... O" InNO
000000000000000000000
ggggggggg
" " " " " " ... Wt.:IW/o)klt.:IWWW
000000000
000000000
OOOOOOOOc:>
0000c:>c:>c:>00
ClOOOOOOOc:>
00000000
00000000
WWIolWlollolt.:lt.:l
00000000
OOOOOClOO
00000000
00000000
00000000
00
00
o 0
""
00
00
00
00
00
00
00
o 0
""
00
00
00
00
00
OOOOOOC:>OC:>OC:>C:>C:>C:>C:>OOOOOO
00... 00 ... 000
OQOOOOOc:>OOO
WWWWWWWWWWW
OOOoo.,,,,,OONII'/
OOOOOGlGlOIn ......
Q 00..., 0 ... 0 01'1 0'"
0 ... 0 ...... "' ..............
Ill'" .(10 f'I""(IO
_ ... 00
0000
"'011'100
1'101'10
.... 0 .... 0
... ." ... ...
""'
000000
OOClOOO
000000
ClOClClOO
000000
II>OOOOCl
"'OClClOO
000000000000000000000
000<;10000000
00<;100000000
OOOOO",,<OOHII'I
00000.., ... 011'1 ......
00000 .. 00,",0,,"
00000"' ... 11'1.., ....
00000 ...... "'''' ... '''
........ 00 .... 00 .............
OOQOOOOOOCl
" " f
WIolWWWWWWWIol
... 0.., ... 000000
l'IO'''''OOOOOC
.... O .... OOOOO.C
........ 00 .. 011'10 ... 11'1
................ ..,..- ...
000000000000000000000
.... ... IIl ..... "'O ...... .., ... .., ...... OO""O ....
.... .... ................ "H
(Suite).
"
o
w
o
--
00
ln ............
00
w"
00
00
00
00
00
..
"w
gg
00
00
-
00
.............................
111111"':':..1"
IoJ .... "'u
.......... 101111(01
OM ... ., ... .:
........... Z .... W (>
'-' .......... ....
"
o
-
0 ..
toi..: .. :.:
Z ....... ::.
wo X
"
_OW
O"
.W.
u
U_O
.XX
=
Technique de programmation
0_
o
WW
. -
0_
00
Z ' .
00
xx
ww
ZZ
00
zX
-"
x x
00
-
WW
_ .
w
o
Z
"
"
-
"
o
w
u
w
o
N
" o
Q
"
o
000 ........ 0 __ 00
0000000000
+++.of. ++
"'''''''''' "" .. ,Wlol ""'"
O .... ooOllOIll ....
<'111110 ...... .., .. 0 .. ...
"' .. OIO ......... UiI .... ..
.... "'''1 ... '''"''<0 ........ ..,
<') ....... CO"'<"I 40 .. ", ...
000000000000000000000
00000000
00000000
gggg gggg
00000000
0000000<>
00000000
000
000
"""
000
000
000
000
000
0000000000
0000000001:>
gggggggggg
0000000000
0000000000
0000000000
000000000000000000000
00 ........... 00 ..... 0
DOClOOClClOOO
oooOOcn"'OON
OO<;><;Ig ...... O .........
OQOIllO_OOf"lO
OUlON ...... CI!IU>U> ...
................... "' .........
0 ....... 00000000
00000000000
ltI"OU>0IIC10000Q
... ..,0..,"'000000
...... .. .. 00000
000000000000000000000
00000000000 __ 00_00 __
000000000000000000000
0
_
000000000000000000000
Figure 6.28. (Suite).
521
522
"
o
" Z
o
Z
<t> .... IIl .............
cO 00
1/,](.1 IollIJ
00 00
00 00
00 00
00 00
MM
00 00
. ..
,.... ,...... ,...., ,.., ,..,-.
/1)/1)1>:::<:,.,'"
Il.Il- ... WVlIol
Q "" ... XII.. X
.......... :.:: .... "'0
....................
Z
o
" .
" .
.0
...
1<"'X 1-
"'1- ... .,
II) lol"'U
.... ::>t.lO.." ...
0<<1110 ... 10-
Dol t.,l m::r: 010..
0:>- X I-'( t.:I
0"'010]<'><:0
OO:ZZ:.;o..O
00
zz
00
ZZ
zz
00
""
""
""
""
" "
Mthode des lments finis
N
o
o
"
o
z
00000000000 ....
000000'000000
t + + + + + + + + + +
Wt.ltolWIIJIIJ"lt.lWWWt.:l
0000<;10000
000000000
... ..,<"100"""'''' .... <1)..,. .... '''
01-000 .... <0"''''0
00 .... 00""1<1'>0
0","11)0011')1000
0..,.,.."''''<00 .... ..,<1><00
.... a:o .... NNOMO<t>MmO
<"10..,"'<0""'(1)"'00 .......
"'''<')<'1''''''''' tOM <0
o",,,,o ... ..,000
0 ........ 0 ... '" M .... 0
000000000000000000000
00
00
""
00
00
00
00
00
0000000
0000000
0000000
0000000
0000000
0000000
0000000
00
00
""
00
00
00
00
00
OOOOOOQOQO
00<;10000000
+t++++++++
!WIIJWWIIJIIJWIIJW
OOOOOOOOCO
OOQOOOOOOO
0000000000
0000000000
00000<;10000
000000000000000000000
OQ ............
00000
0<:1000
00000
OOQII'IO
01110",1/)
00 .... 0
0000
11),..00
"''''Oltl
... 001')
U>IOI/)Itl
.. "
00
00
N"
""
O.
oN
-" 00
00
MO
_0
."
00000
00000
1tl10000
"1"'000
.... 0000
"''''1tl00
...... 00
000
000
000
000
000
000
000
000000000000000000000
00000000000
00000000000
oooOOcnQ)OONItl
OOOOO"lu>ocn .... ",
00000 .... 00<')010
OOOOO<l> .... ItlItl ... N
00000 .......... <')10",
-
00
""
00
MO
_0
. "
-
00
00
""
o.
.... 00 ..........
000000
+ + + + + +
Iollollollollollol
000000
000000
0000 .... 0
1tl0100NItl
..... cn"' .........
000000000000000000000
... N.., ... ItlU>"'<l>O ..... N.., ... Itl"' ... D>o ...
........................................ NN
Figure 6.28. (Suite).
o
"
o
w
z
"''"' .... .......
00 00
10.110.1 10.1101
00 00
00 00
00 00
0;10 00
",... ... ...
00 00
1 "
,.... ........... ,... ........
o 1>< ... Z o.:.::
........... :.; ... 10.10
..................
z
o
"
0
..
10:10<"'%
0
z
Technique de programmation
" o
w
o
o
o
z
"
w
o
z
w
w
"
w
o
b
W
o
o
o
" o
z
OOOOOOQQ
00000000;1
000 ... 0000
00000000
WWWWWWIolIo:l
N "'1 .... 01 "'0
...... 0..,0;1"''''0
1110"'''' 0'" NO
............ 0 ....... 0
... .., O>Oll'lNO
OOQOO
OOQQO
""WIo.IWW
...... "'NO
N_t<l ... O
.., ..... 100
0",('<100
... ..,N 0
0"'''''''.., .... ('<10
10 0 "'.., N.., N'"
... .., ......... ..,.111
... ...... ('<1 .... "'-,.
1t) ...
000000000000000000000
0000000
0000000
0000000
OOOOOOQ
0000000
0000000
OOOOQOO
000000000000
000000000000
+
WWWWIolWWWWWWW
000000000000
000000000000
000000000000
00000 0000 000
000000000000
00
00
00
00
00
00
00
000000000000000000000
00.
000
www
000
000
000
o W 0
....... 00
0000
"00
000
"WW
00.
0".
'.0
0 ........ 0000
0000000
+.
IolWWWWIo:IIol
111"'01/)1000
...... 0 ...... 00
....... 0 .. 000
................... 0
...... ... ... 0
0000
0000
.. .. . .
Io:IWIoJIoJ
oeoo
oooe
oeoo
0000
0000
00..,'"
000><1>
..,0 ... 0
... ...... 00
000000000000000000000
000000
000000
0000011'1
OOOoOM
00000 ...
00000,""
00000 ....
00000 ....... 00 ... 00 ........
000000000000000
............. + + ...... +
IolWIolWWWWIolIolWWWWWW
1000l..., .... orn ... oo oo oo
"'011) ...... ..,0"'01000000
00<"10"' .... 0 .... 00000 .... 0
... 111111"" 11 1/) ... a) VlO .... o NI/)
....... ..,"'01 ............... "' ...
000000000000000000000
.... 1"' ... ..., ...... 100>0 .... 1.., ........ "' ... <1)'""0 ...
........................... 11
Figure 6.28. (Suite).
o
o
o
o
"
W
o
o
o
z
"
523
524 Mthode des lments finis
6.7 . 2 LASTICIT PLANE
Etudions la rpartition des contraintes et dplacement s dans une arche
elliptique de pont en bton dfinie par la figure suivante:
E
"'
E = 0.2 x 10
7
lonn.5/m
2
li 0.3
paisseur: 1 m
poids spcifique 1 p. 2.3 tOMes 1m
3
16
--------6m I ~
Les sollicitations sont constitues par le poids propre et par une force
concentre de 10 tonnes. Nous utilisons des lments isoparamtriques
huit nuds de type 2 (paragraphe 4 . 3 . 5) avec l'hypothse de contraintes
planes.
Les donnes et rsultats de MEF. obtenus en utilisant les blocs LlNM
et VALP, sont prsents sur les figures 6 . 29 et 6.30.
"Tl
CC
c:
~
CD
'"
N
CO
m
X
'" 3
'0
'"
Cl.
a>-
0>
'"
-
"
",.
a>-
U
f
::l
.'"
'0
o
0-
co-
3
'" D-
a>-
.0
c
0-
-
CD
M. E.F .3.
IMACE DES DONNEES SUR CARTES
G.TouzeT , C.OHATT
~ ~ ~ ~ ~ ~ .. ~ _ ...... _--_.--_.
NU MERe
DE CARTE
1
Z
3
,
5
7
8
10
11
12
13
" 15
16
17
18
" zo
Zl
za
"
" Z5
"
Z7
"
" 30
JI
32
33
" 35
" 37
38
"
"
NUMERO
DE CARTE
NUMERO DE COLONNE:
12345618
12345678901234561890123456189012345678901234561890123456189012345676901234561890
. _. _. _. _ .. _. _ ....... _ .. _ ... _ .............. _. _ ....... _. _. _ ..... _ ......... _. _ .... .
COMT
ANALYSE: ELASTIQUE: D'UNE: DE:MIEARCHE: E:LLIPTIQuE DE: PONT E:N CONTRAINTE:S PLANES
COOR
" 3
z z
5
Z
7
lZ
17
" 1
,
,
11
" 16
"
" Z1
" Z5
Zl
za
1
COND
11
26 27
10
2
0000000000
PREL
1 ,
1
ELEK
5
1
8
,
0.00
0.15
0.00
1. 50
3.50
5.00
5.75
0.00
0.75
1.50
2.50
3.S0
4.25
5.00
5.75
6.00
6.25
6.50
6.50
6.50
6.50
Z8
3
2.0E6
Z
5
"
0.3
o
3.50
3.50
3.25
3.20
2.97
2.58
1. 70
3.00
2.98
2.90
2.73
2.44
2.12
1. 66
0.86
0.00
0.00
0.00
0.87
1. 75
2.62
Zl
o
22 Z3
0.0
o
" 20
Z.3
,
6.50
5.75
7 8
3.50
3.50
5 3 2
5
5
12345678901234567890123456789012345678901234567890123456789012345678901234567890
1 2 3 4 5 6 1 8
NUMERO DE COLONNE
~
"
""
"
.;s.
c::
'"
~
"C
c::
~
;,
;,
.,
-
"
'"
'"
'"
526 Mthode des lments finis
0 0
"
"
M M
"
"
" "
"
0
"
"
" "
"
M M
" "
"
"
0
0
"
W
" "
W
"
"
M M
" "
W
0
"
"
0
0
0
"
"
0
" "
0
0
0
"
0
M M
" "
0
W
"
"
W
0
"
0
0
"
0
" "
W
0
0
"
0
M M
" "
" "
"
W
M 0 0 0
"
" 0
" "
0
0
0
M M
"
0
"
"
"
"
0 0 0
"
"
"
0 0
0
M M
"
0
"
"
"
"
0
"
0
"
"
"
"
"M
0
"
M
0 M
"
0 0
" " "
"
"
w
"
"
M
"
0 W
0
"
0
" "
W
"
W
"
0
0
0 0
"
W
0 0
Figure 6.29. (Suite).
"Tl
CC
c:
~
CD
'"
N
'"
-Cf)
c:
~
CD
COMMENTilIRES
ANALYSE ELASTIQUE D'UNE DEMIE ARCHE ELLIPTIQUE DE PONT EN CONTRAINTES PLANES
LECTURE DES NOEUDS (M_ 0)
NOMBRE MAX. DE NOEUDS
NOKBRE MAX. DE D.L. PAR NOEUD
NOMBRE DE DIMENSIONS DU PROBLEME
FACTEUR D ECHELLE DES COORDONNEES
ESPACE DE TRAVAIL EN MOTS REELS
LECTURE D&S CONDITIONS AUX LIMITES (M_ 0)
.................................
CARTES DE CONDITIONS AUX LIMITES
(NNT)_
(NDLN).
(NDIM).
(FAC)
(NU).
"
,
,
0.10000&+01
20000
0.10000E+01 0.10000E+01
>1100000000 0.00000&+00 O.OOOOOE+OO O.OOOOOE+OO 0.00000&+00 O.OOOOOE+OO 0.00000&+00 0.00000&+00
>
,.
"
,.
0 0 0 0 0 0 0 0 0 0 0 0 0
;;<
g..
'"
.(5'
<::
'"
~
~
~
::!
::!
'" >1000000000 O.OOOOOE+OO O.OOOOOE+OO O.OOOOOE+OO
~ ~ ~ ~ ~ ~ ~ ~ _ ~ ~ ~ ~ ~ ~ n n ~ _ n ~ ~ n ~ n ~ n ~ _ ~ ~ n ~ ~ ~ ~ n ~ A A A A A A A A ~ A ~ ft A A A A A ~ A A ~
0.00000&+00 0.00000&+00 0.00000&+00 O.OOOOOE+OO
> 1
, ,
" " " " >0000000000 O.OOOOOE+OO O.OOOOOE+OO 0.00000&+00
NOMBRE DE NOEUDS TOTAL
NOMBRE DE D.L. TOTAL
NOMBRE 0 &QUATIONS A RESOUDRE
NOMBRE DE D.L. IMPOSES NON NULS
NOMBRE DE D.L. IMPOSES NULS
NOMBRE TOTAL DE D.L. IMPOSES
0 0 0 0 0 0 0 0 0
O.OOOOOE+OO 0.00000&+00 0.00000&+00 O.OOOOOE+OO
(NNT).
" (NDLT).
" (NEQ).
.,
(NCLNZ). 0
(NCLZ). 13
(NCLT). 13
O
'"
(J1
'"
...,
528
Q
o
W
Q
o
Q
o
o
u
N
- W
Q Q
o
Mthode des lments finis
__
00000
00000
.. . .. .. ..
1ol1.:l1Ol1ol1ol
00000
00000
00000
cecco
00000
00
00
ww
00
gg
00
00
..... _N"'NNN","",,,,_ ....
00
00
ww
00
00
00
00
00
0000000
0000000
000000 0
0000000
0000000
0000000
0000000
000000
000000
. ........
000000
gggggg
oooooC!
0000
OQOO
........
Io:IWWW
OOOQ
0000
0000
0000
0000
00
00
00
00
00
00
00
0000000000000000000000000000
"" "
00000
oooCiO
00000
<;)1/)0100
0"'..,(1011)
MM"'"'"
......... _-----_ ....
00000000000
.. .. .. .. + + .. .. .. .. ..
WWWWIolIolIolIilIolWW
00000000000
00000000000
000..,0 ..... 0 ... 0""
"'N III .. .., ... 0>", '"''" 10
N"''''NMNNMNM
"
00
ww
00
00
N M
00
ww
00
00
00 _ .
........... 000
oooooC>
000000
000000
"''''0000
.. 111.., ..... 0
... ..,011100
00
00
ww
00
00
00
00
00
0000000000000000000000000000
00000 ......
0000 000000
'ott
WWWWWIolWIolWW
00000;>0000 ...
000000010010
0000,000 ... 0 ...
<;1<;1011111'111111'1"'11'1""
<;1 <;1 <;I ................. N 1
.... _................
<;1<;10000000000000
OOOOMOOOOOOOOOO
00000')0011'10000000
OOIl'lIl'lIiOOO .... IIIII'IOOOlnO
IIIII'INN<;IOOCO ........ ..,..,." .... 11'1
..,..,.., .. ""111.., .. 11'1...,"'''''''11)'''
000
www
000
000
o
0000000000000000000000000000
NNNNNNNNNNNNNNNNNNNNNNN1NNNN
Figure 6.29. (Suite).
."
CC
1:
CD
en
'"
'"
-Cf)
1:
-CD
LECTURE DES PROPRIETES ELEMENTAIRES (M. 0)
.............................. _-_ ..
NOMBRE DE GROUPES DE PROPRIETES
NoMBRE DE PROPRIETES PAR GROUPE:
(NGPe;).
(NPRE).
CARTES DE PROPRIETES
>
>
1 0.20000E+01 0.30000E+00 O.OOOOOE+OO 0.23000E+Ol
1 O.OOOOOE+OO O.OOOOOE+OO O.OOOOOE+OO O.OOOOOE+OO
LECTURE DES ELEMENTS (M. 0)
.-. __ .. __ .......... -
NOMBRE MAX. 0 ELEMENTS (NELT).
NOMBRE MAX. DE NOEUDS PAR ELEMENT (NNEL)_
TYPE 0 ELEMENT PAR DEFAUT (NTPE).
NOMBRE DE CROUPES 0 ELEMENTS (NCRE).
INDICE DE PROBLEME NON SYMETRIOUE (NSYM)_
INDICE D ELEMENTS IDENTIQUES (HIDENT)_
[;LEMe;NT: 1 TYPe;: ;;: P.M.: 80.1..: Iii PROP N.:
CONNECTIVITE (NE)
,
,
7 8
ELEMENT: Z TYPE: Z P. N.: 8 0.1..: 16 PROP N.:
CONNECTIVITE (NE)
,
9 U
" " ELEMENT: 3 TYPE: 2 P.N.: 80.1..: 16 PROP N.:
CONNECTIVITE (NE) U H
" "
"
ELEMENT: -1 TYPE: .2 P.N.: 80.1..: 16 PROP N.:
CONNECTIVITE (NE) H U
"
"
23
ELEMENT: 5 TYPE: 2 P.tL: 8 O.L.: 16 PROP N.:
CONNECTIVIT& (NE)
"
Z7 Z8
" "
HAUTEUR DE BANDE MOYENNE. 9.1 MAXIMUM.
LONCUEUR 0 UN TRIANGLE DE XG CNXC).
NOMBRE DE POINTS 0 INTEGRATION (NPG)_
,
5
,
,
0
0
o PROP EL.:
5 3
o ?ROP EL.:
"
o PRO? EL.:
" "
o ?ROP EL.:
" "
o PROP EL.:
"
"
"
393
"
,
7
"
"
"
4 GROUpe;: 0
-1 CROUPE: 0
-1 CROUPE: 0
-1 GROUPE: 0
-1 CROUPE: 0
;;<
g.
" .i;
"
'"
;}
."
o
"
-
"
"
on
'"
CD
."
(Q
c:
.,
CD
en
N
cc
Cf)
C
-CD
-
LECTURE DES SOLLICITATIONS CONCENTREES (M_ O)
CARTES DE SOLLICITATIONS NODALES
>
>
>
1 0.00000E+000.I0000E+03
3 0 0 0 0 0
-1 O.OOOOOE+OO O.OOOOOE+OO
o o
ASSEMBLAGE DES SOLLICITATIONS REPARTIES (M_ 0)
ASSEMBLAGE RESOLUTION LINEAIRE CM_ 0)
INDICE DE CALCUL DU RESIDU
f;NE:RIE: (ENER)_ 0.1S641E01
o 0 o o o
(NRES)- 1
PIVOT MINIMUM VALEUR ABSOLUE 0.33159E+06 EOUATION: 7
VALEUR ALGEBRIQUE_ 0.33159E+06 EOUATION: 7
DETERMINANT 0.39532E+02 10 -+ 270
RESIDU DE RESOLUTION MlX._ 0.1989SE13 EOUATION 13
o o o
Cl
W
o
S;:
0>-
S
C
g.
<l>_
-
<l>_
:3
<l>
"
0;
'O.
Technique de programmation
OOC
00 0000000000000000000000000000
o '" "" , -+ -+ -+
X
N
__ oowwNMm_ow_M.mw.mw.wmmooo
____ NNN mmwMMNNNN_OOO
0000000000000000000000000000
OOO M.M.mM m ooomoooo
0000000000000000000000000000
+t+ ' , +++.++++
WWWWWWWWWWWWWWWWWWWWWWWWWWWW
oooromwmMmNN.ONro.N_ooooomoooo
OOO.WNN_N WN_.WNN._NOOO_OOOO
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
o
o
o
"
o
0000000000000000000000000000
000
000
"""
000
000
000
000
000
0000000
000011>0'"
...
" " 00
00
00
00
o.
MM
"""
000
"""
OOM
OOM
co
NNO
M"
.........
00000
............ +
WWWWW
00000
OOlnoO
00 m ....
...... .......
000000
+ + + + ... +
wwwwww
000000
000000
00011>00
... 1I>0
" "
00
00
00
00
NO
0000000000000000000000000000
... mmo ..... ... mo ... NM"'II>", ... m
........... .... NNNNNNN"'",
Figure 6.29. (Suite).
531
532
>
"
w
>
W
"
"
-
.>
w
W
J
W
J
"
0"
" w
-
-
_u
O.
U
Mthode des lments finis
-
"" 00
WW
,-
0
.-
"
-
<'INN..,
0000
............
....... <'1<'1
.., ..........
.......... 0
-
-"-
000
WuW
O,_
-, ,
00_
0 __
o
N _
00
WW
o-
N'
-
"" 00
WW
00
0'
0_
-"
-
o
-
-
o
NNNNN
00000
.. .. .. .. ..
IolW'-lWLl
... NCON ....
....... mCOCD
... 1'10 ... ..,
0 ...... .., ...
","'..,Nf')
0000000000000 0000 0
... NN NN ... OO .... NN
OClOOOOOOOOO
.... ttt ......
t.:IWlollollolWWWWWW
00 0
WU"
N , O
NO
-.-
_. "
... NN<'I
0000
.. .., ... "' ... 1/) .......... .., ...
... 0 ............. "'10<'1 ... ..,
0"'0"'<1>0<110<,)"''''
0 ......... .., ... 00,.., ... "''''
........... CONN ......... ...
N..,'O",
..,..,MCO
0..,,,, ...
...... "'0
._.
000000000000000000
..
1"''''0<'1''''''011'''
000000000
tt .........
WloliollollolWWWIo!
... .., CO'" N ", ...... 0
..,O"'ONO"'._
.., .......... .., ... ..,oDM
............ .., ......... ...
CI> ....... NN ...... ...
OOC
WWW
NN.
00.
-o.
---
.
"'NN ... NN
oeoooo
t
IolWIolW,",W
............. <0 ...
............ .,,0
...... cD ... .., ...
........ co ... ...
.., ......... '"
000000000000000000
.
... ... ... .., .., ... ... ... ...
o 0 000 0 000
"
o
o
o
W
"
-
-
o
o
"
o
o
o
o
-o
"
o
,
o
o
o
o
o
-o
o
-
-
o
W
N
o
o
"
o
o
o
o
o
"
"
"
o
-
o
W
o
"
o
o
o
o
-
-
o
"
o
o
o
W
o
o
o
"
o
o
o
W
-
"
"
-
o
-
o
-
o
o
o
o
o
-
o
W
o
o
-
o
o
o
"
o
o
o
o
o
"
-
N
N
o
-
o
W
o
o
o
o
o
u
o
-
-
o
o
o
" o
-
o
-
o
o
" o
-
N
o
-
o
u
o
o
"
o
o
o
u
-
-
-
o
W
o
o
o
-
o
o
"
,
o
o
o
N
o
o
"
-
,
o
o
-
o
u
-
o
o
o
"
o
o
-
-
o
o
u
o
-
o
o
o
"
-
"
o
o
W
"
,
o
-o
"
"
o
-
o
-
o
"
o
o
"
-
-
o
o
u
o
-
"
o
-
o
W
-
N
o
-o
u
-
o
W
,
o
o
o
u
o
-
o
o
o
o
u
o
-
o
-
o
"
o
o
o
o
o
-.
o.
00
""
o
UU
MM
-
o
" u
>
w
o
u
00
-
,u
O.
u
N.N
000
O_ N
" ..
0.0
-_.
N.
o
,
NN"'NNN'"
0000000
... .... <'1 0 .... (0 N
OON"'''' ... .., ...
.., ............ <>1 ...
.., ......... "' ... M
... 1/11 ..... <>1
-
-00
"U
NO
O.
--
0-
-.
o
-
-
-.
00
.0
0-
--
- N
000000000000000000
... N .. N ....
IoIWWIoIIoI
MM"'M'"
.".., .. (0'"
.011''''''(1)
0 ...... "'0
1"100 ..... (0
""<>1.., .... ..,<>1 ......
00000000
101 101 c.J1oI 101 c.JWW
(1)'''1''11''110..,.
"'N"' ... "''''''' ....
ON ... "' ..... (O..,'"
..,ON"'''' ...... <')
"' .... N .... ..,
WU"
._0
o.-
,--
o
M _
00
""
_ .
.-
000000000000000000
N_
00
.-
f'oI ... __ <')
00 000
t.)IoIWWW
0", .. 010
.. "",,, ...
.............
CI""""'''' PI "'10"'_
.
NO
O"
-_.
'0-
..0
.,.
"''''NNN ....
000000
WWWWW"-l
.... "' ... 0 .... .,
"" .... --'"
"''''.10.,,,,
"'''' ... 0..,''
.., ......... ..,N
.N
00
uu
.-
o.
."
000000000000000000
..
... ... ... ... .. II'! .. .. 11'1
000 0 0 0 0 0 0
W
-
,
o
o
o
o
-
o
o
o
-
o
"
"
"
o
-
o
"
"
,
o
"
"
"
,
"
-
"
-
,
,
"
"
-
o
" o
"
o
o
"
o
o
"
M
M
N
o
o
"
-
o
o
-
o
W
N
o
o
o
"
"
o
o
u
-
o
-
-
o
o
u
o
o
-o
"
-
N
o
-
o
"
-
" o
o
-
-
o
o
o
W
-
-
o
o
o
"
-
o
-
o
"
o
o
-
o
W
-
N
o
o
o
o
o
W
-
o
-o
"
N
-
o
-o
"
-
N
o
-
W
o
o
o
"
N
o
-
"
-
o
o
W
- ,
o
-
o
"
"
N '
o
o
-
o
,
o
o
"
-
o
o
"
o
-
o
"
o
o
"
o
"
o
o
"
-
o
o
"
-
-
o
u
-
o
-o
"
-
"
o
-
o
N
-
o
Figure 6.29. (Suite).
N
" o
Technique de programmation
"'N ............ NI .......................................... I/).., ......
....... _ ... 000
t
w ......... ... wwwww ... www .................. www ... ww ... ...
...... 0 ... ... ... m ... o"' ... O"'C ... No_ ... "'''' ...
_00 ... ...
0<1)",1/)(0
." ...... 0'"
"' ..... ..,'"
......... NNM ... "' .... ", ... N ...... NI
0000000000000000000000000000
t
N
00
""
00
N
N ... ...
o ... ............ ...... 0
. ... . . . .... .
...
........ I/)(Oo ...
......... OI/) ... ...
.... ... O ... IO'''IO
0.., ... "'''''''' ........... ..,'''.., ...... ''''10''''10
... " NNNm", ... ""N"'N ... "''''CON
.......... N
WWWWWWW
IO ... "' .........
... "' ......
.... ... N .......... ...
... 0 ... 01O'"
NMm"''''
0000000000000000000000000000
OOCooOO
0000000
wwwwwww
0000000
0000000
0000000
00:>00000
0:>000:>0:>00
0:>000000000
0000000000
000000
000000
ooccc
ocooo
t t
wwwww
ooocc
00000
00000:>
00000
00000
0000000000
0000000000
0000000000
0000000000
0000000000
000000
000000
000000
000000
000000
0000000000000000000000000000
00
W"
00
00
ON
...............................
00000000000
00000000000
00000000000
O.OOOOMO ..... O
I/)CIO"'''''''''''''''''''''''''
.................. "" ......... M
00
""
00
00
NO
.
.......................... 00
0000000000
0000000000
0000000000
"'IOOOOI/)NOOO
...... ............
................... 1')11
000
000
000
000
000
.00
0000000000000000000000000000
00
WW
ON
O.
NO
000
O
000
O
..
..
O.
""
NO
"
.... .........
0000000
t
wwwwwww
0000000
<;l01l')0000
<;l 0 10'" 1-< 1/) 1/)
1111/)"'11)1/)"''''
.......... ...
0000
wwww
oooe
0000
011')00
<1)1-<11)0
",tn"''''
00
""
.0
OOOOOOOOOOocooooooooeooooooo
.... N ...... n ..... IO"'= ......
Figure 6.29. (Suite).
o
o
o
o
N
N
w
w
"
o
o
533
534
o
o
o
M
- 0
M
-
.0
o
"
M
"
o _
00
.
o "
o
M
"
" -
0
o
"
o
M
"
" -
MO
0
.M
- "0
o
-
M
"
-o
M
"
W
"
-
Q
o
"
o
L
"
Q
"
o
-
L
-
"
W
o
"
-
" o
"
o
"
o
-
"
W
"
"
""
o
o
00
MM
MO
0"
Mthode des lments finis
M..,..,"'"" ...... NNNNN
"
"
"
o
M
"
-
"
"0
o
o
o
o
_0
0"
O.
o.
o
o
M
Q
"
o
"
"
o
0-
Figure 6,30, Exemple d'lasticit plane, valeurs propres,
o .
o
"
"
-
M
O.
- "
M
_ 0
o.
_ 0
0
"
- " O.
o 0
0
M
"
OM
o
- .
o
"
"
-O'
o
-
"
0_
o
-
"
-
-'
NUMERO
DE CARTE
--------
"TI
"
CC
"
c:
43
CD ..
..
'"
"
'"
"
0
..
49
-
" en
--------
c:
NUMERO
-
DE CARTE
'"
NUMERO DE COLONNE
1 234 5 6 1 8
12345618901234561890123456189012345618901234561890123456189012345618901234561890
s
1
SOLC
3
1
SOLR
VU?
3
STOP
o o 1 o
0.00 -10.00
20 0.001 0.0
26 27 za zs 21
"
16
"
,
o 12 1.0-12
12345618901234561890123456189012345618901234561890123456189012345618901234561890
1
,
3
NUMERO
, 1 N o & s
o &
, ,
COLONNE
DONNEES
, ,
;;'
3-
::.
.i;'
"
"
1>
a
3
-
o'
::.
'"
w
'"
."
cc
c:
il
'"
~
-
en
c:
~
<1>
-
(dbut des rsultats manquant, identique la fig. 6.29)
ITERATION PAR SOUS-ESPACE M ~ 0)
ITERATION
ITEiATXON
ITERATION
NOMBRE DE VALEURS PROPRES DESIREES (NVAL?) .. 3
HOMBRE 0 ITERATIONS MAX. (MITER)_
"
INDICE DE MASSE DIACONALE (NMDIAC)_ 0
PRECISION SUR LES VALEURS PROPRES (EPSLB)_ 0.10000E-02
DECALAGE (SHIFT)_ 0.00000&+00
DIMENSION OU SOUS-ESPACE (MSS)_ 5
NOMBRE MAX. 0 ITERATIONS DANS JACOBI ( NS'i'O_ 12
TOLERANCE DANS JACOBI (TOLJAC)_ 0.10000E-l1
1 ERREUR IIU._
2 ERREUR MAX._
3 ERREUR MAX._
0.5E+06 VALEURS PROPRES EXACTES:
0.4&+00 VALEURS PROPRES EXACTES;
O.lE-Ol VALEURS PROPRES EXACTES:
o
o
3
. . . . CONVERGENCE EN ITERATIONS
'"
w
en
~
S-
c
;}
~
<>-
~
~
<;
'"
,,"
1;"
o
N
-
o
o
o
=
-
"
o
t
"
>
Technique de programmation
00000
ClClCOO
11>011"''''0
... "''''w<n
... _<11 ......
"''''11100
"'''''''''''''
00
00
"0
-<
<"
ggg
........ IQN ... III <CI
"''''11)",,,, ......
M .... ","'M
11>",,,,.<'),,,1
"'NN ......
.N
.00
NN"
"""
""
, ......
Iollollo.llollollollollollol
"'''''''<01(1)000
"' .... 11) ..... ...,<1)000
...."' ........... 000
0000000000000000000000000000
"
"
"
-
"
"
"
"
"
o
N
" o
=
" o
000
000
000
000
000
000
000
_ _fl_ ........ .. " 000
00000000000000000000
, . . " " . .. + +
WIolIolIolIolIolIolIolIolWIolIolWIolIolWIolWWIol
o ... N ......... ...... NCI)NO ... "' O OO
M 11) ........ N ... '" "''''MO m"'''''''I1)''' 000
<nO .... "'II)II)N ... n ......... lI>n=_1I) 000
",U>O",Q;lMOMN=NCI),..O"'a)..,ooo
................ = .................. 11>011 ....... 000
"'0000
000 0 0
+ .....
IolWWIolIo:l
.... 0000
NOOOO
.... 0000
0000000000000000000000000000
ggg
000
000
000
000
000
<:IOOQOOOOQO
0000000000
000000000<;1
0000000000
0000000000
0000000000
0000000000
OOOOOOOOCIO
000<;10000<:>0
0<;>00000000
0000000000
0000000000
0000000000
0000000000
00000
00000
+ + +
'-l'-l'-l'-l'-l
00000
ggggg
00000
00000
0000000000000000000000000000
0000000000000000
+ +
Io:IW'-l'-lWWWWWWWWWWWW
0000000000000000
.........
000000000000
W'-lWIo:lWW&oJ&oJIoIIoJIoJW
000000000000
000000000000
00000<111'1000000
"l ... N"l __
0000000000000000000000000000
0000
0000
+
'-lt.,)t.,)'-l
0000
0000
0000
0 ...............
000000
0001'10'"
..................
"
000
000
000
"MM
---
000
OMO
0"0
NOO
..
--
000
"""
000
0""
00"
... -...... .......
000000000
000000000
000000000
CrloOOcnOOCrlO
...
."..,.., ... U) ...
0000000000000000000000000000
... ....
__ ................ NNNNNNNNN
Figure 6.30. (Suite).
537
538
o
"
"
o
o
"
o
" o
"
o
"
o
"
o
Mthode des lments finis
....... NOOO
000000
0 ..... "'<0.., ...
............ 0 ...
'"'0"' ...... ..,
0<')0..,.., ....
.., .... cnNNf')
OOOQOClOO
00000000
....... +.+
WIolWIolWIolWIol
InC,.. .... O<'lOOO>
.......... "'0 .... ", ....
... .., ... NNNN
000
000
"""
" ..
"""
00 .... 000
000000
.. t .... +
WWWWIolW
00 ...... 000
,",00"'000
.... .., ... 000
"'0"'000
"'000
0000000000000000000000000000
000 ....... 0 ......
00000000
000"''''<0<')'''
OClO'" cg ... .., ...
000 ... ..,.., ......
o ........... c-a ... _ .. N ...
000000000000
.. .. , .
1ollollollollWWIoIIoliolloll-l
...... ..,"' ...... ""1 ... <1:11'"
0101_0"' ....... 0..,110'"
.., ....... UI 00 CO ... oo .. NN
00..,.., .................. ..,0
.., ... "'..,.., ............ N ...
........
ClOCH O OOO
00000000
.ot._t
IolWIIJIolWWIolW
OOQ ... OOOO
000 .. 0000
00000000
000",0000
000 0000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
.. .. .. .. .. .. .. .. .. t .. .. .. .. .. t t .. t .. .. .. .. .. .. .. + +
0000000000000000000000000000
OOOOOOOOOPooocoooooooooooooo
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
.................................
0000000000
0000000000
0000000000
0 .... 00Xl0000..,0
O ........ <1> .... "'N.., ... ..,
"'.., ........... .., ...... ...
......... ..............
0000000
+++++++
0000000
0000000
...... 0000<1:1=
",01", ... 10<1:1'"
........ .., ... .., ......
.............
00000
+ + + + +
IolW"-lWW
00000
00000
00011> ....
ft ... .., ......
.... 00000
000000
+ + + t + t
000000
000000
000000
...... .-.000
.., ..... 000
0000000000000000000000000000
COOOO ...........
00000000
+++t++++
IolWWWWWWW
00000000
0000000 ....
OOOOOOON
COOIl> .... IOIO ...
000 ......... ....
...............................
000000000
+++++t++t
O"'COOC"'OO
0"'0000..,00
O"'OO""II>OXIOO
........... ",NNOOO
...... ..,..,.., ...... "'..,
................
00000
.. t + + +
Ui\o]WWW
00000
... 0000
... "' .... 00
0 ............ ....
....... "' ... ...
.................. ...
000000
++++t+
WWWWIo.IW
000000
000000
01110011>0
",..,1t)0"'!n
...., ............
....... .., ............. ....... .., ... .., ...... .... .., ................
...... _ ... _""NNNN"'<"1""N
Figure 6.30. (Suite).
o
"
o
o
o
o
o
"
"
>
"
o
"
"
t
"
>
"
c
"
" Q
"
"
"
Q
N
o
"
"
o
T e'chnique de programmation
.. "
0000000
0000000
.tt.t
1oI1oI1oI1ol'4WW
00
00
W"
.
0000 __
000000
........ ,
WWWI.:IWW
.......... 00 ...
1') ........ '"
....... 01') _
000000
000000
.. .... -+ ....
www"'ww
......... "".., ...
...000<"\"" ....
0000000
0000000
.. .. t t t t t
WWIoIWWWW
00 ......... _<00 ... ." .... 0000
w ... "' ......... ...
..,00 ...... 000
_ """'Will ... ,,,
... "' ... ID"''''
"'00"'000
00 ......... 000
.......... OQCI
_N ... "'NO..,
...............
N
"
-_ .......... ",
... ... ", .. 1
0000000000000000000000000000
000
000
"""
000
000
000
000
000
0 ... 0 ................. ... o
o
000000000
.. , t
WIoIWWW
.
""
NO
"""
.. ...... ", ... <'t
...... 00"' ...
... "' ... "'en
NOI ... COM
......... ..,
.0
NOD
... 0 ....... 0
00000
IoIWWWW
0 ......... ...
- ... .., ... ....
.0-
..
.
.. .... . ...
........ QOO_OOOO
00000:000000
O"'OOONOOOO
0,",000 ... 0000
... QOO""'oOOO
........ coo ... oooo
...... 0000'00000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
.t 4-
Wloiwwwwwwwwwwwwwwwwwwwwwwwwww
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
--- 000
000
000
000
ON.
MMM
- 00
""
00
00
mo
NM
..............................
000000000
000000000
000000000
OOO .... O ....... ON
... ..,., ... "' ......... ...
......... N ... NN ... N
-" 00
""
00
00
00
M_
--
DO
""
00
00
00
......... ....000
00000000
... ... ... t
wwwwwwww
00000000
00000000
00""'0000
......... "" .......... 0
....... N"'''''''O
00
00
""
00
00
00
00
00
0000000000000000000000000000
00000 ........................... ....
000000000000
000000000 ... 00
000000011>0 ... 00
0000000 ... 0 ..... 00
00011>1/)11>11) ........ ",1/)
000 ........................ ...
---
0000
.....
IolWWIol
00<'10
00<'10
ct:I"' ... o
N"'OO
<'1 .... .,
---
"""
000
0.0
DO"
..............
0000
0000
0000
11)000
....... 11)
.., ... ", ...
--
""
00
00
.0
.0
--"
""" 000
000
ono
O."
000
0000000000000000000000000000
... N ..... '" "' ......... 0 .... "''''''''''''",,,,,,, 0 .... "''''''''''''''''''
........... ... .... NNNNNNNNN
Figure 6.30. (Suite).
o
g
o
c
o
o
o
"
o
o
o
o
"
539
Chute Panet, Octobre 1979,
le jour de la premire neige.
INDEX
A
Allocation des tables 424.
Amlioration de la prcision 84.
Approximation
nodale 15, 45.
non nodale 14.
par sous-domaines 17.
par lments finis 17.
gnralise 45.
proptits49,50.
de grandeurs vectorielles 142.
Assemblage 199, 240, 245
- technique d' 247 250.
Auto-adjoint 159.
B
Base polynomiale 44.
BBMEF 413-419.
Bloc fonctionnel 423. 425.
c
Cauchy 160.
Changement des variables indpendantes
347.
Classification des systmes 155, 158.
Collocation 154. 186. 1 89.
Complmentaire (fonctionnelle) 154, 182,
Complet (polynOrne) 42, 203.
Conditions aux limites 164. 199, 263.
266.
Conforme (lments) 41 . 116. 199.204.
ConservaUf 176.
Continuit
- sur l'lment 40.
- entre lments 40.43,203.
Continus (systmos) 155-157.
_ Convergence 203.
Coordonnes
gnralises 45.
- nodales 17, 46.
- locales 30, 1 06, 120, 130.
Cubiques (lments) 99, 101 , 113, 114,
116, 118,124-126, 132,137.
Curvilignes (lments) 114. 126, 139.
o
Dcalage des valeurs propres 392.
Dcomposition
- triangulaire 277, 316, 320, 321,
324-326.
- spectrale 387.
Dfini-positif
- systme diffrentiel 159.
- fonctionnelle 175.
Degrs de libert 155.
Diffrences finies centrales 372.
Discrtisation des formes intgrales 182,
208.
Discrets (systmes) 155 157.
Dirichlet 160-161.
Donnes de MEF 501-508.
Duhamel (intgrale de) 381.
E
Elments finis
- approximation par 17.
- mthode des 199.
Elment
notion d' 17.
infini 149.
nombre de nuds variable 146.
parent 30.
rel 24-26.
de rfrence 26.
Elimination de Gauss 277, 311.
Equations
- intgrales de contour 154,
- linaires 309-334,
- non linaires 334-351.
Equilibre (problme d') 156.
Erreur
- d' approximation 15, 42, 77-84.
- do discrtisation gomtrique 23,
Espace de rfrence 26, 3032.
Euler 353364.
Expansion des matrices et vecteurs l
mentajres 242.
Explic ite (mthode d' Euler) 354.
542
Mthode des lments finis
F
Faible (forme intgrale) 167.
Fonctions
de base 15.
d'i nterpolation H>. 36, 60, 61, cha-
pitre 2.
de pondration 154. 164. '86.
de transformation gomtlique 28.
Fonctionnelle
- notion de 154, 171 .182.
- mixte 154, 180.
Forme intgrale
lmentaire 200, 218. 219.
faible 167.
gnralise 178.
globale 164, 199.
discrtise 182, 208.
des problmes non linaires 21 O.
formulation intgrale 153.
G
Galerkine 154, 172, 190. 194.
Gauss
- limination de 277,311.
- intgration numriQue de 280.
Gauss - Radau 294.
Gnralise (fonctionnelle) 178.
H
Hammer (formules de) 297.
Hermite (lments de type) 100, 105,
116,126,133,140.
Helmotz 161.
Hexadriques (lments) 133.
Homogne (systme) 159.
Houbolt 374.
Implici te 358.
Incrmentale (mthode) 346.
Intllgmle (formuhuion) 163.
Intgration
- numrique 222, 277 -309.
- par perties 154, 165, 166, 200.
Isoparamtrique (lment) 43.
Itration inverse 277, 393.
J
J acobi 395-401.
L
Lagrange
lments de type 97, 109, 121,
131,134.
multiplicateur de 154, 176, 178.
polynmes de 99.
largeur de bande 254.
Legendre (polynmes de) 282.
Ligne de ciel 199, 258, 259, 261, 325, 327.
linaire
- lments 95, 108, 121, 130, 133.
- fonctionnelle 174.
- systme 157.
Localisation (table de) 251-253.
M
Matrice
lmentaire 199, 202, 216, 220,
222, 278.
globale 199, 202.
jacobienne 52.
masse 203, 223.
nodale 46.
tangente 342-343.
MEF (programme)
description gnrale 423-429.
liste de 429-501 .
- description des donnes de 601 - 508.
- oxomples de 509-539.
Minimisation de largeur de bande 256.
Mixte (fonctionnelle) 154, 180.
Modification des lments 144.
Modularit des programmes 421.
Moindres carrs 154, 192.
Multiplicateurs de Lagrange 154, , 76. 178.
Navi or - Stokes 162.
Neumen 160, 161.
Newmark 375, 376.
Newton-Cotes 286.
N
Newton-Raphson 277, 338, 340, 341,
346. 350.
Nuds
- d'interpolation 14, 17, 36.
- gomtriques 22.
Normes de programmation 425-427.
o
Organisation des programmes 412, 428.
p
Paramtres
- gnraux 14.
- nodaux 1. 4.
- indtermins 155.
Partition d'un domaine 22.
Patch-lest 199, 204-208.
Pivot 314.
Points nodaux 17.
PolynOmes caractristiques 386.
Posi tif (systme diffrentiel) 159.
Prdiction-correction 364, 365.
Prismatiques (lments) 141 .
Programmes gnraux 419-421 .
Projecteurs d'une matrice 388.
Propagation (problmos de) 156.
Proprits
des matrices globales 253.
- des systmes d'quations 195.
a
Ouadrilatraux (lments) 120.
Ouadratique
lments 97, 110, 122, 123, 131,
134, 135.
fonctionnelle 174.
R
Rayleigh (quotient de) 390.
Raction 265.
Rectangulaires (lments) '28.
Rduite (intgration) 302, 304.
Relations linaires 268.
Rsidus
- lmentaires 203, 224.
- notion de 163, 164.
- pondrs 154, 164.
Ritz (mthode de)
- pour fonctionnelles 154, 193, 194.
- pour valeurs propres 401 .
Runge- Kulta 368, 369.
5
Sparation des valeurs propres 391.
Singularit de la matrice jacobienne 57.
Sollicitations 156.
Sous-espace 277, 402, 403.
Stebilit 355, 361, 362.
Stationnaires (systmes) 155.
Stationnarit d'une fonctionnelle 173, 175,
176.
Stockage des matrices globales 257 262.
Sturm (suite de) 391 .
Sub-paramtrique (lment) 43.
Substitution (mthode de) 277. 336, 338.
Index 543
Super-paramtrique (lment) 43. 148.
Suporposition modale 369, 380.
Systme physique 154.
T
Tabl e
de connectivit 33.
- de coordonnes 33.
- de localisation 251-253.
Ttradriques (lmeOlsl 130.
Transformation
des fOlmes intgrales 165.
des oprateurs de drivation 51-57.
des variables nodales 106, 117.
127, 129, 213, 266.
d'une intgrale 53. 213-215.
gomtrique 26. 27.
Triangulaires (lments) 106.
Tri angularisation 311. 318. 323.
Types d'lments 93.
V
Valeurs initiales (problme de) 157.
Valeurs propres 155. 384 -404.
VilrRble!\
- gnralises 44.
- nodales 14, 17,46.
Variation d'une fonctionnelle 171 , 173.
Vecteur
lmentaire des sollicitations 202.
216, 224, 278.
lmentaire des variables nodales
202.
lmentaire des variations des varia-
bles nodales 202.
global des sollicitations 202.
global des variables nodales 202.
global des variations des variables
nodales 202.
propre 386.
w
Wilson 376. 377.
Achev d'imprimer
en aot 1989 sur les presses
des Ateliers Graphiques Marc Yeilleux Inc.
Cap-Saint-Ignace. Qu.