Changeset 12489 for NEMO/trunk/src/TOP/CFC/trcsms_cfc.F90
- Timestamp:
- 2020-02-28T16:55:11+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/TOP/CFC/trcsms_cfc.F90
r12377 r12489 166 166 167 167 ! cumulation of surface flux at each time step 168 qint_cfc(ji,jj,jl) = qint_cfc(ji,jj,jl) + qtr_cfc(ji,jj,jl) * r dt168 qint_cfc(ji,jj,jl) = qint_cfc(ji,jj,jl) + qtr_cfc(ji,jj,jl) * rn_Dt 169 169 ! !----------------! 170 170 END_2D
Note: See TracChangeset
for help on using the changeset viewer.