pkg/bling/BLING_LOAD.h

c0d1c06c15 Matt*0001 C--   COMMON /BLING_LOAD/
                0002 C     BLING_ldRec     :: time-record currently loaded (in temp arrays *[1])
                0003
                0004       COMMON /BLING_LOAD_I/ BLING_ldRec
                0005       COMMON /BLING_LOAD_RS/
e0f9a7ba0b Matt*0006      &    dicwind0, dicwind1,
                0007      &    atmosp0, atmosp1,
                0008      &    silica0, silica1,
                0009      &    ice0, ice1,
c0d1c06c15 Matt*0010      &    feinput0, feinput1
                0011
                0012       INTEGER BLING_ldRec(nSx,nSy)
                0013       _RS dicwind0  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0014       _RS dicwind1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
e0f9a7ba0b Matt*0015       _RS atmosp0   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0016       _RS atmosp1   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0017       _RS silica0  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0018       _RS silica1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0019       _RS ice0      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0020       _RS ice1      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0021       _RS feinput0  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0022       _RS feinput1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
c0d1c06c15 Matt*0023
                0024 CEH3 ;;; Local Variables: ***
                0025 CEH3 ;;; mode:fortran ***
                0026 CEH3 ;;; End: ***