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

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

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

revision 1.1 by stephd, Wed Jun 25 21:00:36 2003 UTC revision 1.2 by stephd, Mon Oct 6 20:11:10 2003 UTC
# Line 33  C     == Routine arguments == Line 33  C     == Routine arguments ==
33        INTEGER iMin,iMax,jMin,jMax, bi, bj        INTEGER iMin,iMax,jMin,jMax, bi, bj
34    
35  #ifdef ALLOW_PTRACERS  #ifdef ALLOW_PTRACERS
 #ifdef DIC_ABIOTIC  
36    
37    
38  C     == Local variables ==  C     == Local variables ==
# Line 121  C update surface tendencies Line 120  C update surface tendencies
120            ENDDO            ENDDO
121           ENDDO           ENDDO
122  #endif  #endif
 #endif  
123    
124    
125          RETURN          RETURN
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22