1 : * @ZACPRO2 PROCEDUR CHAT 95/12/13 21:46:25 1945 2 : *-----------------------CHAMP DE CONTRAINTES------------------------* 3 : 4 : 'DEBP' @ZACPRO2 S1*'MCHAML' S2*'MCHAML' S3*'MCHAML' 5 : S4*'MCHAML' S5*'MCHAML' S6*'MCHAML' MO*'MMODEL'; 6 : 7 : MODC = VALEUR MODE; 8 : 9 : COND1 = 'EGA' 'PLANCONT' MODC ; 10 : COND2 = 'EGA' 'PLANDEFO' MODC ; 11 : COND3 = 'EGA' 'AXIS' MODC ; 12 : COND4 = 'EGA' 'TRID' MODC ; 13 : 'SI' COND1; 14 : TENS1 = 'EXCO' 'SCAL' S1 'SMXX'; 15 : TENS2 = 'EXCO' 'SCAL' S2 'SMYY'; 16 : TENS3 = 'EXCO' 'SCAL' S3 'SMZZ'; 17 : TENS4 = 'EXCO' 'SCAL' S4 'SMXY'; 18 : SIGMAA = 'MANU' 'CHML' MO 'SMXX' TENS1 'SMYY' TENS2 'SMZZ' TENS3 19 : 'SMXY' TENS4 'TYPE' CONTRAINTES 'STRESSES'; 20 : 'FINSI'; 21 : 'SI' COND2; 22 : TENS1 = 'EXCO' 'SCAL' S1 'SMXX'; 23 : TENS2 = 'EXCO' 'SCAL' S2 'SMYY'; 24 : TENS3 = 'EXCO' 'SCAL' S3 'SMZZ'; 25 : TENS4 = 'EXCO' 'SCAL' S4 'SMXY'; 26 : SIGMAA = 'MANU' 'CHML' MO 'SMXX' TENS1 'SMYY' TENS2 'SMZZ' TENS3 27 : 'SMXY' TENS4 'TYPE' CONTRAINTES 'STRESSES'; 28 : 'FINSI'; 29 : 'SI' COND3; 30 : TENS1 = 'EXCO' 'SCAL' S1 'SMRR'; 31 : TENS2 = 'EXCO' 'SCAL' S2 'SMZZ'; 32 : TENS3 = 'EXCO' 'SCAL' S3 'SMTT'; 33 : TENS4 = 'EXCO' 'SCAL' S4 'SMRZ'; 34 : SIGMAA = 'MANU' 'CHML' MO 'SMRR' TENS1 'SMZZ' TENS2 'SMTT' TENS3 35 : 'SMRZ' TENS4 'TYPE' CONTRAINTES 'STRESSES'; 36 : 'FINSI'; 37 : 'SI' COND4; 38 : TENS1 = 'EXCO' 'SCAL' S1 'SMXX'; 39 : TENS2 = 'EXCO' 'SCAL' S2 'SMYY'; 40 : TENS3 = 'EXCO' 'SCAL' S3 'SMZZ'; 41 : TENS4 = 'EXCO' 'SCAL' S4 'SMXY'; 42 : TENS5 = 'EXCO' 'SCAL' S5 'SMXZ'; 43 : TENS6 = 'EXCO' 'SCAL' S6 'SMYZ'; 44 : SIGMAA = 'MANU' 'CHML' MO 'SMXX' TENS1 'SMYY' TENS2 'SMZZ' TENS3 45 : 'SMXY' TENS4 'SMXZ' TENS5 'SMYZ' TENS6 46 : 'TYPE' CONTRAINTES 'STRESSES'; 47 : 'FINSI'; 48 : 'FINP' SIGMAA; 49 :
© Cast3M 2003 - All rights reserved.
Disclaimer