pkg/bulk_force/BULKF_INT.h

f4245d1665 Curt*0001 #ifdef ALLOW_BULK_FORCE
                0002 c     !ROUTINE: BULKF_INT.h
                0003
                0004 C     Intermediate variables for bulk forcing
                0005       COMMON /BULKF_FFIELDS_INTERMEDIATE/
                0006      &       evap, savssq, fsh, flh, fswnet, flwup, flwupnet,
                0007      &       ustress, vstress
                0008       _RL     evap(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy)
                0009       _RL     savssq(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy)
                0010       _RL     fsh(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy)
                0011       _RL     flh(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy)
                0012       _RL     fswnet(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy)
                0013       _RL     flwup(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy)
                0014       _RL     flwupnet(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy)
                0015       _RL     ustress(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy)
                0016       _RL     vstress(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy)
6a1d3c464b Jean*0017 #endif /* ALLOW_BULK_FORCE */