Télécharger la plaquette Cast3M


fr en

Télécharger @zacpro4.procedur

Retour à la liste

Numérotation des lignes : 

  1. * @ZACPRO4  PROCEDUR  CHAT      95/12/13    21:46:36     1945           
  2. *--------------------------EXTRACTION DES CONTRAINTES-----------------*
  3.  
  4. 'DEBP' @ZACPRO4 BB*'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. CO1      = 'EXCO' 'SMXX' BB 'SCAL';
  14. CO2      = 'EXCO' 'SMYY' BB 'SCAL';
  15. CO3      = 'EXCO' 'SMZZ' BB 'SCAL'; 
  16. CO4      = 'EXCO' 'SMXY' BB 'SCAL';
  17. CO5      = CO1*0.;
  18. CO6      = CO1*0.;
  19. 'FINSI';
  20. 'SI' COND2;
  21. CO1      = 'EXCO' 'SMXX' BB 'SCAL';
  22. CO2      = 'EXCO' 'SMYY' BB 'SCAL';
  23. CO3      = 'EXCO' 'SMZZ' BB 'SCAL';
  24. CO4      = 'EXCO' 'SMXY' BB 'SCAL';
  25. CO5      = CO1*0.;
  26. CO6      = CO1*0.;
  27. 'FINSI';
  28. 'SI' COND3;
  29. CO1      = 'EXCO' 'SMRR' BB 'SCAL';
  30. CO2      = 'EXCO' 'SMZZ' BB 'SCAL';
  31. CO3      = 'EXCO' 'SMTT' BB 'SCAL';
  32. CO4      = 'EXCO' 'SMRZ' BB 'SCAL';
  33. CO5      = CO1*0.;
  34. CO6      = CO1*0.;
  35. 'FINSI';
  36. 'SI' COND4;
  37. CO1      = 'EXCO' 'SMXX' BB 'SCAL';
  38. CO2      = 'EXCO' 'SMYY' BB 'SCAL';
  39. CO3      = 'EXCO' 'SMZZ' BB 'SCAL';
  40. CO4      = 'EXCO' 'SMXY' BB 'SCAL';
  41. CO5      = 'EXCO' 'SMXZ' BB 'SCAL';
  42. CO6      = 'EXCO' 'SMYZ' BB 'SCAL';
  43. 'FINSI';
  44. 'FINP' CO1 CO2 CO3 CO4 CO5 CO6;
  45.  

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