Changeset 8157
- Timestamp:
- 2017-06-08T18:16:29+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_obs_oper_update/NEMOGCM/NEMO/OPA_SRC/OBS/diaobs.F90
r7992 r8157 827 827 zsurfmask(:,:) = 0 828 828 CALL ctl_warn( ' HadOCC fCO2 values masked out for observation operator', & 829 & ' on timestep ' // TRIM(STR(kstp)), &830 829 & ' as HADOCC_FCO2(:,:) == HADOCC_FILL_FLT' ) 831 830 ENDIF … … 837 836 zsurfmask(:,:) = 0 838 837 CALL ctl_warn( ' MEDUSA fCO2 values masked out for observation operator', & 839 & ' on timestep ' // TRIM(STR(kstp)), &840 838 & ' as MEDUSA_FCO2(:,:) == MEDUSA_FILL_FLT' ) 841 839 ENDIF … … 875 873 zsurfmask(:,:) = 0 876 874 CALL ctl_warn( ' HadOCC pCO2 values masked out for observation operator', & 877 & ' on timestep ' // TRIM(STR(kstp)), &878 875 & ' as HADOCC_PCO2(:,:) == HADOCC_FILL_FLT' ) 879 876 ENDIF … … 885 882 zsurfmask(:,:) = 0 886 883 CALL ctl_warn( ' MEDUSA pCO2 values masked out for observation operator', & 887 & ' on timestep ' // TRIM(STR(kstp)), &888 884 & ' as MEDUSA_PCO2(:,:) == MEDUSA_FILL_FLT' ) 889 885 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.