Télécharger htc_chbw.procedur

Retour à la liste

Numérotation des lignes :

  1. * HTC_CHBW PROCEDUR AM 11/09/13 21:15:01 7126
  2. *-----------------------------------------------------------------------
  3. *23456789012345678901234567890123456789012345678901234567890123456789012
  4. *-----------------------------------------------------------------------
  5. *------------------------------------------------------
  6. * HTC_CHBW Dehydration curve
  7. *
  8. * Date: 16-03-98 mod : 21-07-11
  9. *------------------------------------------------------
  10. 'DEBP' HTC_CHBW T0*'CHPOINT' H0*'CHPOINT' TAV1*'TABLE' ;
  11. *------------------------------------------------------
  12. FLG1= TAV1.'FLG1';
  13. 'SI' FLG1; 'MESS' 'PROCEDURE-HTC_CHBW'; 'FINSI';
  14. EWD =TAV1.'EWD';
  15. WD1= 'VARI' T0 EWD 'SCAL';
  16. WDM=TAV1.'WDM';
  17. DF1= WD1 - WDM;
  18. RESO1 = DF1 'MASQUE' 'SUPERIEUR' 0.;
  19. RESO2 = H0 'MASQUE' 'EGINFE' 1.;
  20. DF2=RESO1 * RESO2 * DF1;
  21. * DF2=RESO1 * DF1;
  22. 'DETR' DF1;
  23. 'DETR' RESO1;
  24. 'DETR' RESO2;
  25. WD =DF2 + WDM;
  26. 'FINPROC' WD DF2;
  27.  
  28.  

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