/[MITgcm]/MITgcm/pkg/dic/dic_aver_init.F
ViewVC logotype

Diff of /MITgcm/pkg/dic/dic_aver_init.F

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

revision 1.2 by jmc, Tue Jul 13 18:03:31 2004 UTC revision 1.3 by jmc, Wed Apr 6 18:36:47 2005 UTC
# Line 40  C     == Routine arguments == Line 40  C     == Routine arguments ==
40  #ifdef ALLOW_DIC_COST  #ifdef ALLOW_DIC_COST
41    
42  C     == Local variables ==  C     == Local variables ==
       LOGICAL  DIFFERENT_MULTIPLE  
       EXTERNAL DIFFERENT_MULTIPLE  
43        INTEGER i, j, bi, bj, k, it        INTEGER i, j, bi, bj, k, it
44        _RL po4av(nR)        _RL po4av(nR)
45        _RL o2av(nR)        _RL o2av(nR)

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

  ViewVC Help
Powered by ViewVC 1.1.22