C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/verification_other/global_oce_llc90/code/CTRL_SIZE.h,v 1.1 2014/09/13 19:53:12 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 = 1 ) integer maxCtrlTim2D parameter ( maxCtrlTim2D = 1 ) #endif CEH3 ;;; Local Variables: *** CEH3 ;;; mode:fortran *** CEH3 ;;; End: ***