Changeset 12609 for branches/UKMO/dev_r5518_obs_oper_update_sit/NEMOGCM/NEMO/OPA_SRC/OBS/obs_oper.F90
- Timestamp:
- 2020-03-26T11:53:23+01:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_obs_oper_update_sit/NEMOGCM/NEMO/OPA_SRC/OBS/obs_oper.F90
r12380 r12609 950 950 IF ( surfdataqc%lclim ) surfdataqc%rclm(jobs,1) = zclm(1) 951 951 952 #if defined key_cice 952 953 IF ( TRIM(surfdataqc%cvars(1)) == 'FBD' ) THEN 953 954 ! Convert radar freeboard to true freeboard (add 1/4 snow depth; 1/4 based on ratio of speed of light in vacuum compared to snow (3.0e8 vs 2.4e8 m/s)) … … 971 972 surfdataqc%nqc(jobs) = 4 972 973 ENDIF 974 #endif defined key_cice 973 975 974 976 END DO
Note: See TracChangeset
for help on using the changeset viewer.