Skip to content

Commit

Permalink
Updates for missing-data flag handling in timeseries and profile map …
Browse files Browse the repository at this point in the history
…plots
  • Loading branch information
AnsleyManke committed Sep 28, 2020
1 parent 797277f commit 7c1a7e4
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions fer/plt/dsg_traj_alongxy_setup.F
Original file line number Diff line number Diff line change
Expand Up @@ -536,6 +536,7 @@ SUBROUTINE DSG_TRAJ_ALONGXY_SETUP ( dset,
* load color-by data into dep_dat

grid = cx_grid( cx )
bad = mr_bad_data(mv)

* set up a color-by variable

Expand Down Expand Up @@ -621,7 +622,6 @@ SUBROUTINE DSG_TRAJ_ALONGXY_SETUP ( dset,
IF (status .NE. ferr_ok) GOTO 5000

set_lev = .FALSE. ! will auto-set levels
bad = mr_bad_data(mv)

* ... Now get the data values to use in the color-by-variable plot along
* the trajectories.
Expand Down Expand Up @@ -688,7 +688,7 @@ SUBROUTINE DSG_TRAJ_ALONGXY_SETUP ( dset,

imask = imask + 1
IF (irow_start.EQ.0 .OR. irow_end.EQ.0) THEN
dep_dat(imask) = bad_val4
dep_dat(imask) = bad
ELSE

psum = 0.
Expand All @@ -702,7 +702,7 @@ SUBROUTINE DSG_TRAJ_ALONGXY_SETUP ( dset,

ENDDO

dep_dat(imask) = bad_val4
dep_dat(imask) = bad
IF (psum .GT. 0.) dep_dat(imask) = psum / pcnt
ENDIF

Expand Down Expand Up @@ -737,7 +737,7 @@ SUBROUTINE DSG_TRAJ_ALONGXY_SETUP ( dset,
* ... clean up temporary variable
CALL DELETE_VARIABLE( mvh_temp )
ELSE IF (.NOT.set_lev) THEN
rbad = bad_val4
rbad = bad
CALL COMPUTE_MNSTD (dep_dat, mr_bad_data(mv), need_std, nmasked, rbad, status)

IF (need_std .AND. status.NE.ferr_ok) THEN
Expand Down

0 comments on commit 7c1a7e4

Please sign in to comment.