--- trunk/libf/bibio/inithist.f90	2010/03/25 14:29:07	27
+++ trunk/libf/bibio/inithist.f90	2010/04/01 09:07:28	30
@@ -33,7 +33,8 @@
 
     !   L. Fairhead, LMD, 03/99
 
-    USE IOIPSL
+    USE calendar
+    use histcom
     use dimens_m
     use paramet_m
     use comconst