Back to home page

MITgcm

 
 

    


File indexing completed on 2018-03-02 18:43:03 UTC

view on githubraw file Latest commit add29e06 on 2018-01-31 20:35:05 UTC
d31276c95b Jean*0001 CBOP
9b39915e34 Jean*0002 C     !ROUTINE: PTRACERS_START.h
d31276c95b Jean*0003 C     !INTERFACE:
9b39915e34 Jean*0004 C     include "PTRACERS_START.h"
d31276c95b Jean*0005 C
                0006 C     !DESCRIPTION:
                0007 C     \bv
                0008 C     *==========================================================*
9b39915e34 Jean*0009 C     | PTRACERS_START.h
d31276c95b Jean*0010 C     | o Holds passive-tracer internal parameters related
9b39915e34 Jean*0011 C     |   to start and restart process
d31276c95b Jean*0012 C     *==========================================================*
                0013 C     | Passive-tracer internal parameters/variables related to
9b39915e34 Jean*0014 C     | a) which tracer is stepped forward
                0015 C     | b) writing or reading pickup for a restart.
d31276c95b Jean*0016 C     | Note:
                0017 C     |  external parameters (read from parameter file "data.ptracers")
                0018 C     |  stay in PTRACERS_PARAMS.h and should not appear here ;
                0019 C     |  therefore, this header file should not be included
                0020 C     |  in S/R PTRACERS_READPARMS.
                0021 C     *==========================================================*
                0022 C     \ev
                0023 CEOP
                0024 
9b39915e34 Jean*0025 C--   COMMON / PTRACERS_START_I / Integer valued parameters used for (re)start
d31276c95b Jean*0026 C     PTRACERS_StartAB  :: number of gPtr previous time levels that are
                0027 C                      available to start (or restart) Adams-Bashforth
9b39915e34 Jean*0028       COMMON / PTRACERS_START_I /
d31276c95b Jean*0029      &  PTRACERS_StartAB
                0030       INTEGER PTRACERS_StartAB(PTRACERS_num)
                0031 
9b39915e34 Jean*0032 C--   COMMON / PTRACERS_START_L / Logical valued parameters used for (re)start
                0033 C     PTRACERS_StepFwd  :: switch on/off this tracer time-stepping
                0034       COMMON / PTRACERS_START_L /
                0035      &  PTRACERS_StepFwd
                0036       LOGICAL PTRACERS_StepFwd(PTRACERS_num)
                0037