Télécharger modcde.eso

Retour à la liste

Numérotation des lignes :

modcde
  1. C MODCDE SOURCE DURA 05/10/26 21:15:48 5216
  2. C MODCDE SOURCE CHAT 05/01/13 01:49:23 5004
  3. SUBROUTINE MODCDE(MOMODL,NMOD)
  4. *----------------------------------------------------------------------
  5. * - CAS DE LA FORMULATION 'FISSURE'
  6. * DEFINITION DU MODE DE CONDENSATION
  7. *----------------------------------------------------------------------
  8. IMPLICIT INTEGER(I-N)
  9.  
  10. -INC PPARAM
  11. -INC CCOPTIO
  12. *
  13. CHARACTER*16 MOMODL(*)
  14. *
  15. * Noms des materiaux
  16. *
  17. NMOD=2
  18. MOMODL(1)='MASS'
  19. MOMODL(2)='FILM'
  20. RETURN
  21. END
  22.  
  23.  
  24.  
  25.  
  26.  
  27.  
  28.  
  29.  
  30.  
  31.  
  32.  

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