--- trunk/Sources/phylmd/physiq.f 2015/07/21 15:29:52 159 +++ trunk/Sources/phylmd/physiq.f 2015/09/14 17:13:16 169 @@ -62,6 +62,7 @@ use yoegwd, only: sugwd USE suphec_m, ONLY: ra, rcpd, retv, rg, rlvtt, romega, rsigma, rtt USE temps, ONLY: itau_phy + use transp_m, only: transp use unit_nml_m, only: unit_nml USE ymds2ju_m, ONLY: ymds2ju USE yoethf_m, ONLY: r2es, rvtmp2 @@ -289,7 +290,6 @@ ! Declaration des procedures appelees EXTERNAL nuage ! calculer les proprietes radiatives - EXTERNAL transp ! transport total de l'eau et de l'energie ! Variables locales