/[MITgcm]/MITgcm/pkg/generic_advdiff/GAD.h
ViewVC logotype

Diff of /MITgcm/pkg/generic_advdiff/GAD.h

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

revision 1.8 by adcroft, Fri Sep 28 02:26:57 2001 UTC revision 1.8.6.1 by heimbach, Fri Mar 7 03:55:23 2003 UTC
# Line 49  C oneSixth :: Third/fourth order interpo Line 49  C oneSixth :: Third/fourth order interpo
49        PARAMETER(oneSixth=1.D0/6.D0)        PARAMETER(oneSixth=1.D0/6.D0)
50    
51  C Differentiate between tracers (only needed for KPP -  arrgh!!!)  C Differentiate between tracers (only needed for KPP -  arrgh!!!)
52    cph                              and for GMRedi arrgh*arrgh!!!)
53    cph  indices are used for TAF key computations, so need to
54    cph  running from 1, 2, ...
55    c
56  C GAD_TEMPERATURE :: temperature  C GAD_TEMPERATURE :: temperature
57        INTEGER GAD_TEMPERATURE        INTEGER GAD_TEMPERATURE
58        PARAMETER(GAD_TEMPERATURE=101)        PARAMETER(GAD_TEMPERATURE=1)
59  C GAD_TEMPERATURE :: salinity  C GAD_SALINITY :: salinity
60        INTEGER GAD_SALINITY        INTEGER GAD_SALINITY
61        PARAMETER(GAD_SALINITY=102)        PARAMETER(GAD_SALINITY=2)
62  C GAD_TR1 :: pssive tracer 1  C GAD_TR1 :: pssive tracer 1
63        INTEGER GAD_TR1        INTEGER GAD_TR1
64        PARAMETER(GAD_TR1=103)        PARAMETER(GAD_TR1=3)
65  CEOP  CEOP
66    
67    C--   COMMON /GAD_PARM_L/ Logical parameters for GAD pkg routines
68    C     tempMultiDimAdvec :: set to T if using multi-dimension advection for Temp
69    C     saltMultiDimAdvec :: set to T if using multi-dimension advection for Salt
70    C     tempAdamsBashforth :: set to T if using Adams-Bashforth stepping for Temp
71    C     saltAdamsBashforth :: set to T if using Adams-Bashforth stepping for Salt
72          LOGICAL tempMultiDimAdvec
73          LOGICAL saltMultiDimAdvec
74          LOGICAL tr1_MultiDimAdvec
75          LOGICAL tempAdamsBashforth
76          LOGICAL saltAdamsBashforth
77          LOGICAL tr1_AdamsBashforth
78          COMMON /GAD_PARM_L/
79         & tempMultiDimAdvec , saltMultiDimAdvec , tr1_MultiDimAdvec,
80         & tempAdamsBashforth, saltAdamsBashforth, tr1_AdamsBashforth
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.8.6.1
  ViewVC Help
Powered by ViewVC 1.1.22