Add helpful message if levgrnd differs on restart file

Suggest using init_interp, as is suggested if levsno differs Fixes #283
ESCOMP · Aug 3, 2018 · efdf0e7 · efdf0e7
1 parent 576702d
commit efdf0e7
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/src/main/restFileMod.F90 b/src/main/restFileMod.F90
@@ -714,10 +714,10 @@ subroutine restFile_dimcheck( ncid )
        call check_dim(ncid, namep, nump, msg=msg)
        if ( use_fates ) call check_dim(ncid, nameCohort  , numCohort, msg=msg)
     end if
-    call check_dim(ncid, 'levsno'  , nlevsno, &
-         msg = 'You can deal with this mismatch by rerunning with ' // &
-               'use_init_interp = .true. in user_nl_clm')
-    call check_dim(ncid, 'levgrnd' , nlevgrnd)
+    msg = 'You can deal with this mismatch by rerunning with ' // &
+         'use_init_interp = .true. in user_nl_clm'
+    call check_dim(ncid, 'levsno'  , nlevsno, msg=msg)
+    call check_dim(ncid, 'levgrnd' , nlevgrnd, msg=msg)
     call check_dim(ncid, 'levurb'  , nlevurb)
     call check_dim(ncid, 'levlak'  , nlevlak)