Il existe de nombreuses façons de réaliser un maillage. Voici deux exemples de maillage d'un cylindre creux, le premier compliqué, le second plus simple.
EXEMPLE 1
OPTI DIME 3 ELEM CUB8 ; ******************************************************************************** *POINTS H1 = 5. ; COMM Hauteur du cylindre ; R1 = 2. ; COMM Rayon interieur ; R2 = 2.5 ; COMM Rayon exterieur ; O1 = 0. 0. 0. ; O2 = 0. 0. H1 ; COMM Points de l axe du cylindre ; P11 = R1 0. 0. ; P12 = 0. R1 0. ; P13 = ((-1.)*R1) 0. 0. ; P14 = 0. ((-1.)*R1) 0. ; P21 = R2 0. 0. ; P22 = 0. R2 0. ; P23 = ((-1.)*R2) 0. 0. ; P24 = 0. ((-1.)*R2) 0. ; ******************************************************************************** *LIGNES *Contour interieur de la base C11 = C 20 P11 O1 P12 ; C12 = C 20 P12 O1 P13 ; C13 = C 20 P13 O1 P14 ; C14 = C 20 P14 O1 P11 ; CONT1 = C11 ET C12 ET C13 ET C14 ; *Contour exterieur de la base C21 = C 20 P22 O1 P21 ; C22 = C 20 P23 O1 P22 ; C23 = C 20 P24 O1 P23 ; C24 = C 20 P21 O1 P24 ; CONT2 = C21 ET C22 ET C23 ET C24 ; CONTTOT1 = CONT1 ET CONT2 ; ******************************************************************************** *SURFACE SURF1 = SURF CONTTOT1 'PLAN' ; ******************************************************************************** *VOLUME VOL1 = SURF1 VOLU 10 TRANS (0. 0. H1) ; ******************************************************************************** *TRACAGE TITRE 'MAILLAGE D UN CYLINDRE CREUX' ; TRAC CACH QUAL VOL1 ; FIN;
Remarques sur le fichier d'exemple 1

EXEMPLE 2
OPTI DIME 3 ELEM CUB8 ; ******************************************************************************** *POINTS H1 = 5. ; COMM Hauteur du cylindre ; R1 = 2. ; COMM Rayon interieur ; R2 = 2.5 ; COMM Rayon exterieur ; O1 = 0. 0. 0. ; O2 = 0. 0. H1 ; COMM Points de l axe du cylindre ; P11 = R1 0. 0. ; P21 = R2 0. 0. ; ******************************************************************************** L1 = P11 D 3 P21 ; SEC1 = L1 TRANS 10 (0. 0. H1) ; VO1 = SEC1 VOLU 40 ROTA 180 O1 O2 ; VO2 = VO1 VOLU 40 ROTA 180 O1 O2 ; VOL1 = VO1 ET VO2 ; ELIM 0.001 VOL1 ; ******************************************************************************** *TRACAGE TITRE 'MAILLAGE D UN CYLINDRE CREUX' ; TRAC CACH VOL1 ; FIN;
Remarques sur le fichier d'exemple 2
uds distants de moins de 0.001 par un seul point. Elle est
utilisée pour éliminer les n
uds doubles créés par la
construction du volume VO2 avec l'opérateur VOLUME ROTA. En effet,
VO1 et VO2 ont des faces communes mais qui sont indépendantes et
ont leurs propres n
uds. Ainsi il existe des n
uds doubles
qu'il est nécessaire de fusionner.
uds
doubles, il sera difficile de savoir quelle valeur garder.