Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-06 - decus/20-160/heat.lst
There are no other files named heat.lst in the archive.
1PAGE 1    HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
     * * * * *    S O U R C E    L I S T I N G    * * * * *

     0001  TITLE HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                            
     0002  * EULER                                                                         
     0003  * DOC                                                                           
     0004  * CHECK                                                                         
     0005  NOTE                                                                            
     0006  NOTE    MACRO PART OF MODEL                                                     
     0007  NOTE                                                                            
     0008  C PI=3.14159                           CONSTANT PI                              
 
               PI     - CONSTANT PI                                                            
 
     0009  NOTE                                                                            
     0010  NOTE   VARIABLE SET UP TO KEEP TIME                                             
     0011  NOTE                                                                            
     0012  A A1TIME.K=TIME.K  TIME FOR 1ST 24 HOURS         HOURS                          
 
               A1TIME - TIME FOR 1ST 24 HOURS         HOURS                                    
 
     0013  A A2TIME.K=TIME.K-24         TIME FOR 2ND 24 HOURS         HOURS                
 
               A2TIME - TIME FOR 2ND 24 HOURS         HOURS                                    
 
     0014  A ATIME.K=CLIP(A2TIME.K,A1TIME.K,TIME.K,24)      TIME USED IN ANALYSIS  HOURS   
 
               ATIME  - TIME USED IN ANALYSIS                                                  
               A2TIME - TIME FOR 2ND 24 HOURS         HOURS                                    
               A1TIME - TIME FOR 1ST 24 HOURS         HOURS                                    
 
     0015  NOTE                                                                            
     0016  NOTE                                                                            
     0017  NOTE                                                                            
     0018  NOTE  USER SPECIFIED INPUT                                                      
     0019  NOTE                                                                            
     0020  NOTE  GENERAL INPUT --  LOCATION,WEATHER DATA,DAY                               
     0021  NOTE                                                                            
     0022  C DTK=.7 TIME STEP OF THE SIMULATION (DT ON SPEC)          HOURS                
 
               DTK    - TIME STEP OF THE SIMULATION (DT ON SPEC)          HOURS                
 
     0023  C DAY=195          DAY OF INTEREST ,STARTING AT JAN 1      DAY=JULY 14          
 
               DAY    - DAY OF INTEREST ,STARTING AT JAN 1      DAY=JULY 14                    
 
     0024  C BAROP=29.21      BAROMETRIC PRESSURE INCHES OF MERCURY                        
 
               BAROP  - BAROMETRIC PRESSURE INCHES OF MERCURY                                  
 
     0025  C LATTUD=.72     LATTUD OF LOCATION          RADIANS(DEGREES*PI/180)            
 
               LATTUD - LATTUD OF LOCATION          RADIANS(DEGREES*PI/180)                    
 
     0026  C ROTATN=0.0     ROTATN OF N-S FROM NORMAL   RADIANS                            
 
               ROTATN - ROTATN OF N-S FROM NORMAL   RADIANS                                    
 
