Fix Uninitialized FLOGRR in W3IORS to Ensure Consistent Restart File Output#1478
Conversation
JessicaMeixner-NOAA
left a comment
There was a problem hiding this comment.
matrixCompFull.txt
matrixCompSummary.txt
matrixDiff.txt
********************* non-identical cases ****************************
mww3_test_03/./work_PR3_UQ_MPI_e (1 files differ)
mww3_test_03/./work_PR3_UQ_MPI_d2_c (16 files differ)
mww3_test_03/./work_PR1_MPI_d2 (18 files differ)
mww3_test_03/./work_PR2_UNO_MPI_d2 (17 files differ)
mww3_test_03/./work_PR2_UNO_MPI_e (1 files differ)
mww3_test_03/./work_PR3_UQ_MPI_d2 (16 files differ)
mww3_test_03/./work_PR3_UQ_MPI_e_c (1 files differ)
mww3_test_03/./work_PR1_MPI_e (1 files differ)
mww3_test_03/./work_PR2_UQ_MPI_e (1 files differ)
mww3_test_03/./work_PR2_UQ_MPI_d2 (16 files differ)
mww3_test_03/./work_PR3_UNO_MPI_d2_c (15 files differ)
mww3_test_03/./work_PR3_UNO_MPI_e (1 files differ)
mww3_test_03/./work_PR3_UNO_MPI_d2 (17 files differ)
mww3_test_03/./work_PR3_UNO_MPI_e_c (1 files differ)
mww3_test_09/./work_MPI_ASCII (0 files differ)
ww3_tp2.10/./work_MPI_OMPH (6 files differ)
ww3_tp2.6/./work_ST4_ASCII (0 files differ)
ww3_ufs1.3/./work_a (3 files differ)
Pull Request Summary
This PR fixes an uninitialized FLOGRR variable in the W3IORS subroutine of w3iorsmd.F90, which caused inconsistent values in restart binary files on Ursa (GNU).
Description
This PR fixes an uninitialized FLOGRR variable in the W3IORS subroutine of w3iorsmd.F90, which was causing inconsistent values in restart binary files on Ursa (GNU).
The issue was found during regression tests. Unexpected differences were observed in binary restart files. Using a debug text output, the difference was traced to the variable FLOGRR had uninitialized values. An initialization of the variable FLOGRR = .FALSE. has been added in subroutine W3NOUT in w3odatmd.F90 to fix the issue.
Issue(s) addressed
addressing issue #1471 and #1467
Commit Message
Fix uninitialized FLOGRR for consistent restart files
Check list
Testing
Regression tests and matrix comparisons on Ursa GNU:
matrixCompFull.txt
matrixCompSummary.txt
matrixDiff.txt
matrixCompFull.txt
matrixCompSummary.txt
matrixDiff.txt