Update SPP namelist entry

NOAA-PSL · Feb 16, 2022 · 450508d · 450508d
1 parent 079820e
commit 450508d
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/compns_stochy.F90 b/compns_stochy.F90
@@ -163,11 +163,11 @@ subroutine compns_stochy (me,sz_nml,input_nml_file,fn_nml,nlunit,deltim,iret)
 #endif
 
 #ifdef INTERNAL_FILE_NML
-      read(input_nml_file, nml=nam_spperts, iostat=ios)
+      read(input_nml_file, nml=nam_sppperts, iostat=ios)
 #else
       rewind (nlunit)
       open (unit=nlunit, file=fn_nml, action='READ', status='OLD', iostat=ios)
-      read(nlunit,nam_spperts)
+      read(nlunit,nam_sppperts)
 #endif
 
       if (me == 0) then