[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Output error in TYPE28 and in LST-Files
- Date: Fri, 07 Mar 2003 18:05:05 +0100
- Date: Fri, 7 Mar 2003 12:16:16 -0600
- From: Francisco Pujiula <f.pujiula@xxxxxxx>
- Subject: Re: Output error in TYPE28 and in LST-Files
Dear all,
I have found a solution for the mentioned problem which I want to give
to all TRNSYS users:
The output-format of the simulation summary (Type 28) is fixed in the
source file named "Sumary.for".
Change the following lines:
old:
701 FORMAT(1H1/9X,29HSIMULATION SUMMARY FOR TIME =,F9.3,4H TO,
F10.3/20X,15HIN INTERVALS OF ,F10.3,2X,6A1/)
new:
701 FORMAT(1H1/9X,29HSIMULATION SUMMARY FOR TIME =,F11.3,4H TO,
F11.3/20X,15HIN INTERVALS OF ,F10.3,2X,6A1/)
old:
305 FORMAT(1X,1H*,7X,29HSIMULATION SUMMARY FOR TIME =,F9.3,
4H TO,F10.3,71A1)
new:
305 FORMAT(1X,1H*,7X,29HSIMULATION SUMMARY FOR TIME =,F11.3,
4H TO,F11.3,71A1)
The output-format of the LST-file is fixed in the source-file named
"Print.for".
Change the following lines:
old:
810 FORMAT(10X,15H UNIT ,I3,12H WAS CALLED ,I6,6H TIMES)
815 FORMAT(25X,I3,12X,I6)
816
FORMAT(///5X,'*---------------------------------------------------------------*'/5X,'*',4X,'UNIT',20X,'#
ITERATIVE CALLS',18X,'*')
817 FORMAT(5X,'*',2X,I3,3X,A20,3X,I6,26X,'*')
818 FORMAT(5X,'*',63X,'*',/5X,'*',' Total Iterative Component Calls =
',I6,19X,'*',/5X,'*---------------------------------------------------------------*')
new:
810 FORMAT(10X,15H UNIT ,I3,12H WAS CALLED ,I8,6H TIMES)
815 FORMAT(25X,I3,12X,I8)
816
FORMAT(///5X,'*---------------------------------------------------------------*'/5X,'*',4X,'UNIT',20X,'#
ITERATIVE CALLS',18X,'*')
817 FORMAT(5X,'*',2X,I3,3X,A20,3X,I8,24X,'*')
818 FORMAT(5X,'*',63X,'*',/5X,'*',' Total Iterative Component Calls =
',I10,17X,'*',/5X,'*----------------------------------------------------------------*')
Once having rebuilt the TRNLIB.DLL the output problem is solved.
Greetings
Francisco Pujiula
----------------------------------------------------------
Institut für Solarenergieforschung GmbH Hameln/Emmerthal
Dipl.-Phys. Francisco Pujiula
Am Ohrberg 1
D-31860 Emmerthal
fon +49 (0)5151 / 999 - 524
fax +49 (0)5151 / 999 - 500
email f.pujiula@isfh.de
web www.isfh.de
----------------------------------------------------------