Changeset 7841 for branches/UKMO/dev_rev5518_OBS_DoNotAssim/NEMOGCM/NEMO/OPA_SRC/OBS/obs_readmdt.F90
- Timestamp:
- 2017-03-29T12:14:30+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_rev5518_OBS_DoNotAssim/NEMOGCM/NEMO/OPA_SRC/OBS/obs_readmdt.F90
r3294 r7841 155 155 156 156 ! mark any masked data with a QC flag 157 IF( zobsmask(1) == 0 ) sladata(jslano)%nqc(jobs) = 11157 IF( zobsmask(1) == 0 ) sladata(jslano)%nqc(jobs) = IBSET(sladata(jslano)%nqc(jobs),15) 158 158 159 159 END DO
Note: See TracChangeset
for help on using the changeset viewer.