Télécharger moddif.eso

Retour à la liste

Numérotation des lignes :

moddif
  1. C MODDIF SOURCE CB215821 22/04/01 14:03:12 11326
  2.  
  3. C=======================================================================
  4. C= Objet MODELE - Cas de la formulation 'DIFFUSION' =
  5. C= =
  6. C= Definition des MODELEs de COMPORTEMENT associes a la formulation =
  7. C=======================================================================
  8.  
  9. SUBROUTINE MODDIF (MOMODL,NMOD)
  10.  
  11. IMPLICIT INTEGER(I-N)
  12. IMPLICIT REAL*8 (A-H,O-Z)
  13.  
  14.  
  15. -INC PPARAM
  16. -INC CCOPTIO
  17.  
  18. CHARACTER*16 MOMODL(*)
  19.  
  20. NMOD=7
  21. C -----------------
  22. C Modele LINEAIRE (par defaut)
  23. C -----------------
  24. MOMODL(1)='FICK '
  25.  
  26. C -----------------------
  27. C MODELEs NON LINEAIREs
  28. C -----------------------
  29. MOMODL(2)='SORET '
  30. MOMODL(3)='UTILISATEUR '
  31. MOMODL(4)='DISSIPATION '
  32. MOMODL(5)='AFFINE '
  33. MOMODL(6)='VISQUEUSE '
  34. MOMODL(7)='ADVECTION '
  35.  
  36. RETURN
  37. END
  38.  
  39.  
  40.  

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