C $Header: /u/gcmpack/MITgcm/pkg/frazil/FRAZIL.h,v 1.2 2012/03/03 16:04:38 dimitri Exp $
C $Name: $
#ifdef ALLOW_FRAZIL
C FrazilForcingT : frazil temperature forcing, > 0 increases theta [W/m^2]
_RL FrazilForcingT(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
COMMON /FRAZIL_FORCING/ FrazilForcingT
#endif /* ALLOW_FRAZIL */
CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***