Skip to content

Commit

Permalink
Remove commented-out goto statements to satisfy NOAA
Browse files Browse the repository at this point in the history
  • Loading branch information
josephzhang8 committed Sep 6, 2023
1 parent b7e9d84 commit 104054a
Show file tree
Hide file tree
Showing 2 changed files with 1 addition and 2 deletions.
2 changes: 0 additions & 2 deletions src/Hydro/sflux_9c.F90
Original file line number Diff line number Diff line change
Expand Up @@ -894,7 +894,6 @@ subroutine turb_fluxes (num_nodes, &
#endif

! bottom of main iteration loop
! if (.not. converged .and. iter .lt. max_iter) goto 100
if (converged.or.iter>= max_iter) exit
enddo

Expand Down Expand Up @@ -2598,7 +2597,6 @@ subroutine get_weight (x_in, y_in, x_out, y_out, &
last_elem = i_elem

! loop again if need to
! if ( (.not. completed_check) .and. (.not. zero_ae) ) goto 100
if(completed_check.or.zero_ae) exit
enddo !infinite do

Expand Down
1 change: 1 addition & 0 deletions src/Readme.beta_notes
Original file line number Diff line number Diff line change
Expand Up @@ -588,6 +588,7 @@ git versions:
145. `a6fd5cb` (May 15, 2023): revamped nws=4 to allow more variables for 3D. The input needed is 'atmos.nc'.
146. `a832e4fd` (Aug 15, 2023): renamed LAP routines and tridag to avoid conflicts with other ESMs.
147. `d31ea846` (Aug 30, 2023): fixed similar bugs on too many open nc handle (as Kijin did for 1-way script)
148. `abf37240` (Aug 31, 2023): Ivica J. fixed a bug in FAIRALL option (bulk_psiu should be real*8)

================================================================================================
(D) Auto-test history:
Expand Down

0 comments on commit 104054a

Please sign in to comment.