- Timestamp:
- 2020-03-01T21:49:40+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r12377_KERNEL-06_techene_e3/src/OCE/steplf.F90
r12482 r12492 126 126 CALL sbc ( kstp, Nbb, Nnn ) ! Sea Boundary Condition (including sea-ice) 127 127 128 ! !!st !!!!!!!!!!!!!!!!!!!!!!! 129 ! 130 ! emp = 0._wp 131 ! emp_b = 0._wp 132 ! qns = 0._wp 133 ! qsr = 0._wp 134 ! qns_b = 0._wp 135 ! 136 ! !!st 137 128 138 !>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 129 139 ! Update stochastic parameters and random T/S fluctuations
Note: See TracChangeset
for help on using the changeset viewer.