Changeset 14868
- Timestamp:
- 2021-05-14T20:03:04+02:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2021/dev_r14122_HPC-08_Mueller_OSMOSIS_streamlining/src/OCE/ZDF/zdfosm.F90
r14859 r14868 882 882 ! Lateral boundary conditions on final outputs for hbl, on T-grid (sign unchanged) 883 883 CALL lbc_lnk( 'zdfosm', hbl, 'T', 1.0_wp, & 884 & dh, 'T', 1.0_wp, &885 884 & hmle, 'T', 1.0_wp ) 886 ! Lateral boundary conditions on final outputs for gham[ts], on W-grid (sign unchanged)887 ! Lateral boundary conditions on final outputs for gham[uv], on [UV]-grid (sign changed)888 CALL lbc_lnk( 'zdfosm', ghamt, 'W', 1.0_wp, &889 & ghams, 'W', 1.0_wp, &890 & ghamu, 'U', -1.0_wp, &891 & ghamv, 'V', -1.0_wp )892 885 ! 893 886 IF ( ln_dia_osm ) THEN
Note: See TracChangeset
for help on using the changeset viewer.