--- trunk/libf/phylmd/ini_histrac.f90	2010/06/02 11:01:12	34
+++ trunk/libf/phylmd/ini_histrac.f90	2012/09/20 13:00:41	66
@@ -4,20 +4,24 @@
 
 contains
 
+
   subroutine ini_histrac(nid_tra, pdtphys, nq_phys, lessivage)
 
     ! From phylmd/ini_histrac.h, version 1.10 2006/02/21 08:08:30
 
     use dimens_m, only: iim, jjm, llm
     USE calendar, only: ymds2ju
-    use histcom, only: histbeg_totreg, histvert, histend, histdef
+    USE histbeg_totreg_m, ONLY : histbeg_totreg
+    USE histdef_m, ONLY : histdef
+    USE histend_m, ONLY : histend
+    USE histvert_m, ONLY : histvert
     use temps, only: annee_ref, day_ref, itau_phy
     use iniadvtrac_m, only: niadv, tnom, ttext
     use dimphy, only: klon
     use clesphys, only: ecrit_tra
     use grid_change, only: gr_phy_write_2d
     use phyetat0_m, only: rlon, rlat
-    use comvert, only: presnivs
+    use disvert_m, only: presnivs
 
     INTEGER, intent(out):: nid_tra
     real, intent(in):: pdtphys  ! pas d'integration pour la physique (s)