SUBROUTINE OUT_SI ( )
Description
out_si.f 
 
 
   THIS ROUTINE OUTPUTS THE VARIABLES needed for S/I calculations
Source file:out_si.f
I/O Operations:
Unit ID  Unit No       Access  Form   Operation
   LU18                   SEQ  FMTD           W  

Operation codes A=rewind,B=backspace,C=close,E=endfile
                I=inquire,O=open,R=read,W=write
Local Variables (+ indicates altered content)
INTEGER           +I,         +LU18
Referenced Common Block Variables (+ indicates altered content)
DUDL_NOIS          REAL               DL_NOIS(13)
DUDL_NOIS          REAL               DU_NOIS(13)
SNCOM              REAL               SNXX(13)
SON                REAL               DBLOSL(13)
SON                REAL               DBLOSU(13)
SON                REAL               DBW(13),   RNEFF(13)
SON                REAL               XNYNOIS(13)
TIME               INTEGER            IT