/[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.7 by heimbach, Thu Nov 20 02:28:38 2003 UTC revision 1.14 by heimbach, Fri Feb 13 21:52:16 2009 UTC
# Line 1  Line 1 
1    C $Header$
2    C $Name$
3    
4  #include "PACKAGES_CONFIG.h"  #include "PACKAGES_CONFIG.h"
5    
 #ifdef ALLOW_PTRACERS  
 # include "PTRACERS_OPTIONS.h"  
 #endif  
   
6  c     ================================================================  c     ================================================================
7  c     HEADER TAMC  c     HEADER TAMC
8  c     ================================================================  c     ================================================================
# Line 62  c     nthreads_chkpt - Number of threads Line 60  c     nthreads_chkpt - Number of threads
60  #ifdef ALLOW_TAMC_CHECKPOINTING  #ifdef ALLOW_TAMC_CHECKPOINTING
61    
62        integer    nchklev_1        integer    nchklev_1
63        parameter( nchklev_1      =    5 )        parameter( nchklev_1      =     3 )
64        integer    nchklev_2        integer    nchklev_2
65        parameter( nchklev_2      =    2 )        parameter( nchklev_2      =   120 )
 c      parameter( nchklev_2      =  150 )  
66        integer    nchklev_3        integer    nchklev_3
67        parameter( nchklev_3      =    3 )        parameter( nchklev_3      =    60 )
 c      parameter( nchklev_3      =  150 )  
68    
69  c--   Note always check for the correct sizes of the common blocks!  c--   Note always check for the correct sizes of the common blocks!
70    
# Line 105  c     and writing data. Line 101  c     and writing data.
101        integer iloop_daily        integer iloop_daily
102    
103        INTEGER    isbyte        INTEGER    isbyte
104    #ifdef ALLOW_TAMC_SINGLEPREC_COMLEV
105          PARAMETER( isbyte      = 4 )
106    #else
107        PARAMETER( isbyte      = 8 )        PARAMETER( isbyte      = 8 )
108    #endif
109    
110        INTEGER    maximpl        INTEGER    maximpl
111        PARAMETER( maximpl     = 6 )        PARAMETER( maximpl     = 6 )
       INTEGER    maxpass  
112  #ifdef ALLOW_PTRACERS  #ifdef ALLOW_PTRACERS
113        PARAMETER( maxpass     = NUMBER_OF_PTRACERS + 2 )  cph moved this to PTRACERS_SIZE.h
114    cph      INTEGER    maxpass
115    cph      PARAMETER( maxpass     = PTRACERS_num + 2 )
116  #else  #else
117  # ifdef ALLOW_PASSIVE_TRACER        INTEGER    maxpass
       PARAMETER( maxpass     = 3 )  
 # else  
118        PARAMETER( maxpass     = 2 )        PARAMETER( maxpass     = 2 )
 # endif  
119  #endif  #endif
120        INTEGER    maxcube        INTEGER    maxcube
121        PARAMETER( maxcube     = 1 )        PARAMETER( maxcube     = 1 )
# Line 124  c     and writing data. Line 123  c     and writing data.
123        INTEGER act0, act1, act2, act3, act4        INTEGER act0, act1, act2, act3, act4
124        INTEGER max0, max1, max2, max3        INTEGER max0, max1, max2, max3
125        INTEGER iikey, kkey, passkey, igadkey,        INTEGER iikey, kkey, passkey, igadkey,
126       &        itdkey, idynkey, igmkey, ikppkey, iptrkey       &        itdkey, idynkey, igmkey, iptrkey
127    
128  c     ================================================================  c     ================================================================
129  c     END OF HEADER TAMC  c     END OF HEADER TAMC

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.14

  ViewVC Help
Powered by ViewVC 1.1.22