[TRNSYS-users] PSYCHROMETRICS routine issue

[Antoine Gautier]

Dear all

 

Please have a look below at the short excerpt of a source code.

 

      MODE=6

      PSYDAT(6)=wAirEnt

      PSYDAT(7)=hAirEnt

      CALL PSYCHROMETRICS(TIME,INFO,IUNITS,MODE,WBMODE,

     &                                     PSYDAT,EMODE,STATUS)

      write(myMessage,'(" PSYDAT(2)=",D," PSYDAT(6)=",D,

     &            " PSYDAT(7)=",D)') PSYDAT(2),PSYDAT(6),PSYDAT(7)

      CALL MESSAGES(-1,trim(myMessage),

     &                  'Notice',info(1),info(2))

 

      PSYDAT(2)=29.82D0

 

      CALL PSYCHROMETRICS(TIME,INFO,IUNITS,MODE,WBMODE,

     &                          PSYDAT,EMODE,STATUS)

      write(myMessage,'(" PSYDAT(2)=",D," PSYDAT(6)=",D,

     &            " PSYDAT(7)=",D)') PSYDAT(2),PSYDAT(6),PSYDAT(7)

      CALL MESSAGES(-1,trim(myMessage),

     &                  'Notice',info(1),info(2))                

 

I know PSYDAT(2) is not used in MODE 6 but please have a look now at the
response I get.

 

*** Notice at time        :        16.375000

    Generated by Unit     :     2

    Generated by Type     :   206

    Message               :  PSYDAT(2)=   0.1732587158021238D+02 PSYDAT(6)=
0.8524754597715760D-02 PSYDAT(7)=   0.5159925701758463D+02

 

*** Notice at time        :        16.375000

    Generated by Unit     :     2

    Generated by Type     :   206

    Message               :  PSYDAT(2)=   0.2981999969482422D+02 PSYDAT(6)=
0.8524754597715760D-02 PSYDAT(7)=   0.5159925701758463D+02

 

Same humidity ratio, same enthalpy and quite different dry bulb temperature.
Why the second PSYCHROMETRICS statement does not rewrite on PSYDAT(2)?

Any help would be quite appreciated as I am slowly but surely getting crazy!

 

Thanks a lot.

Regards

--

Antoine Gautier
Solamen
+33 6 98 78 56 46

antoine.gautier at solamen.fr

 

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.onebuilding.org/pipermail/trnsys-users-onebuilding.org/attachments/20110530/04afe280/attachment-0001.htm>