Changeset 5951 for branches/2014/dev_r4650_UKMO14.4_OBS_GENERAL_VINTERP/NEMOGCM/NEMO/OPA_SRC/SBC/sbcssr.F90
- Timestamp:
- 2015-11-30T12:48:01+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_r4650_UKMO14.4_OBS_GENERAL_VINTERP/NEMOGCM/NEMO/OPA_SRC/SBC/sbcssr.F90
r5950 r5951 107 107 IF( nn_sssr == 1 ) THEN !* Salinity damping term (salt flux only (sfx)) 108 108 zsrp = rn_deds / rday ! from [mm/day] to [kg/m2/s] 109 !CDIR COLLAPSE110 109 DO jj = 1, jpj 111 110 DO ji = 1, jpi … … 121 120 zsrp = rn_deds / rday ! from [mm/day] to [kg/m2/s] 122 121 zerp_bnd = rn_sssr_bnd / rday ! - - 123 !CDIR COLLAPSE124 122 DO jj = 1, jpj 125 123 DO ji = 1, jpi
Note: See TracChangeset
for help on using the changeset viewer.