/[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.9 by jmc, Sat Jun 15 03:31:17 2002 UTC revision 1.10 by heimbach, Tue Nov 12 20:42:24 2002 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_SALINITY :: 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  C--   COMMON /GAD_PARM_L/ Logical parameters for GAD pkg routines
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10
  ViewVC Help
Powered by ViewVC 1.1.22