--- trunk/Sources/phylmd/clvent.f 2015/04/29 15:47:56 134 +++ trunk/Sources/phylmd/clvent.f 2016/06/08 12:23:41 202 @@ -15,8 +15,7 @@ USE suphec_m, ONLY: rd, rg INTEGER knon - REAL, intent(in):: dtime - ! dtime----input-R- intervalle du temps (en second) + REAL, intent(in):: dtime ! intervalle de temps (en s) REAL u1lay(klon), v1lay(klon) ! u1lay----input-R- vent u de la premiere couche (m/s)