C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/verification_other/global_oce_llc90/code/CTRL_SIZE.h,v 1.2 2014/09/19 20:43:43 gforget Exp $ C $Name: $ c ================================================================== c CTRL_SIZE.h c ================================================================== #if (defined (ALLOW_GENARR2D_CONTROL) || defined (ALLOW_GENARR3D_CONTROL) || defined (ALLOW_GENTIM2D_CONTROL)) C Generic control variable array dimension C ---------------------------------------- C C maxCtrlArr2D :: number of 2-d generic init. ctrl variables C maxCtrlArr3D :: number of 3-d generic init. ctrl variables C maxCtrlTim2D :: number of 2-d generic tim-varying ctrl variables integer maxCtrlArr2D parameter ( maxCtrlArr2D = 1 ) integer maxCtrlArr3D parameter ( maxCtrlArr3D = 5 ) integer maxCtrlTim2D parameter ( maxCtrlTim2D = 7 ) #endif CEH3 ;;; Local Variables: *** CEH3 ;;; mode:fortran *** CEH3 ;;; End: ***