Télécharger mometa.eso

Retour à la liste

Numérotation des lignes :

mometa
  1. C MOMETA SOURCE CB215821 18/09/10 21:16:24 9912
  2. C MOMETA SOURCE PV 14/05/18 21:15:48
  3. SUBROUTINE MOMETA(MOMODL,NMOD)
  4. *----------------------------------------------------------------------
  5. * - CAS DE LA FORMULATION 'METALLURGIE'
  6. * DEFINITION DES NOMS DES MODELES
  7. *----------------------------------------------------------------------
  8. IMPLICIT INTEGER(I-N)
  9.  
  10. -INC PPARAM
  11. -INC CCOPTIO
  12. *
  13. CHARACTER*16 MOMODL(*)
  14. *
  15. * Mots attendus à la lecture des données de l'operateur MODE
  16. *
  17. NMOD=4
  18. MOMODL(1)='PHASES '
  19. MOMODL(2)='REACTIFS '
  20. MOMODL(3)='PRODUITS '
  21. MOMODL(4)='TYPE '
  22. RETURN
  23. END
  24.  
  25.  

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