--- trunk/libf/dyn3d/bilan_dyn.f	2010/03/30 10:44:42	29
+++ trunk/libf/dyn3d/bilan_dyn.f	2010/04/01 09:07:28	30
@@ -9,8 +9,9 @@
 c   en faisant Qzon=Cv T + L * ...
 c             vQ..A=Cp T + L * ...
 
-      USE IOIPSL
-
+      USE histcom
+      use calendar
+      use histwrite_m
       use dimens_m
       use paramet_m
       use comconst