Télécharger balpha.eso

Retour à la liste

Numérotation des lignes :

  1. C BALPHA SOURCE CHAT 05/01/12 21:31:41 5004
  2. FUNCTION BALPHA(X,ROL,ROV)
  3. C
  4. C operateur FUITE
  5. C>>> calcule le taux de vide
  6. C X : titre massique
  7. C ROL : masse volumique de l'eau liquide
  8. C ROV : masse volumique de la vapeur
  9. C
  10. IMPLICIT INTEGER(I-N)
  11. IMPLICIT REAL*8 (A-H,O-Z)
  12. BALPHA=X*ROL/(X*ROL+(1.-X)*ROV)
  13. RETURN
  14. END
  15.  
  16.  
  17.  

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