Fichiers de données

OPTI DIME 3 ELEM QUA4;

*DONNEES
A1 = 0.4 ; PI= 3.1415927 ;
PRES1 = -1.E5 ;

*MAILLAGE
P1 = 0.  0.  0. ; P2 = 0. A1  0. ;
VEC1 = A1 0. 0. ; LL1 = D 12 P1 P2 ;
S1 = LL1 TRAN 12 VEC1 ; L1 L2 L3 L4 = COTE S1;

*MODELE ET PROPRIETES DE MATERIAUX
MOD1= MODEL S1 MECANIQUE ELASTIQUE COQ4;
MAT1= MATER MOD1 YOUN 7.E10 NU 0.3 RHO 4200. ;
CAR1= CARAC MOD1 EPAI 0.006 ;
MATTOT = MAT1 ET CAR1 ;

*CONDITIONS AUX LIMITES
CL1 = BLOQ DEPLA L1 ; CL2 = BLOQ DEPLA L2 ;
CL3 = BLOQ DEPLA L3 ; CL4 = BLOQ DEPLA L4 ;
CLTOT = CL1 ET CL2 ET CL3 ET CL4 ;

*APPLICATION DU CHARGEMENT  
CHAR1 = PRES COQUE MOD1 PRES1 DIRE (0. 0. 1.) ; 

*MATRICES DE RIGIDITE ET DE MASSE
RIG1= RIGI MOD1 MATTOT ; RIG1 = RIG1 ET CLTOT ;
MAS1= MASS MOD1 MATTOT ;

*RESOLUTION
RES1 = RESO RIG1 CHAR1 ;

*POST-TRAITEMENT

*-----------CONTRAINTES-----------*
***********************************
SIG1 = SIGM MOD1 MATTOT RES1 ;
VEC1 = 1. 0. 0. ;
VEC2 = 0. 1. 0. ;
SIG2 = RTEN SIG1 MOD1 VEC1 VEC2 ;
CALSUP = CALP SIG2 CAR1 MOD1 SUPE ;

*-----TRACE DE L ETAT DEFORME-----*
***********************************
DEF0= DEFO RES1 S1 0.;
DEF1= DEFO RES1 S1 ROUGE;
OEIL1 = 100. -200. 50. ;
TRAC OEIL1 (DEF0 ET DEF1) TITRE 'ETAT DEFORME' ;
ZZ1 = EXCO UZ RES1 ;
OPTI ISOV LIGNE ;
OEIL2 = 0. 0. 100. ;
TRAC OEIL2 S1 ZZ1 TITRE 'DEPLACEMENT UZ' ;

*--------TRACE D ISOVALEURS-------*
***********************************
OPTI ISOV SURFACE ;
CALSUPX = EXCO SMXX CALSUP; TRAC OEIL1 MOD1 CALSUPX S1 TITRE 'SMXX' ;
CAL1 = CHAN CHPO MOD1 CALSUP ; CALX = EXCO SMXX CAL1 ;
TITRE 'CONTRAINTE DE PEAU SMXX, FACE SUPERIEURE' ;
TRAC OEIL1 CALX S1 ;
CALY = EXCO SMYY CAL1 ;
TITRE 'CONTRAINTE DE PEAU SMYY SUR DEFORME, FACE SUPERIEURE' ;
TRAC OEIL1 CALY DEF1 S1 ;

*-----TRACE DU VECTEUR REACTION---*
***********************************
REA1 = REAC RES1 RIG1 ;
VECT1 = VECT REA1 2.E-5 FX FY FZ ROUGE ;
TRAC OEIL1 VECT1 S1 ;

FIN ;