--- trunk/libf/dyn3d/caldyn0.f	2008/02/27 13:16:39	3
+++ trunk/libf/dyn3d/caldyn0.f	2008/02/28 18:05:06	4
@@ -1,10 +1,9 @@
-!
-! $Header: /home/cvsroot/LMDZ4/libf/dyn3d/caldyn0.F,v 1.1.1.1 2004/05/19 12:53:07 lmdzadmin Exp $
-!
       SUBROUTINE caldyn0
      $ (itau,ucov,vcov,teta,ps,masse,pk,phis ,
      $  phi,w,pbaru,pbarv,time )
 
+!     From dyn3d/caldyn0.F,v 1.1.1.1 2004/05/19 12:53:07
+
       use dimens_m
       use paramet_m
       use comconst