/[MITgcm]/MITgcm/verification/global_ocean.90x40x15/code_ad/tamc.h
ViewVC logotype

Diff of /MITgcm/verification/global_ocean.90x40x15/code_ad/tamc.h

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

revision 1.5 by heimbach, Fri Jan 10 17:21:26 2003 UTC revision 1.6 by heimbach, Fri Mar 21 23:18:27 2003 UTC
# Line 57  c     nthreads_chkpt - Number of threads Line 57  c     nthreads_chkpt - Number of threads
57  #ifdef ALLOW_TAMC_CHECKPOINTING  #ifdef ALLOW_TAMC_CHECKPOINTING
58    
59        integer    nchklev_1        integer    nchklev_1
60        parameter( nchklev_1      =   9 )        parameter( nchklev_1      =    5 )
61        integer    nchklev_2        integer    nchklev_2
62        parameter( nchklev_2      =  90 )        parameter( nchklev_2      =   90 )
63    c      parameter( nchklev_2      =  150 )
64        integer    nchklev_3        integer    nchklev_3
65        parameter( nchklev_3      =  90 )        parameter( nchklev_3      =    3 )
66    c      parameter( nchklev_3      =  150 )
67    
68  c--   Note always check for the correct sizes of the common blocks!  c--   Note always check for the correct sizes of the common blocks!
69    
# Line 102  c     and writing data. Line 104  c     and writing data.
104        INTEGER    maximpl        INTEGER    maximpl
105        PARAMETER( maximpl     = 6 )        PARAMETER( maximpl     = 6 )
106        INTEGER    maxpass        INTEGER    maxpass
107    #ifdef ALLOW_PASSIVE_TRACER
108        PARAMETER( maxpass     = 3 )        PARAMETER( maxpass     = 3 )
109    #else
110          PARAMETER( maxpass     = 2 )
111    #endif
112        INTEGER    maxcube        INTEGER    maxcube
113        PARAMETER( maxcube     = 1 )        PARAMETER( maxcube     = 1 )
114    
115        INTEGER act0, act1, act2, act3, act4        INTEGER act0, act1, act2, act3, act4
116        INTEGER max0, max1, max2, max3        INTEGER max0, max1, max2, max3
117        INTEGER iikey, kkey, passkey, igadkey,        INTEGER iikey, kkey, passkey, igadkey,
118       &        itdkey, idynkey, igmkey       &        itdkey, idynkey, igmkey, ikppkey
119    
120  c     ================================================================  c     ================================================================
121  c     END OF HEADER TAMC  c     END OF HEADER TAMC
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22