Télécharger la plaquette Cast3M


fr en

Télécharger @zacpro3.procedur

Retour à la liste

Numérotation des lignes : 

  1. * @ZACPRO3  PROCEDUR  CHAT      95/12/13    21:46:30     1945           
  2. *-----------------------EXTRACTION DES DEFORMATIONS-------------------*
  3.  
  4. 'DEBP' @ZACPRO3 CC*'MCHAML';
  5.  
  6. MODC     = VALEUR MODE;
  7.  
  8. COND1    = 'EGA' 'PLANCONT' MODC ;
  9. COND2    = 'EGA' 'PLANDEFO' MODC ;
  10. COND3    = 'EGA' 'AXIS' MODC ;
  11. COND4    = 'EGA' 'TRID' MODC ;
  12. 'SI' COND1;
  13. EP1      = 'EXCO' 'EPXX' CC 'SCAL';
  14. EP2      = 'EXCO' 'EPYY' CC 'SCAL';
  15. EP3      = 'EXCO' 'EPZZ' CC 'SCAL';
  16. EP4      = 'EXCO' 'GAXY' CC 'SCAL';
  17. EP5      = EP1*0.;
  18. EP6      = EP1*0.;
  19. EP4      = EP4/2.;
  20. 'FINSI';
  21. 'SI' COND2;
  22. EP1      = 'EXCO' 'EPXX' CC 'SCAL';
  23. EP2      = 'EXCO' 'EPYY' CC 'SCAL';
  24. EP3      = 'EXCO' 'EPZZ' CC 'SCAL';
  25. EP4      = 'EXCO' 'GAXY' CC 'SCAL';
  26. EP5      = EP1*0.;
  27. EP6      = EP1*0.;
  28. EP4      = EP4/2.;
  29. 'FINSI';
  30. 'SI' COND3;
  31. EP1      = 'EXCO' 'EPRR' CC 'SCAL';
  32. EP2      = 'EXCO' 'EPZZ' CC 'SCAL';
  33. EP3      = 'EXCO' 'EPTT' CC 'SCAL';
  34. EP4      = 'EXCO' 'GARZ' CC 'SCAL';
  35. EP5      = EP1*0.;
  36. EP6      = EP1*0.;
  37. EP4      = EP4/2.;
  38. 'FINSI';
  39. 'SI' COND4;
  40. EP1      = 'EXCO' 'EPXX' CC 'SCAL';
  41. EP2      = 'EXCO' 'EPYY' CC 'SCAL';
  42. EP3      = 'EXCO' 'EPZZ' CC 'SCAL';
  43. EP4      = 'EXCO' 'GAXY' CC 'SCAL';
  44. EP5      = 'EXCO' 'GAXZ' CC 'SCAL';
  45. EP6      = 'EXCO' 'GAYZ' CC 'SCAL';
  46. EP4      = EP4/2.;
  47. EP5      = EP5/2.;
  48. EP6      = EP6/2.;
  49. 'FINSI';
  50. 'FINP' EP1 EP2 EP3 EP4 EP5 EP6;
  51.  

© Cast3M 2003 - Tous droits réservés.
Mentions légales