/[lmdze]/trunk/libf/phylmd/initphysto.f
ViewVC logotype

Diff of /trunk/libf/phylmd/initphysto.f

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

revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC revision 12 by guez, Mon Jul 21 16:05:07 2008 UTC
# Line 53  C   Declarations Line 53  C   Declarations
53  C   Arguments  C   Arguments
54        character*(*) infile        character*(*) infile
55        integer*4 nhoriid, i        integer*4 nhoriid, i
56        real tstep, t_ops, t_wrt        real, intent(in):: tstep
57          real t_ops, t_wrt
58        integer fileid, filevid        integer fileid, filevid
59        integer nq,l        integer nq,l
60        real nivsigs(llm)        real nivsigs(llm)
Legend:
Removed from v.3  
changed lines
  Added in v.12
  ViewVC Help
Powered by ViewVC 1.1.21