Changeset 12495 for NEMO/branches/2020/dev_r12472_ASINTER-05_Masson_CurrentFeedback/src/OCE/DIU/diu_coolskin.F90
- Timestamp:
- 2020-03-02T09:10:34+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r12472_ASINTER-05_Masson_CurrentFeedback/src/OCE/DIU/diu_coolskin.F90
r12377 r12495 67 67 68 68 69 SUBROUTINE diurnal_sst_coolskin_step(psqflux, pstauflux, psrho, rdt)69 SUBROUTINE diurnal_sst_coolskin_step(psqflux, pstauflux, psrho, pDt) 70 70 !!---------------------------------------------------------------------- 71 71 !! *** ROUTINE diurnal_sst_takaya_step *** … … 81 81 REAL(wp), INTENT(IN), DIMENSION(jpi,jpj) :: pstauflux ! Wind stress (kg/ m s^2) 82 82 REAL(wp), INTENT(IN), DIMENSION(jpi,jpj) :: psrho ! Water density (kg/m^3) 83 REAL(wp), INTENT(IN) :: rdt ! Time-step83 REAL(wp), INTENT(IN) :: pDt ! Time-step 84 84 85 85 ! Local variables
Note: See TracChangeset
for help on using the changeset viewer.