/[MITgcm]/MITgcm/verification/hs94.1x64x5/adcode/adcommon.h
ViewVC logotype

Diff of /MITgcm/verification/hs94.1x64x5/adcode/adcommon.h

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

revision 1.1 by heimbach, Thu Nov 8 20:47:17 2001 UTC revision 1.2 by heimbach, Tue Nov 20 23:27:29 2001 UTC
# Line 1  Line 1 
1  C--   copied stuff from _ad.f file  C--   copied stuff from _ad.f file
2    
3        common /addynvars_r/        common /addynvars_r/
4       &                     adetan, adetanm1,       &                     adetan, adetah,
5       &                     aduvel, advvel, adwvel,       &                     aduvel, advvel, adwvel,
6       &                     adtheta, adsalt,       &                     adtheta, adsalt,
7       &                     adgu, adgv, adgt, adgs,       &                     adgu, adgv, adgt, adgs,
8       &                     adgunm1, adgvnm1, adgtnm1, adgsnm1       &                     adgunm1, adgvnm1, adgtnm1, adgsnm1
9        _RL adetan(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        _RL adetan(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
10        _RL adetanm1(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        _RL adetah(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
11        _RL adgs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RL adgs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
12        _RL adgsnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RL adgsnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
13        _RL adgt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RL adgt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
# Line 22  C--   copied stuff from _ad.f file Line 22  C--   copied stuff from _ad.f file
22        _RL advvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RL advvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
23        _RL adwvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RL adwvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
24    
       common /addynvars_cd/  
      &                      aduveld, advveld,  
      &                      adunm1, advnm1,  
      &                      adgucd, adgvcd  
       _RL aduveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)  
       _RL advveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)  
       _RL adunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)  
       _RL advnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)  
       _RL adgucd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)  
       _RL adgvcd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)  
   
25        common /adffields/        common /adffields/
26       &                   adfu, adfv, adqnet, adempmr, adsst, adsss       &                   adfu, adfv, adqnet, adempmr, adsst, adsss
27        _RL adfu(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        _RL adfu(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
# Line 42  C--   copied stuff from _ad.f file Line 31  C--   copied stuff from _ad.f file
31        _RL adsst(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        _RL adsst(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
32        _RL adsss(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        _RL adsss(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
33    
34  #ifdef ALLOW_TR10_CONTROL  #ifdef ALLOW_PASSIVE_TRACER
35        common /adtr1_r/        common /adtr1_r/
36       &                 adtr1, adgtr1, adgtr1nm1       &                 adtr1, adgtr1, adgtr1nm1
37        _RL adgtr1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RL adgtr1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22