1@Parser IsotropicMisesCreep; 2@Behaviour SiCCreep; 3@Author É. Brunon; 4@Date 06/12/07; 5 6@Description{ 7 Matériaux RCG-T et RCG-R 8 Un point sur le carbure de Silicium 9 NT SESC/LIAC 02-024 ind 0 de décembre 2002 10 J.M. ESCLEINE 11 §8.4.2 Page 34 12} 13 14@ExternalStateVar real flux; 15 16@StaticVar real A = 4.4e3; 17@StaticVar real B = 76.0e3; 18@StaticVar real a = 1.0e-37; 19 20@LocalVar real AF1; 21@LocalVar real AF3; 22 23@InitLocalVars{ 24 AF1 = A*exp(-B/(T+theta*dT)); 25 AF3 = a*(flux+theta*dflux); 26} 27 28@FlowRule{ 29 df_dseq = AF1+AF3; 30 f = seq*df_dseq; 31} 32