diff --git a/components/elm/src/main/elmfates_interfaceMod.F90 b/components/elm/src/main/elmfates_interfaceMod.F90 index 1b9d6c1ba490..520197de5765 100644 --- a/components/elm/src/main/elmfates_interfaceMod.F90 +++ b/components/elm/src/main/elmfates_interfaceMod.F90 @@ -360,6 +360,7 @@ subroutine ELMFatesGlobals1() call SetFatesGlobalElements1(use_fates,natpft_size,0,var_reader) natpft_size = fates_maxPatchesPerSite + !numpft = natpft_size - 1 # GML Todo: This was in landuse v2, not v1 max_patch_per_col= max(natpft_size, numcft, maxpatch_urb) return