Changeset 8646
- Timestamp:
- 2017-10-20T11:35:37+02:00 (7 years ago)
- Location:
- branches/UKMO/dev_r5518_obs_oper_update_medusa/NEMOGCM/NEMO/OPA_SRC/OBS
- Files:
-
- 2 edited
-
diaobs.F90 (modified) (1 diff)
-
obs_oper.F90 (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_obs_oper_update_medusa/NEMOGCM/NEMO/OPA_SRC/OBS/diaobs.F90
r8455 r8646 797 797 zsurfvar(:,:) = HADOCC_CHL(:,:,1) ! (not log) chlorophyll from HadOCC 798 798 #elif defined key_medusa && defined key_foam_medusa 799 ! Add non-diatom and diatom surface chlorophyll from MEDUSA 799 800 zsurfvar(:,:) = trn(:,:,1,jpchn) + trn(:,:,1,jpchd) 800 801 #elif defined key_fabm -
branches/UKMO/dev_r5518_obs_oper_update_medusa/NEMOGCM/NEMO/OPA_SRC/OBS/obs_oper.F90
r8466 r8646 984 984 985 985 IF ( zext(1) == obfillflt ) THEN 986 ! If the observation value is a fill value, set QC flag to bad 986 987 surfdataqc%nqc(jobs) = 4 987 988 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.
