Skip to content
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

Restrict UPP computation from undefined points #306

Merged
merged 11 commits into from
May 3, 2021
Merged

Restrict UPP computation from undefined points #306

Changes from 1 commit
Commits
Show all changes
11 commits
Select commit Hold shift + click to select a range
6b6e297
20210414 Jesse Meng commit progress for Issue #240 restrict post comp…
JesseMeng-NOAA Apr 14, 2021
1915724
Merge remote-tracking branch 'upstream/develop' into feature/post_ref…
JesseMeng-NOAA Apr 14, 2021
1e91749
20210416 Jesse Meng commit progress for "restrict post computation fr…
Apr 16, 2021
e1038d8
Merge remote-tracking branch 'upstream/develop' into HEAD
Apr 16, 2021
2d7888e
20210422 Jesse Meng commit progress for #240 restrict post computatio…
Apr 23, 2021
54bf17b
20210422 Jesse Meng Merge remote-tracking branch 'upstream/develop' i…
Apr 23, 2021
bdf6558
20210423 Jesse Meng fix bug in CALVIS_GSD PR#306
Apr 23, 2021
e45b236
20210426 Jesse Meng Merge remote-tracking branch 'upstream/develop' i…
Apr 26, 2021
6ae0de9
20210427 Jesse Meng commit EMC_post issue #240 restrict post computat…
Apr 27, 2021
7dd1428
20210429 Jesse Meng fix instantaneous surface SW in CLDRAD.f
Apr 29, 2021
9d5a1ee
20210430 Jesse Meng Merge remote-tracking branch 'upstream/develop' i…
Apr 30, 2021
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
Prev Previous commit
Next Next commit
20210429 Jesse Meng fix instantaneous surface SW in CLDRAD.f
  • Loading branch information
wx22mj authored and wx22mj committed Apr 29, 2021
commit 7dd1428277892be70ecc26692cf0b73385c5427f
6 changes: 3 additions & 3 deletions sorc/ncep_post.fd/CLDRAD.f
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -3691,7 +3691,7 @@ SUBROUTINE CLDRAD
GRID1=SPVAL
DO J=JSTA,JEND
DO I=1,IM
IF(CZMEAN(I,J)<SPVAL.and.CZEN(I,J)<SPVAL) THEN
IF(RSWIN(I,J)<SPVAL) THEN
IF(CZMEAN(I,J)>1.E-6) THEN
FACTRS=CZEN(I,J)/CZMEAN(I,J)
ELSE
Expand Down Expand Up @@ -3745,7 +3745,7 @@ SUBROUTINE CLDRAD
!$omp parallel do private(i,j)
DO J=JSTA,JEND
DO I=1,IM
IF(CZMEAN(I,J)<SPVAL.and.CZEN(I,J)<SPVAL) THEN
IF(RSWOUT(I,J)<SPVAL) THEN
IF(CZMEAN(I,J)>1.E-6) THEN
FACTRS=CZEN(I,J)/CZMEAN(I,J)
ELSE
Expand Down Expand Up @@ -3842,7 +3842,7 @@ SUBROUTINE CLDRAD
!$omp parallel do private(i,j)
DO J=JSTA,JEND
DO I=1,IM
IF(CZMEAN(I,J)<SPVAL.and.CZEN(I,J)<SPVAL) THEN
IF(RSWINC(I,J)<SPVAL) THEN
IF(CZMEAN(I,J)>1.E-6) THEN
FACTRS=CZEN(I,J)/CZMEAN(I,J)
ELSE
Expand Down