--- trunk/libf/phylmd/clmain.f90	2010/03/05 16:43:45	25
+++ trunk/libf/phylmd/clmain.f90	2010/04/01 09:07:28	30
@@ -85,8 +85,9 @@
 
   !$$$ PB ajout pour soil
 
-  USE ioipsl, ONLY : histbeg_totreg, histdef, histend, histsync, &
-       histwrite, ymds2ju
+  USE histcom, ONLY : histbeg_totreg, histdef, histend, histsync
+  use histwrite_m, only: histwrite
+  use calendar, ONLY : ymds2ju
   USE dimens_m, ONLY : iim, jjm
   USE indicesol, ONLY : epsfra, is_lic, is_oce, is_sic, is_ter, nbsrf
   USE dimphy, ONLY : klev, klon, zmasq