/[MITgcm]/MITgcm/model/src/do_oceanic_phys.F
ViewVC logotype

Diff of /MITgcm/model/src/do_oceanic_phys.F

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

revision 1.77 by heimbach, Fri Feb 13 21:56:48 2009 UTC revision 1.78 by heimbach, Sun May 24 18:00:39 2009 UTC
# Line 176  CADJ &     kind = isbyte Line 176  CADJ &     kind = isbyte
176  CADJ STORE recip_hfacc         = comlev1, key = ikey_dynamics,  CADJ STORE recip_hfacc         = comlev1, key = ikey_dynamics,
177  CADJ &     kind = isbyte  CADJ &     kind = isbyte
178  #  endif  #  endif
179    #  ifdef ANNUAL_BALANCE
180    CADJ STORE balance_itcount     = comlev1, key = ikey_dynamics,
181    CADJ &     kind = isbyte
182    #  endif /* ANNUAL_BALANCE */
183  # endif  # endif
184  # ifdef ALLOW_DEBUG  # ifdef ALLOW_DEBUG
185          IF ( debugLevel .GE. debLevB )          IF ( debugLevel .GE. debLevB )
Legend:
Removed from v.1.77  
changed lines
  Added in v.1.78
  ViewVC Help
Powered by ViewVC 1.1.22