Skip to content

Improve restart history-option error messages (#3593) #4113

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Open
enu-emu wants to merge 1 commit into
base: master
Choose a base branch
from
+7 −4
Open

Improve restart history-option error messages (#3593) #4113

Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
11 changes: 7 additions & 4 deletions src/main/histFileMod.F90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -4881,7 +4881,8 @@ subroutine hist_restart_ncd (bounds, ncid, flag, rdate)
if (ntapes_onfile /= ntapes) then
write(iulog,*) 'ntapes = ', ntapes, ' ntapes_onfile = ', ntapes_onfile
call endrun(msg=' ERROR: number of ntapes differs from restart file. '// &
'You can NOT change history options on restart.', &
'You can NOT change history options on a continuation run. '// &
'To change history options, use a branch run instead.', &
additional_msg=errMsg(sourcefile, __LINE__))
end if

Expand All @@ -4908,7 +4909,8 @@ subroutine hist_restart_ncd (bounds, ncid, flag, rdate)
write(iulog,*) 'but non-empty in the other. (history_tape_in_use .false.'
write(iulog,*) 'means that history tape is empty.)'
call endrun(msg=' ERROR: history_tape_in_use differs from restart file. '// &
'You can NOT change history options on restart.', &
'You can NOT change history options on a continuation run. '// &
'To change history options, use a branch run instead.', &
additional_msg=errMsg(sourcefile, __LINE__))
end if
end do file_loop4
Expand Down Expand Up @@ -4967,8 +4969,9 @@ subroutine hist_restart_ncd (bounds, ncid, flag, rdate)
call ncd_io('nflds', nflds_onfile, 'read', ncid_hist(t,f) )
if ( nflds_onfile /= tape(t)%nflds(f) ) then
write(iulog,*) 'nflds = ', tape(t)%nflds(f), ' nflds_onfile = ', nflds_onfile
call endrun(msg=' ERROR: number of fields different than on restart file!,'// &
' you can NOT change history options on restart!' //&
call endrun(msg=' ERROR: number of fields differs from restart file. '// &
'You can NOT change history options on a continuation run. '// &
'To change history options, use a branch run instead. ' //&
errMsg(sourcefile, __LINE__))
end if
call ncd_io('ntimes', tape(t)%ntimes(f), 'read', ncid_hist(t,f) )
Expand Down