Updates to correctly compile and run mksurfdata_map

E3SM-Project · Feb 14, 2024 · b42acf3 · b42acf3
1 parent 72e347d
commit b42acf3
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/components/elm/tools/mksurfdata_map/src/Srcfiles b/components/elm/tools/mksurfdata_map/src/Srcfiles
@@ -1,4 +1,5 @@
 mkdomainMod.F90
+mkFertMod.F90
 mkgridmapMod.F90
 mkindexmapMod.F90
 mkfileMod.F90

diff --git a/components/elm/tools/mksurfdata_map/src/mkvarctl.F90 b/components/elm/tools/mksurfdata_map/src/mkvarctl.F90
@@ -52,7 +52,7 @@ module mkvarctl
   character(len=256), public :: mksrf_fslp10     = ' '  ! slope percentile file name
   character(len=256), public :: mksrf_fero       = ' '  ! ELM-Erosion parameters data file name
   character(len=256), public :: mksrf_ffert      = ' '  ! crop fertilizer data file name
-  integer           , public :: numpft         = 50   ! number of plant types
+  integer           , public :: numpft         = 16   ! number of plant types
 
   character(len=256), public :: map_fpft        = ' ' ! Mapping file for PFT
   character(len=256), public :: map_flakwat     = ' ' ! Mapping file for lake water