Skip to content

Commit

Permalink
Minor clean up.
Browse files Browse the repository at this point in the history
Fixes #368
  • Loading branch information
GeorgeGayno-NOAA committed Apr 15, 2021
1 parent 2848243 commit ea153d9
Showing 1 changed file with 2 additions and 4 deletions.
6 changes: 2 additions & 4 deletions sorc/global_cycle.fd/sfcsub.F
Original file line number Diff line number Diff line change
Expand Up @@ -3707,12 +3707,10 @@ subroutine la2ga(regin,imxin,jmxin,rinlon,rinlat,rlon,rlat,inttyp,
endif
enddo
!
if (num_threads == 1) then
write(6,*) ' FATAL ERROR: no filling value'
write(6,*) ' found in la2ga.'
write(6,*) ' FATAL ERROR: no filling value'
write(6,*) ' found in la2ga.'
! write(6,*) ' i ix jx slmask(i) rslmsk ',
! & i,ix,jx,slmask(i),rslmsk(ix,jx)
endif
call abort
!
71 continue
Expand Down

0 comments on commit ea153d9

Please sign in to comment.