/[MITgcm]/MITgcm/pkg/ctrl/ctrl_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/ctrl/ctrl_readparms.F

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

revision 1.7 by heimbach, Thu Nov 11 06:28:33 2004 UTC revision 1.8 by heimbach, Tue Nov 16 05:42:12 2004 UTC
# Line 117  c--   Read the namelist input. Line 117  c--   Read the namelist input.
117        _BEGIN_MASTER( myThid )        _BEGIN_MASTER( myThid )
118    
119  c--     Set default values.  c--     Set default values.
120            doInitXX            = .TRUE.
121    #ifdef ALLOW_ADMTLM
122            doAdmTlm            = .TRUE.
123    #else
124            doAdmTlm            = .FALSE.
125    #endif
126    
127          xx_theta_file      = ' '          xx_theta_file      = ' '
128          xx_salt_file       = ' '          xx_salt_file       = ' '
129          xx_hfluxstartdate1 =   0          xx_hfluxstartdate1 =   0
# Line 177  c--     Set default values. Line 184  c--     Set default values.
184          xx_efluxp_file      = ' '          xx_efluxp_file      = ' '
185          xx_bottomdrag_file  = ' '          xx_bottomdrag_file  = ' '
186    
         doInitXX            = .TRUE.  
   
187  #ifdef ALLOW_TANGENTLINEAR_RUN  #ifdef ALLOW_TANGENTLINEAR_RUN
188          yadprefix           = 'g_'          yadprefix           = 'g_'
189          yadmark             = 'g_'          yadmark             = 'g_'
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22