Télécharger CCHHOPR.INC

Retour à la liste

Numérotation des lignes :

  1. C ------------------------
  2. C PReconditionnement HHO
  3. C ------------------------
  4. C-INC CCHHOPR <-- Ne pas oublier d'inclure CCHHOPA avant
  5. C ------------------------
  6.  
  7. C- MSQHHO : Maillage global des faces = squelette
  8. C- MCEHHO : Maillage global des cellules hho
  9. C- MPFHHO : Maillage global des Points supports des Faces
  10. C- MPCHHO : Maillage global des Points supports des Cellules (barycentre)
  11.  
  12. C- NUFHHO : NomBre Utilise de type de Faces HHO (> 0 en cas de HHO)
  13. C- NFAHHO : Nombre total de Faces HHO (> 0 en cas de HHO)
  14. C- NBFHHO : NomBre de Faces HHO par type de face (indices 1 a NFHMAX)
  15. C- Les faces etant :
  16. C- en 1D des POI1 (1 noeud)
  17. C- en 2D des SEG2 (2 noeuds)
  18. C- en 3D des polygones a N (>=3) sommets
  19. C- On utilise le nombre de sommets de face comme indice du tableau
  20. C- NBFHHO(0) : toujours = 0 (pour le cumul)
  21. C- MAFHHO : MAillage des Faces de type (i)
  22. C- LOFHHO : Ordre de chaque face du type (i)
  23.  
  24. COMMON / CPRHHO / IDIHHO, IFOHHO,
  25. & MSQHHO, MCEHHO, MPFHHO, MPCHHO,
  26. & NUFHHO, NFAHHO,
  27. & NUCHHO, NCEHHO,
  28. & NBFHHO(0:NFAMAX), MAFHHO(NFAMAX),
  29. & LOFHHO(NFAMAX),
  30. & NBCHHO(0:NCEMAX), MACHHO(NCEMAX),
  31. & NISFHO, NISCHO
  32.  
  33. COMMON / CPLHHO / LIFHHO(LFAMAX), LICHHO(LCEMAX)
  34.  
  35. C- HHO_MAXLIB : Longueur "utile" de la chaine ci-apres
  36. C- HHO_NOMLIB : Nom complet (avec chemin) de la bibliotheque HHO
  37. INTEGER HHO_MAXLIB
  38. CHARACTER*(LOCHAI) HHO_NOMLIB
  39.  
  40. COMMON / CLDHHO / HHO_MAXLIB, HHO_NOMLIB
  41.  
  42. C Statut SAVE aux COMMONs pour garantir leur permanence :
  43. SAVE / CPRHHO / , / CPLHHO / , / CLDHHO /
  44.  
  45.  

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