1PAGE 2    HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
     0027  C TILT=0.0         TILT TAKEN FROM THE NORMAL    RADIANS                        
 
               TILT   - TILT TAKEN FROM THE NORMAL    RADIANS                                  
 
     0028  C QMAX=270         MAX ENERGY FROM SUN ON GIVEN DAY        BTU/HR/FT**2         
 
               QMAX   - MAX ENERGY FROM SUN ON GIVEN DAY        BTU/HR/FT**2                   
 
     0029  C WINDI=10560      INSIDE AVERAGE WIND VELOCITY FPH (MPH*5280)                  
 
               WINDI  - INSIDE AVERAGE WIND VELOCITY FPH (MPH*5280)                            
 
     0030  C WINDO=52800      OUTSIDE AVERAGE WIND VELOCITY           FPH (MPH*5280)       
 
               WINDO  - OUTSIDE AVERAGE WIND VELOCITY           FPH (MPH*5280                  
 
     0031  C LENGTH=30        EITHER HIGHT OF SURFACE OR DISTANCE IN WIND[FEET             
 
               LENGTH - EITHER HIGHT OF SURFACE OR DISTANCE IN WIND[FEET                       
 
     0032  C EPSLON=.91      EMMISSIVITY FACTOR  UNITLESS                                  
 
               EPSLON - EMMISSIVITY FACTOR  UNITLESS                                           
 
     0033  T TTOUT=527,526,533,539,546,553,551,545          OUTSIDE TEMP PROFILE[RANKINE   
 
               TTOUT  - OUTSIDE TEMP PROFILE[RA                                                
 
     0034  T TTIN=528,528,528,528       INSIDE TEMP PROFILE RANKINE                        
 
               TTIN   - INSIDE TEMP PROFILE RANKINE                                            
 
     0035  NOTE                                                                            
     0036  NOTE SUN'S ANGLE CALCULATIONS                                                   
     0037  NOTE                                                                            
     0038  A DEC.K=TABFL(TDCL,DAY,0,365)          DECLINATION ANGLE   DEGREES              
 
               DEC    - DECLINATION ANGLE   DEGREES                                            
               TDCL   - NO DEFINITION PROVIDED                                                 
               DAY    - DAY OF INTEREST ,STARTING AT JAN 1      DAY=JULY 14                    
 
     0039  A DECL.K=DEC.K/180*PI                  DECLINATION ANGLE   RADIANS              
 
               DECL   - DECLINATION ANGLE   RADIANS                                            
               DEC    - DECLINATION ANGLE   DEGREES                                            
               PI     - CONSTANT PI                                                            
 
     0040  A HOUR.K=PI/180*ABS(90*(12-ATIME.K)/6) HOUR ANGLE          RADIANS              
 
               HOUR   - HOUR ANGLE          RADIANS                                            
               PI     - CONSTANT PI                                                            
               ATIME  - TIME USED IN ANALYSIS                                                  
 
     0041  A BET.K=(COS(LATTUD)*COS(HOUR.K)*COS(DECL.K)+SIN(LATTUD)*                       
           X SIN(DECL.K))                                                                  
 
               BET    - IS THE ANGLE WHOS ARCCOS IS BETA                                       
1PAGE 3    HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
               LATTUD - LATTUD OF LOCATION          RADIANS(DEGREES*PI/180)                    
               HOUR   - HOUR ANGLE          RADIANS                                            
               DECL   - DECLINATION ANGLE   RADIANS                                            
               LATTUD - LATTUD OF LOCATION          RADIANS(DEGREES*PI/180)                    
               DECL   - DECLINATION ANGLE   RADIANS                                            
 
     0042  DEF BET IS THE ANGLE WHOS ARCCOS IS BETA                                        
     0043  A BETA.K=TABFL(ARCSIN,BET.K,-1,1)      BETA,LATTUD ANGLE RADIANS                
 
               BETA   - BETA,LATTUD ANGLE RADIANS                                              
               ARCSIN - NO DEFINITION PROVIDED                                                 
               BET    - IS THE ANGLE WHOS ARCCOS IS BETA                                       
 
     0044  A GAM.K=(1/COS(BETA.K))*((COS(LATTUD)*SIN(DECL.K))-COS(DECL.K)*                 
           X SIN(LATTUD)*COS(HOUR.K))                                                      
 
               GAM    - IS THE ANGLE WHOS ARCSIN SIN IS GAMMA                                  
               BETA   - BETA,LATTUD ANGLE RADIANS                                              
               LATTUD - LATTUD OF LOCATION          RADIANS(DEGREES*PI/180)                    
               DECL   - DECLINATION ANGLE   RADIANS                                            
               DECL   - DECLINATION ANGLE   RADIANS                                            
               LATTUD - LATTUD OF LOCATION          RADIANS(DEGREES*PI/180)                    
               HOUR   - HOUR ANGLE          RADIANS                                            
 
     0045  DEF GAM IS THE ANGLE WHOS ARCSIN SIN IS GAMMA                                   
     0046  A GAMM1.K=TABFL(ARCCOS,GAM.K,-1,1)     GAMMA ANGLE FOR THE WEST PLANE[RADIANS   
 
               GAMM1  - GAMMA ANGLE FOR THE WEST PLANE[RA                                      
               ARCCOS - NO DEFINITION PROVIDED                                                 
               GAM    - IS THE ANGLE WHOS ARCSIN SIN IS GAMMA                                  
 
     0047  A GAMM2.K=PI*2-GAMM1.K       GAMMA ANGLE FOR THE EAST PLANE[RADIANS             
 
               GAMM2  - GAMMA ANGLE FOR THE EAST PLANE[RADIANS                                 
               PI     - CONSTANT PI                                                            
               GAMM1  - GAMMA ANGLE FOR THE WEST PLANE[RA                                      
 
     0048  A GAMMA.K=CLIP(GAMM2.K,GAMM1.K,ATIME.K,12) SELECT GAMMA,AZIMUTH ANGLE[RADIANS   
 
               GAMMA  - SELECT GAMMA,AZIMUTH ANGLE[RA                                          
               GAMM2  - GAMMA ANGLE FOR THE EAST PLANE[RADIANS                                 
               GAMM1  - GAMMA ANGLE FOR THE WEST PLANE[RA                                      
               ATIME  - TIME USED IN ANALYSIS                                                  
 
     0049  A ALPH1.K=ABS(GAMMA.K-ROTATN)        ANGLE OF INCIDENCE IN NS PLANE[RADIANS     
 
               ALPH1  - ANGLE OF INCIDENCE IN NS PLANE[RADI                                    
               GAMMA  - SELECT GAMMA,AZIMUTH ANGLE[RA                                          
               ROTATN - ROTATN OF N-S FROM NORMAL   RADIANS                                    
 
     0050  A ALPH2.K=ABS(2*PI-ALPH1.K)  POSSIBLE ANGLE OF INCIDENCE   RADIANS              
 
               ALPH2  - POSSIBLE ANGLE OF INCIDENCE   RADIANS                                  
               PI     - CONSTANT PI                                                            
               ALPH1  - ANGLE OF INCIDENCE IN NS PLANE[RADI                                    
 
     0051  A ALPHA.K=CLIP(ALPH2.K,ALPH1.K,ALPH1.K,ALPH2.K)  ANGLE OF INCIDENCE[RADIANS     
1PAGE 4    HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
 
               ALPHA  - ANGLE OF INCIDENCE[RADI                                                
               ALPH2  - POSSIBLE ANGLE OF INCIDENCE   RADIANS                                  
               ALPH1  - ANGLE OF INCIDENCE IN NS PLANE[RADI                                    
               ALPH1  - ANGLE OF INCIDENCE IN NS PLANE[RADI                                    
               ALPH2  - POSSIBLE ANGLE OF INCIDENCE   RADIANS                                  
 
     0052  A TOTAL.K=ABS(SIN(1.57-ALPHA.K)*SIN(1.57-BETA.K-TILT))*TEST1.K*TEST2.K          
           X +ABS(SIN(1.57-BETA.K-TILT))*TEST3.K                                           
 
               TOTAL  - ACTUAL AMOUNT OF AREA OF SURFACE PROJECTED NORMAL TO SUN'S RAY         
               ALPHA  - ANGLE OF INCIDENCE[RADI                                                
               BETA   - BETA,LATTUD ANGLE RADIANS                                              
               TILT   - TILT TAKEN FROM THE NORMAL    RADIANS                                  
               TEST1  - IS SURFACE HORIZONTAL YES=0                                            
               TEST2  - IS ANGLE OF INCIDENCE > PI/2 YES=                                      
               BETA   - BETA,LATTUD ANGLE RADIANS                                              
               TILT   - TILT TAKEN FROM THE NORMAL    RADIANS                                  
               TEST3  - IS SURFACE HORIZONTAL YES=1                                            
 
     0053  DEF TOTAL ACTUAL AMOUNT OF AREA OF SURFACE PROJECTED NORMAL TO SUN'S RAY        
     0054  A TEST1.K=CLIP(0,1,TILT,1.57)          IS SURFACE HORIZONTAL YES=0              
 
               TEST1  - IS SURFACE HORIZONTAL YES=0                                            
               TILT   - TILT TAKEN FROM THE NORMAL    RADIANS                                  
 
     0055  A TEST2.K=CLIP(0,1,ALPHA.K,1.57)       IS ANGLE OF INCIDENCE > PI/2 YES=0       
 
               TEST2  - IS ANGLE OF INCIDENCE > PI/2 YES=                                      
               ALPHA  - ANGLE OF INCIDENCE[RADI                                                
 
     0056  A TEST3.K=CLIP(1,0,TILT,1.57)          IS SURFACE HORIZONTAL YES=1              
 
               TEST3  - IS SURFACE HORIZONTAL YES=1                                            
               TILT   - TILT TAKEN FROM THE NORMAL    RADIANS                                  
 
     0057  A QSUNT.K=QSOLAR.K*TOTAL.K       ENEGRY FROM SUN AFFECTING SURFACE[BTU/HR/FT**2 
 
               QSUNT  - ENEGRY FROM SUN AFFECTING SURFACE[BTU/H                                
               QSOLAR - SOLAR ENERGY PROFILE DURING THE STUDY DAY       BTU/HR/FT**2           
               TOTAL  - ACTUAL AMOUNT OF AREA OF SURFACE PROJECTED NORMAL TO SUN'S RAY         
 
     0058  A QSUN.K=SWITCH(QSUNT.K,0,QSUNT.K)     IS SUN UP YET NO=0                       
 
               QSUN   - IS SUN UP YET NO=0                                                     
               QSUNT  - ENEGRY FROM SUN AFFECTING SURFACE[BTU/H                                
               QSUNT  - ENEGRY FROM SUN AFFECTING SURFACE[BTU/H                                
 
     0059  A ANGLE.K=(-SIN(LATTUD)/COS(LATTUD)*SIN(DECL.K)/COS(DECL.K))                    
 
               ANGLE  - PORTION OR MORNING AND NIGHT NIGHT                                     
               LATTUD - LATTUD OF LOCATION          RADIANS(DEGREES*PI/180)                    
               LATTUD - LATTUD OF LOCATION          RADIANS(DEGREES*PI/180)                    
               DECL   - DECLINATION ANGLE   RADIANS                                            
               DECL   - DECLINATION ANGLE   RADIANS                                            
 
     0060  DEF ANGLE PORTION OR MORNING AND NIGHT NIGHT                                    
1PAGE 5    HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
     0061  A ANGLES.K=TABFL(ARCCOS,ANGLE.K,-1,1)  ARCCOS OF ANGLE                          
 
               ANGLES - ARCCOS OF ANGLE                                                        
               ARCCOS - NO DEFINITION PROVIDED                                                 
               ANGLE  - PORTION OR MORNING AND NIGHT NIGHT                                     
 
     0062  A MORNG.K=12-ANGLES.K*180/15/PI                TIME OF MORNG                    
 
               MORNG  - TIME OF MORNG                                                          
               ANGLES - ARCCOS OF ANGLE                                                        
               PI     - CONSTANT PI                                                            
 
     0063  A NIGHT.K=12+ANGLES.K*180/15/PI                  TIME OF NIGHT                  
 
               NIGHT  - TIME OF NIGHT                                                          
               ANGLES - ARCCOS OF ANGLE                                                        
               PI     - CONSTANT PI                                                            
 
     0064  A QSOLAR.K=QMAX*SIN(PI*(ATIME.K/(NIGHT.K-MORNG.K)-MORNG.K/                      
           X (NIGHT.K-MORNG.K)))                                                           
 
               QSOLAR - SOLAR ENERGY PROFILE DURING THE STUDY DAY       BTU/HR/FT**2           
               QMAX   - MAX ENERGY FROM SUN ON GIVEN DAY        BTU/HR/FT**2                   
               PI     - CONSTANT PI                                                            
               ATIME  - TIME USED IN ANALYSIS                                                  
               NIGHT  - TIME OF NIGHT                                                          
               MORNG  - TIME OF MORNG                                                          
               MORNG  - TIME OF MORNG                                                          
               NIGHT  - TIME OF NIGHT                                                          
               MORNG  - TIME OF MORNG                                                          
 
     0065  DEF QSOLAR SOLAR ENERGY PROFILE DURING THE STUDY DAY       BTU/HR/FT**2         
     0066  NOTE                                                                            
     0067  NOTE EXPAND FUNCTION FOR THE CALCULATION OF HEAT TRANSFER COEFFIENTS            
     0068  NOTE                                                                            
     0069  MACRO HTC(H,P,K,W,L,R,M,T,C)                                                    
     0070  A P.K=TABFL(TPR,T.K,410,610) PRANDTL NUMBER      UNITLESS                       
     0071  A M.K=TABFL(TMU,T.K,410,610)           (MU) FOR AIR        LBM/HR/FT            
     0072  A K.K=TABFL(TK,T.K,410,610)  THERMAL CONDUCTIVITY          BTU/HR/FT/F          
     0073  A C.K=BAROP*14.696/(53.35*T.K*29.92)*144         DENSITY   LBM/FT**3            
     0074  A R.K=W*L*C.K/M.K  RENOLD'S NUMBER     UNITLESS                                 
     0075  A H.K=P.K**.333*(ABS(.036*R.K**.8))*K.K/L HEAT TRANSFER COEFFIENT               
     0076  MEND                                                                            
     0077  NOTE                                                                            
     0078  NOTE  CALCULATIONS FOR BOTH THE INSIDE AND OUTSIDE SURFACES NEED BE             
     0079  NOTE  MADE                                                                      
     0080  NOTE                                                                            
     0081  EXPND HTC(HI,CPI,KI,WINDI,LENGTH,RI,MI,TOUT,CI)                                 
     0082+ A CPI.K=TABFL(TPR,TOUT.K,410,610) PRANDTL NUMBER      UNITLESS                  
     0083+ A MI.K=TABFL(TMU,TOUT.K,410,610)           (MU) FOR AIR        LBM/HR/FT        
     0084+ A KI.K=TABFL(TK,TOUT.K,410,610)  THERMAL CONDUCTIVITY          BTU/HR/FT        
     0085+ A CI.K=BAROP*14.696/(53.35*TOUT.K*29.92)*144         DENSITY   LBM/FT**3        
     0086+ A RI.K=WINDI*LENGTH*CI.K/MI.K  RENOLD'S NUMBER     UNITLESS                     
     0087+ A HI.K=CPI.K**.333*(ABS(.036*RI.K**.8))*KI.K/LENGTH HEAT TRANSFER COEFFI        
     0088+ MEND                                                                            
     0089  DEF HI INSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                            
     0090  DEF HO OUTSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                           
1PAGE 6    HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
     0091  EXPND HTC(HO,PO,KO,WINDO,LENGTH,RO,MO,TOUT,CO)                                  
     0092+ A PO.K=TABFL(TPR,TOUT.K,410,610) PRANDTL NUMBER      UNITLESS                   
     0093+ A MO.K=TABFL(TMU,TOUT.K,410,610)           (MU) FOR AIR        LBM/HR/FT        
     0094+ A KO.K=TABFL(TK,TOUT.K,410,610)  THERMAL CONDUCTIVITY          BTU/HR/FT        
     0095+ A CO.K=BAROP*14.696/(53.35*TOUT.K*29.92)*144         DENSITY   LBM/FT**3        
     0096+ A RO.K=WINDO*LENGTH*CO.K/MO.K  RENOLD'S NUMBER     UNITLESS                     
     0097+ A HO.K=PO.K**.333*(ABS(.036*RO.K**.8))*KO.K/LENGTH HEAT TRANSFER COEFFIE        
     0098+ MEND                                                                            
     0099  NOTE INSIDE AND OUTSIDE TEMPERATURE CALCULATIONS                                
     0100  NOTE                                                                            
     0101  A TOUT.K=TABFL(TTOUT,ATIME.K,0,24) OUTSIDE TEMPERATURE     RANKINE              
 
               TOUT   - OUTSIDE TEMPERATURE     RANKINE                                        
               TTOUT  - OUTSIDE TEMP PROFILE[RA                                                
               ATIME  - TIME USED IN ANALYSIS                                                  
 
     0102  A TIN.K=TABFL(TTIN,ATIME.K,0,24)       INSIDE TEMPERATURE  RANKINE              
 
               TIN    - INSIDE TEMPERATURE  RANKINE                                            
               TTIN   - INSIDE TEMP PROFILE RANKINE                                            
               ATIME  - TIME USED IN ANALYSIS                                                  
 
     0103  NOTE                                                                            
     0104  NOTE EXPAND FUNCTIONS FOR THE TEMPERATURE CALCULATIONS                          
     0105  NOTE                                                                            
     0106  MACRO EXTROR(STEP,T,TT,TT1)                                                     
     0107  A T1.K=(A1*DTK/STEP**2)*(2*HO.K*STEP/K1*TOUT.K+2*TT1.K+                         
           X (-2*HO.K*STEP/K1-2+STEP**2/(A1*DTK))*TT.K)                                    
     0108  A T.K=T1.K+2*QSUN.K/K1*A1*DTK/STEP*EPSLON                                       
     0109  N TT=505 INITIAL NODE TEMPERATURE      RANKINE                                  
     0110  R RATE1.KL=T.K-TT.K                                                             
     0111  L TT.K=INTGRL(RATE1.JK)                                                         
     0112  MEND                                                                            
     0113  NOTE                                                                            
     0114  MACRO INTROR(T,TT,CA,CK,TM1,STEP,RATE)                                          
     0115  A T.K=(CA*DTK/STEP**2)*(2*HI.K*STEP/CK*TIN.K+2*TM1.K+(-2*HI.K*STEP/             
           X CK-2+STEP**2/(CA*DTK))*TT.K)                                                  
     0116  N TT=505                                                                        
     0117  R RATE.KL=T.K-TT.K                                                              
     0118  L TT.K=INTGRL(RATE.JK)                                                          
     0119  MEND                                                                            
     0120  NOTE                                                                            
     0121  NOTE                                                                            
     0122  MACRO SECTN(T,TT,CA,CK,TM1,TP1,STEP,RATE)                                       
     0123  A T.K=(CA*DTK/STEP**2)*(TP1.K+TM1.K)+(1-2*CA*DTK/STEP**2)*                      
           X TT.K                                                                          
     0124  N TT=505                                                                        
     0125  R RATE.KL=T.K-TT.K                                                              
     0126  L TT.K=INTGRL(RATE.JK)                                                          
     0127  MEND                                                                            
     0128  NOTE                                                                            
     0129  NOTE                                                                            
     0130  MACRO INTRSC(T,TT,T1,T2,CA1,CA2,CK1,CK2,STEP,RATE)                              
     0131  A T.K=TT.K+(CK1/STEP*TT.K+CK2/STEP*T1.K-(CK1/STEP+CK2/STEP)*T2.K)/              
           X (CK1/CA1+CK2/CA2)*STEP/2/DTK                                                  
     0132  N TT=505                                                                        
     0133  R RATE.KL=T.K-TT.K                                                              
1PAGE 7    HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
     0134  L TT.K=INTGRL(RATE.JK)                                                          
     0135  MEND                                                                            
     0136  NOTE                                                                            
     0137  NOTE                                                                            
     0138  MACRO QFIND(T1,QI,QSUM)                                                         
     0139  A QI.K=(T1.K-TIN.K)*HI.K                                                        
     0140  N QSUM=0                                                                        
     0141  A OUT.K=SWITCH(1,0,A2TIME.K)                                                    
     0142  R QR.KL=QI.K*DTK*OUT.K                                                          
     0143  L QSUM.K=INTGRL(QR.JK)                                                          
     0144  MEND                                                                            
     0145  T TMU=.0358,.0394,.0459,.0484                                                   
 
               TMU    - NO DEFINITION PROVIDED                                                 
 
     0146  T TK=.0118,.0131,.0157,.0167                                                    
 
               TK     - NO DEFINITION PROVIDED                                                 
 
     0147  T TCP=.239,.240,.240,.240                                                       
             $                                                                             
            1) *****   W A R N I N G    *****          ND0588
 
 
               TCP    - NO DEFINITION PROVIDED                                                 
 
     0148  T TPR=.729,.718,.706,.699                                                       
 
               TPR    - NO DEFINITION PROVIDED                                                 
 
     0149  T TDCL=-23.08,-21.15,-17.18,-12.55,-7.15,-2.25,4.16,9.3,14.51,18.41,            
           X 21,23,23,21,18,14.17,8.33,3.19,-2.54,-8.15,-14.12,-18.18,-21.41,-23.08        
 
               TDCL   - NO DEFINITION PROVIDED                                                 
 
     0150  T ARCCOS=3.14159,2.69,2.49,2.34,2.21,2.09,1.98,1.87,1.77,1.67,1.5709            
           X ,.1476,1.3694,1.2661,1.1593,1.0472,.9273,.7954,.6435,.4510,0                  
 
               ARCCOS - NO DEFINITION PROVIDED                                                 
 
     0151  T ARCSIN=-1.5708,-1.11,-.92,-.77,-.64,-.52,-.41,-.30,-.20,-.10,                 
           X 0,.1002,.2014,.3047,.4115,.5236,.6435,.7754,.9272,1.119,1.57                  
 
               ARCSIN - NO DEFINITION PROVIDED                                                 
 
     0152  NOTE                                                                            
     0153  NOTE                                                                            
     0154  C K1=.12                                                                        
 
               K1     - NO DEFINITION PROVIDED                                                 
 
     0155  C C1=.57                                                                        
             $                                                                             
            1) *****   W A R N I N G    *****          ND0588
 
 
               C1     - NO DEFINITION PROVIDED                                                 
1PAGE 8    HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
 
     0156  C A1=.0041                                                                      
 
               A1     - NO DEFINITION PROVIDED                                                 
 
     0157  C DX1=.125                                                                      
 
               DX1    - NO DEFINITION PROVIDED                                                 
 
     0158  C K2=.7                                                                         
             $                                                                             
            1) *****   W A R N I N G    *****          ND0588
 
 
               K2     - NO DEFINITION PROVIDED                                                 
 
     0159  C C2=.2                                                                         
             $                                                                             
            1) *****   W A R N I N G    *****          ND0588
 
 
               C2     - NO DEFINITION PROVIDED                                                 
 
     0160  C A2=.0267                                                                      
             $                                                                             
            1) *****   W A R N I N G    *****          ND0588
 
 
               A2     - NO DEFINITION PROVIDED                                                 
 
     0161  C DX2=.0416                                                                     
             $                                                                             
            1) *****   W A R N I N G    *****          ND0588
 
 
               DX2    - NO DEFINITION PROVIDED                                                 
 
     0162  EXPND EXTROR(DX1,TWAL1,TTWAL1,TTWAL2)                                           
     0163+ A T1.K=(A1*DTK/DX1**2)*(2*HO.K*DX1/K1*TOUT.K+2*TTWAL2.K+                        
         + X (-2*HO.K*DX1/K1-2+DX1**2/(A1*DTK))*TTWAL1.K)                                  
     0164+ A TWAL1.K=T1.K+2*QSUN.K/K1*A1*DTK/DX1*EPSLON                                    
     0165+ N TTWAL1=505 INITIAL NODE TEMPERATURE      RANKINE                              
     0166+ R RATE1.KL=TWAL1.K-TTWAL1.K                                                     
     0167+ L TTWAL1.K=INTGRL(RATE1.JK)                                                     
     0168+ MEND                                                                            
     0169  EXPND INTROR(TWAL5,TTWAL5,A1,K1,TTWAL4,DX1,RATE5)                               
     0170+ A TWAL5.K=(A1*DTK/DX1**2)*(2*HI.K*DX1/K1*TIN.K+2*TTWAL4.K+(-2*HI.K*DX1/         
         + X K1-2+DX1**2/(A1*DTK))*TTWAL5.K)                                               
     0171+ N TTWAL5=505                                                                    
     0172+ R RATE5.KL=TWAL5.K-TTWAL5.K                                                     
     0173+ L TTWAL5.K=INTGRL(RATE5.JK)                                                     
     0174+ MEND                                                                            
     0175  EXPND SECTN(TWAL2,TTWAL2,A1,K1,TTWAL1,TTWAL3,DX1,RATE2)                         
     0176+ A TWAL2.K=(A1*DTK/DX1**2)*(TTWAL3.K+TTWAL1.K)+(1-2*A1*DTK/DX1**2)*              
         + X TTWAL2.K                                                                      
     0177+ N TTWAL2=505                                                                    
     0178+ R RATE2.KL=TWAL2.K-TTWAL2.K                                                     
1PAGE 9    HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
     0179+ L TTWAL2.K=INTGRL(RATE2.JK)                                                     
     0180+ MEND                                                                            
     0181  EXPND SECTN(TWAL3,TTWAL3,A1,K1,TTWAL2,TTWAL4,DX1,RATE3)                         
     0182+ A TWAL3.K=(A1*DTK/DX1**2)*(TTWAL4.K+TTWAL2.K)+(1-2*A1*DTK/DX1**2)*              
         + X TTWAL3.K                                                                      
     0183+ N TTWAL3=505                                                                    
     0184+ R RATE3.KL=TWAL3.K-TTWAL3.K                                                     
     0185+ L TTWAL3.K=INTGRL(RATE3.JK)                                                     
     0186+ MEND                                                                            
     0187  EXPND SECTN(TWAL4,TTWAL4,A1,K1,TTWAL3,TTWAL5,DX1,RATE4)                         
     0188+ A TWAL4.K=(A1*DTK/DX1**2)*(TTWAL5.K+TTWAL3.K)+(1-2*A1*DTK/DX1**2)*              
         + X TTWAL4.K                                                                      
     0189+ N TTWAL4=505                                                                    
     0190+ R RATE4.KL=TWAL4.K-TTWAL4.K                                                     
     0191+ L TTWAL4.K=INTGRL(RATE4.JK)                                                     
     0192+ MEND                                                                            
     0193  EXPND QFIND(TWAL5,QI,QSUM)                                                      
     0194+ A QI.K=(TWAL5.K-TIN.K)*HI.K                                                     
     0195+ N QSUM=0                                                                        
     0196+ A OUT.K=SWITCH(1,0,A2TIME.K)                                                    
     0197+ R QR.KL=QI.K*DTK*OUT.K                                                          
     0198+ L QSUM.K=INTGRL(QR.JK)                                                          
     0199+ MEND                                                                            
     0200  NOTE                                                                            
     0201  NOTE SPECIFICATIONS                                                             
     0202  PARM DT=.7                                                                      
     0203  PARM START=1                                                                    
     0204  PARM STOP=48                                                                    
     0205  PARM PRTPER=1                                                                   
     0206  PARM PLTPER=1                                                                   
     0207  PRINT ATIME,QSUM,QI,HO,HI                                                       
 
               ATIME  - TIME USED IN ANALYSIS                                                  
               QI     -  O DEFINITION PROVIDED                                                 
               QI     - NO DEFINITION PROVIDED                                                 
               HO     - OUTSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                         
               HI     - INSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                          
 
     0208  PRINT ATIME.2,QSUM.2,QI.2,HO.2,HI.2                                             
 
               ATIME  - TIME USED IN ANALYSIS                                                  
               QI     -  O DEFINITION PROVIDED                                                 
               QI     - NO DEFINITION PROVIDED                                                 
               HO     - OUTSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                         
               HI     - INSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                          
 
     0209  PRINT ATIME.3,QSUM.3,QI.3,HO.3,HI.3                                             
 
               ATIME  - TIME USED IN ANALYSIS                                                  
               QI     -  O DEFINITION PROVIDED                                                 
               QI     - NO DEFINITION PROVIDED                                                 
               HO     - OUTSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                         
               HI     - INSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                          
 
     0210  PRINT ATIME.4,QSUM.4,QI.4,HO.4,HI.4                                             
 
               ATIME  - TIME USED IN ANALYSIS                                                  
1PAGE 10   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
               QI     -  O DEFINITION PROVIDED                                                 
               QI     - NO DEFINITION PROVIDED                                                 
               HO     - OUTSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                         
               HI     - INSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                          
 
     0211  PRINT ATIME.5,QSUM.5,QI.5,HO.5,HI.5                                             
 
               ATIME  - TIME USED IN ANALYSIS                                                  
               QI     -  O DEFINITION PROVIDED                                                 
               QI     - NO DEFINITION PROVIDED                                                 
               HO     - OUTSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                         
               HI     - INSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                          
 
     0212  PRINT ATIME.6,QSUM.6,QI.6,HO.6,HI.6                                             
 
               ATIME  - TIME USED IN ANALYSIS                                                  
               QI     -  O DEFINITION PROVIDED                                                 
               QI     - NO DEFINITION PROVIDED                                                 
               HO     - OUTSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                         
               HI     - INSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                          
 
     0213  PRINT ATIME.7,QSUM.7,QI.7,HO.7,HI.7                                             
 
               ATIME  - TIME USED IN ANALYSIS                                                  
               QI     -  O DEFINITION PROVIDED                                                 
               QI     - NO DEFINITION PROVIDED                                                 
               HO     - OUTSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                         
               HI     - INSIDE HEAT TRANSFER COEFFIENT BTU/HR/FT**2/F                          
 
     0214  PRINT QSUM.*                                                                    
 
               QI     -  O DEFINITION PROVIDED                                                 
 
     0215  PRINT QSUN.*                                                                    
 
               QSUN   - IS SUN UP YET NO=0                                                     
 
     0216  PRINT QSOLAR.*                                                                  
 
               QSOLAR - SOLAR ENERGY PROFILE DURING THE STUDY DAY       BTU/HR/FT**2           
 
     0217  PLOT QSUN.*                                                                     
 
               QSUN   - IS SUN UP YET NO=0                                                     
 
     0218  PLOT QSOLAR.*                                                                   
 
               QSOLAR - SOLAR ENERGY PROFILE DURING THE STUDY DAY       BTU/HR/FT**2           
 
     0219  PLOT QSUM.*                                                                     
 
               QI     -  O DEFINITION PROVIDED                                                 
 
     0220  RERUN  WINDO=158400 FPH                                                         
     0221  C WINDO=158400                                                                  
 
               WINDO  - OUTSIDE AVERAGE WIND VELOCITY           FPH (MPH*5280                  
1PAGE 11   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
 
     0222  RERUN  WINDO=105600                                                             
     0223  C WINDO=105600                                                                  
 
               WINDO  - OUTSIDE AVERAGE WIND VELOCITY           FPH (MPH*5280                  
 
     0224  RERUN  TO CHANGE THE INSIDE TEMPERATURE                                         
     0225  C WINDO=52800                                                                   
 
               WINDO  - OUTSIDE AVERAGE WIND VELOCITY           FPH (MPH*5280                  
 
     0226  T TTIN=520,528,529,520                                                          
 
               TTIN   - INSIDE TEMP PROFILE RANKINE                                            
 
     0227  RERUN  WINTER                                                                   
     0228  C DAY=41                                                                        
 
               DAY    - DAY OF INTEREST ,STARTING AT JAN 1      DAY=JULY 14                    
 
     0229  T TTOUT=460,460,461,464,460,460,460,460                                         
 
               TTOUT  - OUTSIDE TEMP PROFILE[RA                                                
 
     0230  C WINDO=52800                                                                   
 
               WINDO  - OUTSIDE AVERAGE WIND VELOCITY           FPH (MPH*5280                  
 
     0231  RERUN  TO CHANGE THE OUTSIDE TEMPERATURE                                        
     0232  C DAY=41                                                                        
 
               DAY    - DAY OF INTEREST ,STARTING AT JAN 1      DAY=JULY 14                    
 
     0233  C WINDO=105600                                                                  
 
               WINDO  - OUTSIDE AVERAGE WIND VELOCITY           FPH (MPH*5280                  
 
     0234  T TTOUT=460,460,461,464,460,460,460,460                                         
 
               TTOUT  - OUTSIDE TEMP PROFILE[RA                                                
 
     0235  RERUN                                                                           
     0236  C DAY=41                                                                        
 
               DAY    - DAY OF INTEREST ,STARTING AT JAN 1      DAY=JULY 14                    
 
     0237  C WINDO=158400                                                                  
 
               WINDO  - OUTSIDE AVERAGE WIND VELOCITY           FPH (MPH*5280                  
 
     0238  T TTOUT=460,460,461,464,460,460,460,460                                         
 
               TTOUT  - OUTSIDE TEMP PROFILE[RA                                                
 
     0239  RERUN  WINTER DAY AND MODIFINED INSIDEE AND OUTSIDE TEMPERATURE                 
     0240  C DAY=41                                                                        
 
1PAGE 12   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
               DAY    - DAY OF INTEREST ,STARTING AT JAN 1      DAY=JULY 14                    
 
     0241  C WINDO=52800                                                                   
 
               WINDO  - OUTSIDE AVERAGE WIND VELOCITY           FPH (MPH*5280                  
 
     0242  T TTOUT=460,460,461,464,460,460,460,460                                         
 
               TTOUT  - OUTSIDE TEMP PROFILE[RA                                                
 
     0243  T TTIN=520,528,528,520                                                          
 
               TTIN   - INSIDE TEMP PROFILE RANKINE                                            
 
1PAGE 13   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
     * * *    S T A T S    A N D    O P T I O N S    * * *
 
      243 SOURCE STATEMENTS
 
       14 DIAGNOSTIC MESSAGES
 
            14 WARNINGS 
 
 
      CARD TYPE       OCCURRENCE
 
        T                 15
        C                 31
        PARM               5
        N                 11
        L                 11
        A                 61
        R                 11
        X                 16
        *                  3
        NOTE              39
        PRINT             10
        PLOT               3
        RERUN              7
        MACRO              6
        MEND              14
        EXPND              8
        DEF                7
        TITLE              1
 
 
      OPTIONS IN EFFECT:
 
        CHECK       NOSYSTEM    DOCUMENT    WIDE        
        STATS       GO          NOSYMBOL    NOXREF      
        WARN        NOOBJECT    SOURCE      NOTIME      
 
 
      INTEGRATION METHOD:
 
           EULER LOWER SUM
 
 
1PAGE 14   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
        TIME     ATIME      QSUM       QI        HO        HI     
        E+00      E+00      E+00      E+00      E+00      E-03                                                     
 
        1.000     1.000    0.0000   -10.740    2.2062    608.79   
        1.700     1.700    0.0000     -.830    2.2069    608.99   
        3.100     3.100    0.0000     -.709    2.2058    608.68   
        3.800     3.800    0.0000     -.317    2.2042    608.25   
        5.200     5.200    0.0000     -.673    2.1998    607.01   
        5.900     5.900    0.0000     -.391    2.1971    606.27   
        7.300     7.300    0.0000     -.873    2.1919    604.83   
        8.000     8.000    0.0000     -.627    2.1897    604.25   
        8.700     8.700    0.0000     -.385    2.1876    603.66   
       10.100    10.100    0.0000     -.888    2.1833    602.47   
       10.800    10.800    0.0000     -.626    2.1809    601.81   
       12.200    12.200    0.0000     -.102    2.1757    600.39   
       12.900    12.900    0.0000     -.847    2.1731    599.65   
       14.300    14.300    0.0000     -.357    2.1672    598.04   
       15.000    15.000    0.0000     -.122    2.1641    597.17   
       15.700    15.700    0.0000     -.893    2.1612    596.36   
       17.100    17.100    0.0000     -.450    2.1567    595.12   
       17.800    17.800    0.0000     -.236    2.1563    595.01   
       19.200    19.200    0.0000     -.805    2.1574    595.33   
       19.900    19.900    0.0000     -.571    2.1588    595.71   
       21.300    21.300    0.0000     -.077    2.1626    596.76   
       22.000    22.000    0.0000     -.829    2.1649    597.38   
       22.700    22.700    0.0000     -.586    2.1673    598.05   
       24.100     0.100    0.0000     -.140    2.2038    608.14   
       24.800     0.800   -0.5586     -.925    2.2058    608.69   
       26.200     2.200   -1.3662     -.535    2.2068    608.97   
       26.900     2.900   -1.6283     -.366    2.2061    608.77   
       28.300     4.300   -1.9143     -.094    2.2028    607.86   
       29.000     5.000   -1.9601     0.009    2.2005    607.21   
       29.700     5.700   -1.9559     0.091    2.1979    606.49   
       31.100     7.100   -1.8356     0.204    2.1925    605.00   
       31.800     7.800   -1.7354     0.243    2.1903    604.41   
       33.200     9.200   -1.4806     0.308    2.1861    603.24   
       33.900     9.900   -1.3298     0.349    2.1839    602.64   
       35.300    11.300   -0.9620     0.459    2.1791    601.31   
       36.000    12.000   -0.7372     0.517    2.1765    600.60   
       36.700    12.700   -0.4839     0.574    2.1739    599.87   
       38.100    14.100    0.1052     0.681    2.1682    598.29   
       38.800    14.800    0.4387     0.731    2.1650    597.41   
       40.200    16.200    1.1798     0.831    2.1593    595.85   
       40.900    16.900    1.5870     0.882    2.1572    595.26   
       42.300    18.300    2.4777     0.992    2.1564    595.05   
       43.000    19.000    2.9636     1.055    2.1571    595.25   
       43.700    19.700    3.4806     1.137    2.1584    595.59   
       45.100    21.100    4.6428     1.343    2.1620    596.59   
       45.800    21.800    5.3008     1.457    2.1642    597.20   
       47.200    23.200    6.7846     1.683    2.1690    598.53   
       47.900    23.900    7.6095     1.790    2.1714    599.20   
1PAGE 15   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
        TIME    ATIME.2    QSUM.2     QI.2      HO.2      HI.2    
        E+00      E+00      E+00      E+00      E+00      E-03                                                     
 
        1.000     1.000    0.0000   -10.740    5.3131    608.79   
        1.700     1.700    0.0000     -.830    5.3147    608.99   
        3.100     3.100    0.0000     -.709    5.3120    608.68   
        3.800     3.800    0.0000     -.309    5.3083    608.25   
        5.200     5.200    0.0000     -.641    5.2975    607.01   
        5.900     5.900    0.0000     -.344    5.2910    606.27   
        7.300     7.300    0.0000     -.791    5.2785    604.83   
        8.000     8.000    0.0000     -.527    5.2734    604.25   
        8.700     8.700    0.0000     -.267    5.2683    603.66   
       10.100    10.100    0.0000     -.741    5.2578    602.47   
       10.800    10.800    0.0000     -.477    5.2521    601.81   
       12.200    12.200    0.0000     -.954    5.2397    600.39   
       12.900    12.900    0.0000     -.699    5.2333    599.65   
       14.300    14.300    0.0000     -.204    5.2192    598.04   
       15.000    15.000    0.0000     -.963    5.2116    597.17   
       15.700    15.700    0.0000     -.725    5.2046    596.36   
       17.100    17.100    0.0000     -.259    5.1937    595.12   
       17.800    17.800    0.0000     -.030    5.1927    595.01   
       19.200    19.200    0.0000     -.566    5.1956    595.33   
       19.900    19.900    0.0000     -.322    5.1988    595.71   
       21.300    21.300    0.0000     -.829    5.2080    596.76   
       22.000    22.000    0.0000     -.587    5.2135    597.38   
       22.700    22.700    0.0000     -.351    5.2192    598.05   
       24.100     0.100    0.0000     -.916    5.3073    608.14   
       24.800     0.800   -0.4487     -.706    5.3121    608.69   
       26.200     2.200   -1.0443     -.325    5.3146    608.97   
       26.900     2.900   -1.2035     -.167    5.3128    608.77   
       28.300     4.300   -1.3005     0.077    5.3049    607.86   
       29.000     5.000   -1.2628     0.163    5.2992    607.21   
       29.700     5.700   -1.1830     0.228    5.2929    606.49   
       31.100     7.100   -0.9365     0.310    5.2800    605.00   
       31.800     7.800   -0.7848     0.335    5.2748    604.41   
       33.200     9.200   -0.4461     0.375    5.2646    603.24   
       33.900     9.900   -0.2625     0.405    5.2594    602.64   
       35.300    11.300    0.1499     0.473    5.2477    601.31   
       36.000    12.000    0.3816     0.509    5.2415    600.60   
       36.700    12.700    0.6308     0.547    5.2351    599.87   
       38.100    14.100    1.1853     0.626    5.2214    598.29   
       38.800    14.800    1.4920     0.669    5.2137    597.41   
       40.200    16.200    2.1700     0.765    5.2001    595.85   
       40.900    16.900    2.5448     0.819    5.1949    595.26   
       42.300    18.300    3.3772     0.945    5.1931    595.05   
       43.000    19.000    3.8401     1.020    5.1948    595.25   
       43.700    19.700    4.3397     1.112    5.1978    595.59   
       45.100    21.100    5.4780     1.318    5.2065    596.59   
       45.800    21.800    6.1240     1.427    5.2119    597.20   
       47.200    23.200    7.5763     1.643    5.2235    598.53   
       47.900    23.900    8.3812     1.744    5.2293    599.20   
1PAGE 16   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
        TIME    ATIME.3    QSUM.3     QI.3      HO.3      HI.3    
        E+00      E+00      E+00      E+00      E+00      E-03                                                     
 
        1.000     1.000    0.0000   -10.740    3.8412    608.79   
        1.700     1.700    0.0000     -.830    3.8424    608.99   
        3.100     3.100    0.0000     -.709    3.8405    608.68   
        3.800     3.800    0.0000     -.313    3.8378    608.25   
        5.200     5.200    0.0000     -.653    3.8300    607.01   
        5.900     5.900    0.0000     -.361    3.8253    606.27   
        7.300     7.300    0.0000     -.818    3.8162    604.83   
        8.000     8.000    0.0000     -.560    3.8125    604.25   
        8.700     8.700    0.0000     -.306    3.8089    603.66   
       10.100    10.100    0.0000     -.787    3.8013    602.47   
       10.800    10.800    0.0000     -.522    3.7971    601.81   
       12.200    12.200    0.0000     -.998    3.7882    600.39   
       12.900    12.900    0.0000     -.744    3.7836    599.65   
       14.300    14.300    0.0000     -.250    3.7734    598.04   
       15.000    15.000    0.0000     -.011    3.7679    597.17   
       15.700    15.700    0.0000     -.776    3.7628    596.36   
       17.100    17.100    0.0000     -.317    3.7550    595.12   
       17.800    17.800    0.0000     -.093    3.7543    595.01   
       19.200    19.200    0.0000     -.639    3.7563    595.33   
       19.900    19.900    0.0000     -.397    3.7587    595.71   
       21.300    21.300    0.0000     -.901    3.7653    596.76   
       22.000    22.000    0.0000     -.657    3.7692    597.38   
       22.700    22.700    0.0000     -.418    3.7734    598.05   
       24.100     0.100    0.0000     -.980    3.8371    608.14   
       24.800     0.800   -0.4800     -.768    3.8406    608.69   
       26.200     2.200   -1.1358     -.385    3.8423    608.97   
       26.900     2.900   -1.3242     -.221    3.8411    608.77   
       28.300     4.300   -1.4732     0.031    3.8353    607.86   
       29.000     5.000   -1.4578     0.122    3.8313    607.21   
       29.700     5.700   -1.3979     0.192    3.8267    606.49   
       31.100     7.100   -1.1835     0.284    3.8173    605.00   
       31.800     7.800   -1.0444     0.313    3.8136    604.41   
       33.200     9.200   -0.7255     0.360    3.8062    603.24   
       33.900     9.900   -0.5492     0.393    3.8024    602.64   
       35.300    11.300   -0.1445     0.475    3.7940    601.31   
       36.000    12.000    0.0882     0.518    3.7895    600.60   
       36.700    12.700    0.3419     0.561    3.7849    599.87   
       38.100    14.100    0.9124     0.647    3.7750    598.29   
       38.800    14.800    1.2294     0.691    3.7694    597.41   
       40.200    16.200    1.9298     0.787    3.7596    595.85   
       40.900    16.900    2.3155     0.840    3.7558    595.26   
       42.300    18.300    3.1665     0.959    3.7545    595.05   
       43.000    19.000    3.6365     1.030    3.7558    595.25   
       43.700    19.700    4.1411     1.119    3.7579    595.59   
       45.100    21.100    5.2867     1.327    3.7642    596.59   
       45.800    21.800    5.9367     1.438    3.7681    597.20   
       47.200    23.200    7.4000     1.657    3.7765    598.53   
       47.900    23.900    8.2117     1.759    3.7807    599.20   
1PAGE 17   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
        TIME    ATIME.4    QSUM.4     QI.4      HO.4      HI.4    
        E+00      E+00      E+00      E+00      E+00      E-03                                                     
 
        1.000     1.000     0.000   -7.6023    2.2062    608.79   
        1.700     1.700     0.000   -7.3577    2.2069    608.99   
        3.100     3.100     0.000   -7.2228    2.2058    608.68   
        3.800     3.800     0.000   -7.2180    2.2042    608.25   
        5.200     5.200     0.000   -7.2101    2.1998    607.01   
        5.900     5.900     0.000   -7.1883    2.1971    606.27   
        7.300     7.300     0.000   -7.0911    2.1919    604.83   
        8.000     8.000     0.000   -7.0112    2.1897    604.25   
        8.700     8.700     0.000   -6.9056    2.1876    603.66   
       10.100    10.100     0.000   -6.6005    2.1833    602.47   
       10.800    10.800     0.000   -6.3940    2.1809    601.81   
       12.200    12.200     0.000   -5.9038    2.1757    600.39   
       12.900    12.900     0.000   -5.6272    2.1731    599.65   
       14.300    14.300     0.000   -5.0165    2.1672    598.04   
       15.000    15.000     0.000   -4.6825    2.1641    597.17   
       15.700    15.700     0.000   -4.3292    2.1612    596.36   
       17.100    17.100     0.000   -3.5618    2.1567    595.12   
       17.800    17.800     0.000   -3.1467    2.1563    595.01   
       19.200    19.200     0.000   -2.2341    2.1574    595.33   
       19.900    19.900     0.000   -1.7186    2.1588    595.71   
       21.300    21.300     0.000   -0.5811    2.1626    596.76   
       22.000    22.000     0.000    0.0310    2.1649    597.38   
       22.700    22.700     0.000    0.6656    2.1673    598.05   
       24.100     0.100     0.000    1.8649    2.2038    608.14   
       24.800     0.800     0.914    1.5091    2.2058    608.69   
       26.200     2.200     2.252    0.9816    2.2068    608.97   
       26.900     2.900     2.733    0.7702    2.2061    608.77   
       28.300     4.300     3.393    0.3977    2.2028    607.86   
       29.000     5.000     3.588    0.2288    2.2005    607.21   
       29.700     5.700     3.700    0.0706    2.1979    606.49   
       31.100     7.100     3.698   -0.2094    2.1925    605.00   
       31.800     7.800     3.595   -0.3261    2.1903    604.41   
       33.200     9.200     3.228   -0.4945    2.1861    603.24   
       33.900     9.900     2.986   -0.5305    2.1839    602.64   
       35.300    11.300     2.466   -0.5005    2.1791    601.31   
       36.000    12.000     2.221   -0.4444    2.1765    600.60   
       36.700    12.700     2.003   -0.3647    2.1739    599.87   
       38.100    14.100     1.696   -0.1371    2.1682    598.29   
       38.800    14.800     1.629    0.0113    2.1650    597.41   
       40.200    16.200     1.724    0.3818    2.1593    595.85   
       40.900    16.900     1.911    0.6060    2.1572    595.26   
       42.300    18.300     2.629    1.1386    2.1564    595.05   
       43.000    19.000     3.187    1.4526    2.1571    595.25   
       43.700    19.700     3.899    1.8121    2.1584    595.59   
       45.100    21.100     5.871    2.6533    2.1620    596.59   
       45.800    21.800     7.171    3.1264    2.1642    597.20   
       47.200    23.200    10.481    4.1551    2.1690    598.53   
       47.900    23.900    12.517    4.7051    2.1714    599.20   
1PAGE 18   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
        TIME    ATIME.5    QSUM.5     QI.5      HO.5      HI.5    
        E+00      E+00      E+00      E+00      E+00      E-03                                                     
 
        1.000     1.000      0.00     -.885    2.3267    642.06   
        1.700     1.700      0.00     -.604    2.3268    642.07   
        3.100     3.100      0.00     -.440    2.3267    642.05   
        3.800     3.800      0.00     -.449    2.3265    642.00   
        5.200     5.200      0.00     -.578    2.3258    641.80   
        5.900     5.900      0.00     -.681    2.3252    641.64   
        7.300     7.300      0.00     -.931    2.3230    641.03   
        8.000     8.000      0.00     -.063    2.3212    640.52   
        8.700     8.700      0.00     -.196    2.3195    640.05   
       10.100    10.100      0.00     -.443    2.3171    639.40   
       10.800    10.800      0.00     -.553    2.3180    639.63   
       12.200    12.200      0.00     -.725    2.3219    640.72   
       12.900    12.900      0.00     -.779    2.3242    641.34   
       14.300    14.300      0.00     -.810    2.3271    642.15   
       15.000    15.000      0.00     -.784    2.3273    642.20   
       15.700    15.700      0.00     -.731    2.3272    642.19   
       17.100    17.100      0.00     -.549    2.3267    642.03   
       17.800    17.800      0.00     -.419    2.3266    642.03   
       19.200    19.200      0.00     -.079    2.3266    642.03   
       19.900    19.900      0.00     -.867    2.3266    642.03   
       21.300    21.300      0.00     -.356    2.3266    642.03   
       22.000    22.000      0.00     -.056    2.3266    642.03   
       22.700    22.700      0.00     -.726    2.3266    642.03   
       24.100     0.100      0.00     -.129    2.3267    642.03   
       24.800     0.800      -.00     -.795    2.3267    642.05   
       26.200     2.200      -.94     -.879    2.3268    642.07   
       26.900     2.900    -13.80     -.334    2.3267    642.05   
       28.300     4.300    -22.17     -.115    2.3263    641.94   
       29.000     5.000    -26.64     -.450    2.3260    641.84   
       29.700     5.700    -31.27     -.749    2.3254    641.69   
       31.100     7.100    -40.96   -10.251    2.3235    641.17   
       31.800     7.800    -45.98   -10.454    2.3217    640.67   
       33.200     9.200    -56.31   -10.773    2.3184    639.76   
       33.900     9.900    -61.59   -10.892    2.3173    639.46   
       35.300    11.300    -72.31   -11.056    2.3192    639.98   
       36.000    12.000    -77.73   -11.098    2.3213    640.55   
       36.700    12.700    -83.16   -11.111    2.3235    641.17   
       38.100    14.100    -94.04   -11.044    2.3270    642.11   
       38.800    14.800    -99.46   -10.963    2.3272    642.19   
       40.200    16.200   -110.15   -10.716    2.3271    642.14   
       40.900    16.900   -115.40   -10.553    2.3268    642.06   
       42.300    18.300   -125.65   -10.150    2.3266    642.03   
       43.000    19.000   -130.62     -.909    2.3266    642.03   
       43.700    19.700   -135.47     -.641    2.3266    642.03   
       45.100    21.100   -144.78     -.024    2.3266    642.03   
       45.800    21.800   -149.20     -.674    2.3266    642.03   
       47.200    23.200   -157.52     -.888    2.3266    642.03   
       47.900    23.900   -161.38     -.451    2.3266    642.03   
1PAGE 19   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
        TIME    ATIME.6    QSUM.6     QI.6      HO.6      HI.6    
        E+00      E+00      E+00      E+00      E+00      E-03                                                     
 
        1.000     1.000      0.00     -.885    4.0511    642.06   
        1.700     1.700      0.00     -.604    4.0512    642.07   
        3.100     3.100      0.00     -.440    4.0510    642.05   
        3.800     3.800      0.00     -.460    4.0507    642.00   
        5.200     5.200      0.00     -.625    4.0495    641.80   
        5.900     5.900      0.00     -.753    4.0485    641.64   
        7.300     7.300      0.00     -.053    4.0446    641.03   
        8.000     8.000      0.00     -.211    4.0414    640.52   
        8.700     8.700      0.00     -.368    4.0384    640.05   
       10.100    10.100      0.00     -.659    4.0343    639.40   
       10.800    10.800      0.00     -.789    4.0358    639.63   
       12.200    12.200      0.00     -.996    4.0427    640.72   
       12.900    12.900      0.00     -.064    4.0466    641.34   
       14.300    14.300      0.00     -.119    4.0517    642.15   
       15.000    15.000      0.00     -.103    4.0520    642.20   
       15.700    15.700      0.00     -.060    4.0519    642.19   
       17.100    17.100      0.00     -.895    4.0510    642.03   
       17.800    17.800      0.00     -.774    4.0509    642.03   
       19.200    19.200      0.00     -.448    4.0509    642.03   
       19.900    19.900      0.00     -.242    4.0509    642.03   
       21.300    21.300      0.00     -.741    4.0509    642.03   
       22.000    22.000      0.00     -.446    4.0509    642.03   
       22.700    22.700      0.00     -.120    4.0509    642.03   
       24.100     0.100      0.00     -.529    4.0509    642.03   
       24.800     0.800      -.20     -.198    4.0511    642.05   
       26.200     2.200    -10.54     -.285    4.0512    642.07   
       26.900     2.900    -14.60     -.743    4.0511    642.05   
       28.300     4.300    -23.37     -.526    4.0504    641.94   
       29.000     5.000    -28.03     -.861    4.0497    641.84   
       29.700     5.700    -32.87   -10.162    4.0488    641.69   
       31.100     7.100    -42.96   -10.664    4.0455    641.17   
       31.800     7.800    -48.18   -10.866    4.0423    640.67   
       33.200     9.200    -58.91   -11.184    4.0366    639.76   
       33.900     9.900    -64.39   -11.302    4.0347    639.46   
       35.300    11.300    -75.52   -11.464    4.0380    639.98   
       36.000    12.000    -81.13   -11.504    4.0416    640.55   
       36.700    12.700    -86.77   -11.515    4.0455    641.17   
       38.100    14.100    -98.05   -11.442    4.0515    642.11   
       38.800    14.800   -103.65   -11.358    4.0520    642.19   
       40.200    16.200   -114.73   -11.108    4.0517    642.14   
       40.900    16.900   -120.17   -10.943    4.0511    642.06   
       42.300    18.300   -130.80   -10.538    4.0509    642.03   
       43.000    19.000   -135.97   -10.297    4.0509    642.03   
       43.700    19.700   -141.01   -10.029    4.0509    642.03   
       45.100    21.100   -150.70     -.411    4.0509    642.03   
       45.800    21.800   -155.31     -.060    4.0509    642.03   
       47.200    23.200   -164.00     -.273    4.0509    642.03   
       47.900    23.900   -168.05     -.836    4.0509    642.03   
1PAGE 20   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
        TIME    ATIME.7    QSUM.7     QI.7      HO.7      HI.7    
        E+00      E+00      E+00      E+00      E+00      E-03                                                     
 
        1.000     1.000      0.00     -.885    5.6033    642.06   
        1.700     1.700      0.00     -.604    5.6034    642.07   
        3.100     3.100      0.00     -.440    5.6032    642.05   
        3.800     3.800      0.00     -.469    5.6028    642.00   
        5.200     5.200      0.00     -.653    5.6011    641.80   
        5.900     5.900      0.00     -.790    5.5997    641.64   
        7.300     7.300      0.00     -.113    5.5944    641.03   
        8.000     8.000      0.00     -.283    5.5900    640.52   
        8.700     8.700      0.00     -.449    5.5858    640.05   
       10.100    10.100      0.00     -.758    5.5801    639.40   
       10.800    10.800      0.00     -.896    5.5822    639.63   
       12.200    12.200      0.00     -.115    5.5917    640.72   
       12.900    12.900      0.00     -.189    5.5971    641.34   
       14.300    14.300      0.00     -.252    5.6041    642.15   
       15.000    15.000      0.00     -.240    5.6046    642.20   
       15.700    15.700      0.00     -.201    5.6045    642.19   
       17.100    17.100      0.00     -.042    5.6031    642.03   
       17.800    17.800      0.00     -.923    5.6031    642.03   
       19.200    19.200      0.00     -.602    5.6031    642.03   
       19.900    19.900      0.00     -.398    5.6031    642.03   
       21.300    21.300      0.00     -.901    5.6031    642.03   
       22.000    22.000      0.00     -.607    5.6031    642.03   
       22.700    22.700      0.00     -.282    5.6031    642.03   
       24.100     0.100      0.00     -.693    5.6031    642.03   
       24.800     0.800      -.28     -.363    5.6033    642.05   
       26.200     2.200    -10.78     -.451    5.6034    642.07   
       26.900     2.900    -14.92     -.908    5.6033    642.05   
       28.300     4.300    -23.85     -.692    5.6024    641.94   
       29.000     5.000    -28.60   -10.027    5.6014    641.84   
       29.700     5.700    -33.51   -10.327    5.6001    641.69   
       31.100     7.100    -43.76   -10.829    5.5956    641.17   
       31.800     7.800    -49.07   -11.031    5.5912    640.67   
       33.200     9.200    -59.97   -11.348    5.5833    639.76   
       33.900     9.900    -65.53   -11.465    5.5806    639.46   
       35.300    11.300    -76.81   -11.625    5.5852    639.98   
       36.000    12.000    -82.50   -11.665    5.5902    640.55   
       36.700    12.700    -88.22   -11.674    5.5956    641.17   
       38.100    14.100    -99.65   -11.599    5.6038    642.11   
       38.800    14.800   -105.33   -11.514    5.6045    642.19   
       40.200    16.200   -116.56   -11.261    5.6041    642.14   
       40.900    16.900   -122.08   -11.096    5.6034    642.06   
       42.300    18.300   -132.86   -10.691    5.6031    642.03   
       43.000    19.000   -138.10   -10.449    5.6031    642.03   
       43.700    19.700   -143.22   -10.181    5.6031    642.03   
       45.100    21.100   -153.05     -.562    5.6031    642.03   
       45.800    21.800   -157.74     -.211    5.6031    642.03   
       47.200    23.200   -166.58     -.423    5.6031    642.03   
       47.900    23.900   -170.71     -.986    5.6031    642.03   
1PAGE 21   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
        TIME     QSUM.1    QSUM.2    QSUM.3    QSUM.4    QSUM.5    QSUM.6    QSUM.7    QSUM.8   
                                                                                                                   
        1.000    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
        1.700    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
        3.100    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
        3.800    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
        5.200    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
        5.900    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
        7.300    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
        8.000    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
        8.700    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       10.100    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       10.800    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       12.200    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       12.900    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       14.300    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       15.000    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       15.700    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       17.100    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       17.800    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       19.200    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       19.900    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       21.300    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       22.000    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       22.700    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       24.100    0.0000    0.0000    0.0000     0.000      0.00      0.00      0.00      0.00   
       24.800   -0.5586   -0.4487   -0.4800     0.914      -.00      -.20      -.28      -.08   
       26.200   -1.3662   -1.0443   -1.1358     2.252      -.94    -10.54    -10.78    -10.22   
       26.900   -1.6283   -1.2035   -1.3242     2.733    -13.80    -14.60    -14.92    -14.18   
       28.300   -1.9143   -1.3005   -1.4732     3.393    -22.17    -23.37    -23.85    -22.76   
       29.000   -1.9601   -1.2628   -1.4578     3.588    -26.64    -28.03    -28.60    -27.32   
       29.700   -1.9559   -1.1830   -1.3979     3.700    -31.27    -32.87    -33.51    -32.03   
       31.100   -1.8356   -0.9365   -1.1835     3.698    -40.96    -42.96    -43.76    -41.84   
       31.800   -1.7354   -0.7848   -1.0444     3.595    -45.98    -48.18    -49.07    -46.90   
       33.200   -1.4806   -0.4461   -0.7255     3.228    -56.31    -58.91    -59.97    -57.24   
       33.900   -1.3298   -0.2625   -0.5492     2.986    -61.59    -64.39    -65.53    -62.49   
       35.300   -0.9620    0.1499   -0.1445     2.466    -72.31    -75.52    -76.81    -73.10   
       36.000   -0.7372    0.3816    0.0882     2.221    -77.73    -81.13    -82.50    -78.43   
       36.700   -0.4839    0.6308    0.3419     2.003    -83.16    -86.77    -88.22    -83.77   
       38.100    0.1052    1.1853    0.9124     1.696    -94.04    -98.05    -99.65    -94.40   
       38.800    0.4387    1.4920    1.2294     1.629    -99.46   -103.65   -105.33    -99.66   
       40.200    1.1798    2.1700    1.9298     1.724   -110.15   -114.73   -116.56   -110.04   
       40.900    1.5870    2.5448    2.3155     1.911   -115.40   -120.17   -122.08   -115.12   
       42.300    2.4777    3.3772    3.1665     2.629   -125.65   -130.80   -132.86   -125.04   
       43.000    2.9636    3.8401    3.6365     3.187   -130.62   -135.97   -138.10   -129.85   
       43.700    3.4806    4.3397    4.1411     3.899   -135.47   -141.01   -143.22   -134.56   
       45.100    4.6428    5.4780    5.2867     5.871   -144.78   -150.70   -153.05   -143.63   
       45.800    5.3008    6.1240    5.9367     7.171   -149.20   -155.31   -157.74   -147.96   
       47.200    6.7846    7.5763    7.4000    10.481   -157.52   -164.00   -166.58   -156.21   
       47.900    7.6095    8.3812    8.2117    12.517   -161.38   -168.05   -170.71   -160.10   
1PAGE 22   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
        TIME     QSUN.1    QSUN.2    QSUN.3    QSUN.4    QSUN.5    QSUN.6    QSUN.7    QSUN.8   
                                                                                                                   
        1.000      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
        1.700      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
        3.100      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
        3.800      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
        5.200     14.50     14.50     14.50     14.50    0.0000    0.0000    0.0000    0.0000   
        5.900     22.54     22.54     22.54     22.54    0.0000    0.0000    0.0000    0.0000   
        7.300    126.58    126.58    126.58    126.58    0.0000    0.0000    0.0000    0.0000   
        8.000      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
        8.700      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       10.100      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       10.800      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       12.200      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       12.900      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       14.300      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       15.000      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       15.700      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       17.100     77.59     77.59     77.59     77.59    0.0000    0.0000    0.0000    0.0000   
       17.800     17.90     17.90     17.90     17.90    0.0000    0.0000    0.0000    0.0000   
       19.200      5.81      5.81      5.81      5.81    0.0000    0.0000    0.0000    0.0000   
       19.900      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       21.300      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       22.000      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       22.700      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       24.100      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       24.800      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       26.200      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       26.900      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       28.300      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       29.000     10.52     10.52     10.52     10.52    0.0000    0.0000    0.0000    0.0000   
       29.700     21.18     21.18     21.18     21.18    0.0000    0.0000    0.0000    0.0000   
       31.100    111.98    111.98    111.98    111.98    0.0000    0.0000    0.0000    0.0000   
       31.800     31.21     31.21     31.21     31.21    0.0000    0.0000    0.0000    0.0000   
       33.200      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       33.900      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       35.300      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       36.000      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       36.700      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       38.100      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       38.800      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       40.200     31.21     31.21     31.21     31.21    0.0000    0.0000    0.0000    0.0000   
       40.900    111.98    111.98    111.98    111.98    0.0000    0.0000    0.0000    0.0000   
       42.300     21.18     21.18     21.18     21.18    0.0000    0.0000    0.0000    0.0000   
       43.000     10.52     10.52     10.52     10.52    0.0000    0.0000    0.0000    0.0000   
       43.700      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       45.100      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       45.800      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       47.200      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
       47.900      0.00      0.00      0.00      0.00    0.0000    0.0000    0.0000    0.0000   
1PAGE 23   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
        TIME    QSOLAR.1  QSOLAR.2  QSOLAR.3  QSOLAR.4  QSOLAR.5  QSOLAR.6  QSOLAR.7  QSOLAR.8  
                                                                                                                   
        1.000   -186.00   -186.00   -186.00   -186.00   -269.66   -269.66   -269.66   -269.66   
        1.700   -155.04   -155.04   -155.04   -155.04   -266.85   -266.85   -266.85   -266.85   
        3.100    -83.65    -83.65    -83.65    -83.65   -228.90   -228.90   -228.90   -228.90   
        3.800    -44.80    -44.80    -44.80    -44.80   -195.31   -195.31   -195.31   -195.31   
        5.200     34.99     34.99     34.99     34.99   -105.74   -105.74   -105.74   -105.74   
        5.900     74.17     74.17     74.17     74.17    -53.45    -53.45    -53.45    -53.45   
        7.300    146.82    146.82    146.82    146.82     55.48     55.48     55.48     55.48   
        8.000    178.69    178.69    178.69    178.69    107.65    107.65    107.65    107.65   
        8.700    206.64    206.64    206.64    206.64    155.38    155.38    155.38    155.38   
       10.100    248.41    248.41    248.41    248.41    229.99    229.99    229.99    229.99   
       10.800    261.32    261.32    261.32    261.32    253.80    253.80    253.80    253.80   
       12.200    269.76    269.76    269.76    269.76    269.55    269.55    269.55    269.55   
       12.900    265.11    265.11    265.11    265.11    260.84    260.84    260.84    260.84   
       14.300    238.57    238.57    238.57    238.57    212.07    212.07    212.07    212.07   
       15.000    217.26    217.26    217.26    217.26    173.99    173.99    173.99    173.99   
       15.700    191.19    191.19    191.19    191.19    128.77    128.77    128.77    128.77   
       17.100    127.11    127.11    127.11    127.11     24.51     24.51     24.51     24.51   
       17.800     90.51     90.51     90.51     90.51    -30.24    -30.24    -30.24    -30.24   
       19.200     12.20     12.20     12.20     12.20   -133.80   -133.80   -133.80   -133.80   
       19.900    -27.79    -27.79    -27.79    -27.79   -178.36   -178.36   -178.36   -178.36   
       21.300   -105.08   -105.08   -105.08   -105.08   -243.94   -243.94   -243.94   -243.94   
       22.000   -140.68   -140.68   -140.68   -140.68   -262.27   -262.27   -262.27   -262.27   
       22.700   -173.20   -173.20   -173.20   -173.20   -269.82   -269.82   -269.82   -269.82   
       24.100   -219.73   -219.73   -219.73   -219.73   -257.01   -257.01   -257.01   -257.01   
       24.800   -194.13   -194.13   -194.13   -194.13   -268.42   -268.42   -268.42   -268.42   
       26.200   -130.80   -130.80   -130.80   -130.80   -258.11   -258.11   -258.11   -258.11   
       26.900    -94.45    -94.45    -94.45    -94.45   -236.82   -236.82   -236.82   -236.82   
       28.300    -16.39    -16.39    -16.39    -16.39   -166.30   -166.30   -166.30   -166.30   
       29.000     23.62     23.62     23.62     23.62   -119.97   -119.97   -119.97   -119.97   
       29.700     63.10     63.10     63.10     63.10    -68.71    -68.71    -68.71    -68.71   
       31.100    137.09    137.09    137.09    137.09     40.06     40.06     40.06     40.06   
       31.800    169.96    169.96    169.96    169.96     93.10     93.10     93.10     93.10   
       33.200    223.86    223.86    223.86    223.86    185.68    185.68    185.68    185.68   
       33.900    243.71    243.71    243.71    243.71    221.40    221.40    221.40    221.40   
       35.300    267.04    267.04    267.04    267.04    264.45    264.45    264.45    264.45   
       36.000    270.00    270.00    270.00    270.00    270.00    270.00    270.00    270.00   
       36.700    267.04    267.04    267.04    267.04    264.45    264.45    264.45    264.45   
       38.100    243.71    243.71    243.71    243.71    221.40    221.40    221.40    221.40   
       38.800    223.86    223.86    223.86    223.86    185.68    185.68    185.68    185.68   
       40.200    169.96    169.96    169.96    169.96     93.10     93.10     93.10     93.10   
       40.900    137.09    137.09    137.09    137.09     40.06     40.06     40.06     40.06   
       42.300     63.10     63.10     63.10     63.10    -68.71    -68.71    -68.71    -68.71   
       43.000     23.62     23.62     23.62     23.62   -119.97   -119.97   -119.97   -119.97   
       43.700    -16.39    -16.39    -16.39    -16.39   -166.30   -166.30   -166.30   -166.30   
       45.100    -94.45    -94.45    -94.45    -94.45   -236.82   -236.82   -236.82   -236.82   
       45.800   -130.80   -130.80   -130.80   -130.80   -258.11   -258.11   -258.11   -258.11   
       47.200   -194.13   -194.13   -194.13   -194.13   -268.42   -268.42   -268.42   -268.42   
       47.900   -219.73   -219.73   -219.73   -219.73   -257.01   -257.01   -257.01   -257.01   
1PAGE 24   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
      1=QSUN.1    2=QSUN.2    3=QSUN.3    4=QSUN.4    5=QSUN.5    6=QSUN.6    7=QSUN.7    8=QSUN.8    
 
    87654321  0                     32.5                  65                    97.5                  130        
           1  1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
       T      1                     .                     .                     .                     .  12345678        
       I      5         1           .                     .                     .                     .  1234,5678       
       M      5              1      .                     .                     .                     .  1234,5678       
       E      5                     .                     .                     .                   1 .  1234,5678       
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
        10.8  1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              5                     .                     .        1            .                     .  1234,5678       
              5           1         .                     .                     .                     .  1234,5678       
              5   1                 .                     .                     .                     .  1234,5678       
              1                     .                     .                     .                     .  12345678        
        21.3  1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              5      1              .                     .                     .                     .  1234,5678       
              5             1       .                     .                     .                     .  1234,5678       
        31.1  5 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 1 . . . . . .  1234,5678       
              5                    1.                     .                     .                     .  1234,5678       
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              5                    1.                     .                     .                     .  1234,5678       
        40.9  5 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 1 . . . . . .  1234,5678       
              5             1       .                     .                     .                     .  1234,5678       
              5      1              .                     .                     .                     .  1234,5678       
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
              1                     .                     .                     .                     .  12345678        
        47.9  1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  12345678        
1PAGE 25   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
      1=QSOLAR.1  2=QSOLAR.2  3=QSOLAR.3  4=QSOLAR.4  5=QSOLAR.5  6=QSOLAR.6  7=QSOLAR.7  8=QSOLAR.8  
 
    87654321  -220                  -97.5                 25                    147.5                 270        
           1  . . . 1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  1234            
              .           1         .                     .                     .                     .  1234            
              .                     . 1                   .                     .                     .  1234            
       T      .   5                 .        1            .                     .                     .  1234,5678       
       I      .                    5.                     . 1                   .                     .  1234,5678       
       M      .                     .       5             .        1            .                     .  1234,5678       
       E      .                     .                     .    5                1                     .  1234,5678       
              .                     .                     .              5      .     1               .  1234,5678       
              .                     .                     .                     .5         1          .  1234,5678       
              .                     .                     .                     .              5  1   .  1234,5678       
        10.8  . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .51 .  1234,5678       
              .                     .                     .                     .                     1  12345678        
              .                     .                     .                     .                   51.  1234,5678       
              .                     .                     .                     .           5   1     .  1234,5678       
              .                     .                     .                     .    5       1        .  1234,5678       
              .                     .                     .                  5  .       1             .  1234,5678       
              .                     .                     5                 1   .                     .  1234,5678       
              .                     .           5         .           1         .                     .  1234,5678       
              .              5      .                   1 .                     .                     .  1234,5678       
              .      5              .            1        .                     .                     .  1234,5678       
        21.3  . . . . . . . . . . .1. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  1234            
              .             1       .                     .                     .                     .  1234            
              .       1             .                     .                     .                     .  1234            
              1                     .                     .                     .                     .  1234            
              .    1                .                     .                     .                     .  1234            
              .               1     .                     .                     .                     .  1234            
              .                     .1                    .                     .                     .  1234            
              .         5           .              1      .                     .                     .  1234,5678       
              .                 5   .                     1                     .                     .  1234,5678       
              .                     .    5                .      1              .                     .  1234,5678       
        31.1  . . . . . . . . . . . . . . . . . . . . . . . .5. . . . . . . . 1 . . . . . . . . . . . .  1234,5678       
              .                     .                     .           5         .   1                 .  1234,5678       
              .                     .                     .                     .      5      1       .  1234,5678       
              .                     .                     .                     .            5   1    .  1234,5678       
              .                     .                     .                     .                    1.  12345678        
              .                     .                     .                     .                     1  12345678        
              .                     .                     .                     .                    1.  12345678        
              .                     .                     .                     .            5   1    .  1234,5678       
              .                     .                     .                     .      5      1       .  1234,5678       
              .                     .                     .           5         .   1                 .  1234,5678       
        40.9  . . . . . . . . . . . . . . . . . . . . . . . .5. . . . . . . . 1 . . . . . . . . . . . .  1234,5678       
              .                     .    5                .      1              .                     .  1234,5678       
              .                 5   .                     1                     .                     .  1234,5678       
              .         5           .              1      .                     .                     .  1234,5678       
              .                     .1                    .                     .                     .  1234            
              .               1     .                     .                     .                     .  1234            
              .    1                .                     .                     .                     .  1234            
        47.9  1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  1234            
1PAGE 26   HEATS: HEAT ENERGY ANALYSIS THROUGH SIMULATION                                                    (C) 1978 UND
 
      1=QSUM.1    2=QSUM.2    3=QSUM.3    4=QSUM.4    5=QSUM.5    6=QSUM.6    7=QSUM.7    8=QSUM.8    
 
    87654321  -2                    .425                  2.85                  5.275                 7.7        
           1  . . . . . . . . . 1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
       T      .                 1   .                     .                     .                     .  12345678        
       I      .                 1   .                     .                     .                     .  12345678        
       M      .                 1   .                     .                     .                     .  12345678        
       E      .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
        10.8  . . . . . . . . . 1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
        21.3  . . . . . . . . . 1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .                 1   .                     .                     .                     .  12345678        
              .            12       .   4                 .                     .                     .  23              
              .     1 32            .                4    .                     .                     .                  
              .  1  32              .                    4.                     .                     .                  
              .1   32               .                     .    4                .                     .                  
              1    3 2              .                     .      4              .                     .                  
              1    3 2              .                     .       4             .                     .                  
        31.1  .1. . .3. 2 . . . . . . . . . . . . . . . . . . . . 4 . . . . . . . . . . . . . . . . . .                  
              . 1      3 2          .                     .      4              .                     .                  
              .    1      3 2       .                     .  4                  .                     .                  
              .     1      3  2     .                     .4                    .                     .                  
              .        1       3  2 .                  4  .                     .                     .                  
              .          1       3  2               4     .                     .                     .                  
              .             1      3. 2           4       .                     .                     .                  
              .                  1  .   3  2    4         .                     .                     .                  
              .                     1      3  24          .                     .                     .                  
              .                     .      1    4 3 2     .                     .                     .                  
        40.9  . . . . . . . . . . . . . . . . .1.4. .3.2. . . . . . . . . . . . . . . . . . . . . . . .                  
              .                     .                  14 .  3 2                .                     .                  
              .                     .                     .1 4   3 2            .                     .                  
              .                     .                     .     1   4 3 2       .                     .                  
              .                     .                     .               1     3 2  4                .                  
              .                     .                     .                     1     3 2        4    .                  
              .                     .                     .                     .             1    3 2.                  
        47.9  . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .1.