Limits the definition of cohort dim in ELM nc files

The `cohort` dimension ELM restart file is only defined when FATES is turned on. Fixes #5694 [non-BFB]
E3SM-Project · May 18, 2023 · b58a8e9 · b58a8e9
1 parent 8f8bcfa
commit b58a8e9
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/components/elm/src/main/restFileMod.F90 b/components/elm/src/main/restFileMod.F90
@@ -944,7 +944,9 @@ subroutine restFile_dimset( ncid )
     call ncd_defdim(ncid , namel      , numl           ,  dimid)
     call ncd_defdim(ncid , namec      , numc           ,  dimid)
     call ncd_defdim(ncid , namep      , nump           ,  dimid)
-    call ncd_defdim(ncid , nameCohort , numCohort      ,  dimid)
+    if ( use_fates ) then
+       call ncd_defdim(ncid , nameCohort , numCohort      ,  dimid)
+    endif
 
     call ncd_defdim(ncid , 'levgrnd' , nlevgrnd       ,  dimid)
     call ncd_defdim(ncid , 'levurb'  , nlevurb        ,  dimid)