/[MITgcm]/MITgcm/pkg/autodiff/AUTODIFF.h
ViewVC logotype

Diff of /MITgcm/pkg/autodiff/AUTODIFF.h

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

revision 1.2 by heimbach, Wed Jun 27 22:14:28 2007 UTC revision 1.11 by gforget, Fri Jan 21 01:19:03 2011 UTC
# Line 1  Line 1 
1    C $Header$
2    C $Name$
3    
4    #ifdef ALLOW_AUTODIFF_WHTAPEIO
5          COMMON /AUTODIFF_WHTAPEIO_I/
6         &  tapeFileCounter, tapeMaxCounter, tapeFileUnit, tapeFileUnitS
7          integer tapeFileCounter, tapeMaxCounter
8          integer tapeFileUnit, tapeFileUnitS(4)
9          COMMON /AUTODIFF_WHTAPEIO_L/
10         &  tapeConcatIO, tapeSingleCpuIO, tapeBufferIO
11          logical tapeConcatIO, tapeSingleCpuIO, tapeBufferIO
12    #endif
13    
14        integer ilev_1        integer ilev_1
15        integer ilev_2        integer ilev_2
# Line 7  Line 19 
19        integer max_lev3        integer max_lev3
20        integer max_lev4        integer max_lev4
21        integer NDV3D, NDV2D, NEXF1, NEXF2, NCTRL1, NOB, NSI        integer NDV3D, NDV2D, NEXF1, NEXF2, NCTRL1, NOB, NSI
22    #ifdef ALLOW_ADAMSBASHFORTH_3
23          PARAMETER (NDV3D  = 16)
24    #else
25        PARAMETER (NDV3D  = 12)        PARAMETER (NDV3D  = 12)
26    #endif
27        PARAMETER (NDV2D  = 23)        PARAMETER (NDV2D  = 23)
28        PARAMETER (NEXF1  = 21)        PARAMETER (NEXF1  = 21)
29        PARAMETER (NEXF2  = 18)        PARAMETER (NEXF2  = 20)
30        PARAMETER (NCTRL1 = 18)        PARAMETER (NCTRL1 = 20)
31        PARAMETER (NOB = 18)        PARAMETER (NOB = 18)
32        PARAMETER (NSI = 24)              PARAMETER (NSI = 19)
33        _RL StoreDynVars3D        _RL StoreDynVars3D
34       &    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,NDV3D)       &    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy,NDV3D)
35        _RL StoreDynVars2D        _RL StoreDynVars2D
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.11
  ViewVC Help
Powered by ViewVC 1.1.22