C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/bulk_force/BULKF_INT.h,v 1.2 2003/11/23 01:36:55 jmc Exp $ C $Name: $ #ifdef ALLOW_BULK_FORCE c !ROUTINE: BULKF_INT.h C Intermediate variables for bulk forcing COMMON /BULKF_FFIELDS_INTERMEDIATE/ & evap, savssq, fsh, flh, fswnet, flwup, flwupnet, & ustress, vstress _RL evap(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy) _RL savssq(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy) _RL fsh(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy) _RL flh(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy) _RL fswnet(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy) _RL flwup(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy) _RL flwupnet(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy) _RL ustress(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy) _RL vstress(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy) #endif /* ALLOW_BULK_FORCE */