/[lmdze]/trunk/libf/bibio/writedynav.f
ViewVC logotype

Diff of /trunk/libf/bibio/writedynav.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 29 by guez, Thu Aug 7 12:29:13 2008 UTC revision 30 by guez, Thu Apr 1 09:07:28 2010 UTC
# Line 4  Line 4 
4        subroutine writedynav( histid, nq, time, vcov,        subroutine writedynav( histid, nq, time, vcov,
5       ,                          ucov,teta,ppk,phi,q,masse,ps,phis)       ,                          ucov,teta,ppk,phi,q,masse,ps,phis)
6    
       USE ioipsl  
7  C  C
8  C   Ecriture du fichier histoire au format IOIPSL  C   Ecriture du fichier histoire au format IOIPSL
9  C  C
# Line 31  C Line 30  C
30  C =====================================================================  C =====================================================================
31  C  C
32  C   Declarations  C   Declarations
33          USE histwrite_m
34          use histcom
35        use dimens_m        use dimens_m
36        use paramet_m        use paramet_m
37        use comconst        use comconst
Legend:
Removed from v.29  
changed lines
  Added in v.30
  ViewVC Help
Powered by ViewVC 1.1.21