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

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

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

revision 1.11 by heimbach, Thu Nov 24 03:44:50 2005 UTC revision 1.12 by heimbach, Thu Nov 9 03:54:10 2006 UTC
# Line 54  C--   heimbach@mit.edu 11-Jan-2001 Line 54  C--   heimbach@mit.edu 11-Jan-2001
54        _RL g_vnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RL g_vnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
55  #endif  #endif
56    
57        common /g_ffields/        COMMON /g_ffields_fu/ g_fu
58       &                   g_fu, g_fv        COMMON /g_ffields_fv/ g_fv
59       &                 , g_qnet, g_empmr        COMMON /g_ffields_Qnet/ g_Qnet
60  cph     &                 , g_sst, g_sss        COMMON /g_ffields_Qsw/ g_Qsw
61        _RL g_fu(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        COMMON /g_ffields_dQdT/ g_dQdT
62        _RL g_fv(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        COMMON /g_ffields_EmPmR/ g_EmPmR
63        _RL g_qnet(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        COMMON /g_ffields_saltFlux/ g_saltFlux
64        _RL g_empmr(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        COMMON /g_ffields_SST/ g_SST
65  cph      _RL g_sst(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        COMMON /g_ffields_SSS/ g_SSS
66  cph      _RL g_sss(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        COMMON /g_ffields_lambdaThetaClimRelax/ g_lambdaThetaClimRelax
67          COMMON /g_ffields_lambdaSaltClimRelax/ g_lambdaSaltClimRelax
68    #ifdef ATMOSPHERIC_LOADING
69          COMMON /g_ffields_pload/ g_pload
70          COMMON /g_ffields_sIceLoad/ g_sIceLoad
71    #endif
72    
73          _RS  g_fu       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
74          _RS  g_fv       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
75          _RS  g_Qnet     (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
76          _RS  g_Qsw      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
77          _RS  g_dQdT     (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
78          _RS  g_EmPmR    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
79          _RS  g_saltFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
80          _RS  g_SST      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
81          _RS  g_SSS      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
82          _RS  g_lambdaThetaClimRelax
83         &    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
84          _RS  g_lambdaSaltClimRelax
85         &    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
86    #ifdef ATMOSPHERIC_LOADING
87          _RS  g_pload    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
88          _RS  g_sIceLoad (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
89    #endif
90    
91  #ifdef ALLOW_DIFFKR_CONTROL  #ifdef ALLOW_DIFFKR_CONTROL
92        COMMON /G_DYNVARS_DIFFKR/        COMMON /G_DYNVARS_DIFFKR/

Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12

  ViewVC Help
Powered by ViewVC 1.1.22