C* -INC CCVQUA4 DEBUT ************************************************** C VECTEURS ET OPERATEURS DE BASE DE L ELEMENT QUA4 C VECTEURS REAL*8 VSIGMA,VLAMD1,VLAMD2,VGAMA COMMON/CVQUA4/VSIGMA(4),VLAMD1(4),VLAMD2(4),VGAMA(4) C OPERATEURS SYMETRIQUES REAL*8 VL1L1T,VL2L2T,VGGT,VSST COMMON/CVQUA4/VL1L1T(4,4),VL2L2T(4,4),VGGT(4,4),VSST(4,4) C CORRECTIONS AXISYMETRIQUES REAL*8 VL1GT2,VL2GT2 COMMON/CVQUA4/VL1GT2(4,4),VL2GT2(4,4) C REAL*8 VL1GT,VL2GT COMMON/CVQUA4/VL1GT(4,4),VL2GT(4,4) C save /CVQUA4/ * C* -INC CCVQUA4 FIN **************************************************
© Cast3M 2003 - Tous droits réservés.
Mentions légales