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

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

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

revision 1.104 by heimbach, Thu Oct 14 05:22:21 2004 UTC revision 1.105 by heimbach, Thu Nov 11 02:24:20 2004 UTC
# Line 282  CADJ STORE uvel               = comlev1, Line 282  CADJ STORE uvel               = comlev1,
282  CADJ STORE vvel               = comlev1, key = ikey_dynamics  CADJ STORE vvel               = comlev1, key = ikey_dynamics
283  # endif  # endif
284  # ifdef EXACT_CONSERV  # ifdef EXACT_CONSERV
285    CADJ STORE empmr              = comlev1, key = ikey_dynamics
286  CADJ STORE pmepr              = comlev1, key = ikey_dynamics  CADJ STORE pmepr              = comlev1, key = ikey_dynamics
287  # endif  # endif
288  #endif /* ALLOW_AUTODIFF_TAMC */  #endif /* ALLOW_AUTODIFF_TAMC */
# Line 304  CADJ STORE surfaceForcingS    = comlev1, Line 305  CADJ STORE surfaceForcingS    = comlev1,
305  CADJ STORE surfaceForcingT    = comlev1, key = ikey_dynamics  CADJ STORE surfaceForcingT    = comlev1, key = ikey_dynamics
306  CADJ STORE surfaceForcingTice = comlev1, key = ikey_dynamics  CADJ STORE surfaceForcingTice = comlev1, key = ikey_dynamics
307  ctest(  ctest(
308  # ifdef EXACT_CONSERV  CADJ STORE IVDConvCount       = comlev1, key = ikey_dynamics
 CADJ STORE pmepr              = comlev1, key = ikey_dynamics  
 # endif  
309  ctest)  ctest)
310    # ifdef ALLOW_PTRACERS
311    CADJ STORE surfaceForcingPtr  = comlev1, key = ikey_dynamics
312    # endif
313  c  c
314  # ifdef ALLOW_GMREDI  # ifdef ALLOW_GMREDI
315  CADJ STORE Kwx                = comlev1, key = ikey_dynamics  CADJ STORE Kwx                = comlev1, key = ikey_dynamics
# Line 322  c Line 324  c
324  # ifdef ALLOW_KPP  # ifdef ALLOW_KPP
325  CADJ STORE KPPghat            = comlev1, key = ikey_dynamics  CADJ STORE KPPghat            = comlev1, key = ikey_dynamics
326  CADJ STORE KPPfrac            = comlev1, key = ikey_dynamics  CADJ STORE KPPfrac            = comlev1, key = ikey_dynamics
327  ctest(  CADJ STORE KPPdiffKzS         = comlev1, key = ikey_dynamics
328  CADJ STORE KPPdiffKzS    = comlev1, key = ikey_dynamics  CADJ STORE KPPdiffKzT         = comlev1, key = ikey_dynamics
 CADJ STORE KPPdiffKzT    = comlev1, key = ikey_dynamics  
 ctest)  
329  # endif  # endif
330  #endif /* ALLOW_AUTODIFF_TAMC */  #endif /* ALLOW_AUTODIFF_TAMC */
331    
Legend:
Removed from v.1.104  
changed lines
  Added in v.1.105
  ViewVC Help
Powered by ViewVC 1.1.22