mocoth
C MOCOTH SOURCE MB234859 25/08/26 21:15:06 12343 C======================================================================= C= Objet MODELE - Cas de la formulation 'THERMIQUE' = C= = C= Definition des noms de modeles de MATERIAU = C======================================================================= C SUBROUTINE MOCOTH(MOMODL,NMOD) C IMPLICIT INTEGER(I-N) C CHARACTER*16 MOMODL(*) C NMOD=6 MOMODL(1)='CONDUCTION ' MOMODL(2)='CONVECTION ' MOMODL(3)='RAYONNEMENT ' MOMODL(4)='PHASE ' MOMODL(5)='ADVECTION ' MOMODL(6)='SOURCE ' END
© Cast3M 2003 - Tous droits réservés.
Mentions légales