Increase the maximum diagnostics to allow exhaustive diagnostic check…

…ing.
NOAA-GFDL · May 1, 2015 · 620e355 · 620e355
1 parent 41812db
commit 620e355
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/SIS_diag_mediator.F90 b/SIS_diag_mediator.F90
@@ -108,7 +108,7 @@ module SIS_diag_mediator
   real, dimension(:,:,:), pointer :: mask3dCuC => null()
   real, dimension(:,:,:), pointer :: mask3dCvC => null()
 
-#define MAX_NUM_DIAGNOSTICS 400
+#define MAX_NUM_DIAGNOSTICS 1000
   type(maskContainer), dimension(MAX_NUM_DIAGNOSTICS) :: maskList
 
   !default missing value to be sent to ALL diagnostics registerations