/[MITgcm]/MITgcm/pkg/cheapaml/CHEAPAML.h
ViewVC logotype

Diff of /MITgcm/pkg/cheapaml/CHEAPAML.h

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

revision 1.4 by jmc, Sun Feb 6 00:18:05 2011 UTC revision 1.5 by wienders, Thu Feb 24 16:11:41 2011 UTC
# Line 9  C   Parameters for cheap atmos mixed lay Line 9  C   Parameters for cheap atmos mixed lay
9  C -------------------------------  C -------------------------------
10  C     Tr :: Relaxation temperature profile for lateral boundary region  C     Tr :: Relaxation temperature profile for lateral boundary region
11  C     qr :: Relaxation specific humidity profile for lateral boundary region  C     qr :: Relaxation specific humidity profile for lateral boundary region
 C     rref ::  
12  C     Tair :: atmosphere boundary layer temperature  C     Tair :: atmosphere boundary layer temperature
13  C     gTairm :: atmosphere temperature tendency  C     gTairm :: atmosphere temperature tendency
14  C     qair :: atmosphere specific humidity  C     qair :: atmosphere specific humidity
15  C     gqairm :: atmosphere moisture tendency  C     gqairm :: atmosphere moisture tendency
 C     rair ::  
16  C     uwind :: zonal wind  C     uwind :: zonal wind
17  C     vwind :: meridional wind  C     vwind :: meridional wind
18  C     solar :: short wave insolation  C     solar :: short wave insolation
19  C     Cheapmask :: open boundary condition relaxation mask  C     Cheapmask :: open boundary condition relaxation mask
20    
21        COMMON /CHEAPAML_VARS/        COMMON /CHEAPAML_VARS/
22       &       Tr, qr, rref,       &       Tr, qr,
23       &       Tair, gTairm,       &       Tair, gTairm,
24       &       qair, gqairm, rair,       &       qair, gqairm,
25       &       uwind, vwind, solar,       &       uwind, vwind, solar,
26       &       ustress, vstress,       &       ustress, vstress,
27       &       wavesh, wavesp, Cheapmask       &       wavesh, wavesp, Cheapmask
28    
29        _RL    Tr     (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL    Tr     (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
30        _RL    qr     (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL    qr     (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
       _RL    rref   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  
31        _RL    Tair   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL    Tair   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
32        _RL    gTairm (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL    gTairm (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
33        _RL    qair   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL    qair   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
34        _RL    gqairm (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL    gqairm (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
       _RL    rair   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  
35        _RL    uwind  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL    uwind  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
36        _RL    vwind  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL    vwind  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
37        _RL    Solar  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL    Solar  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
# Line 48  C     Cheapmask :: open boundary conditi Line 44  C     Cheapmask :: open boundary conditi
44        COMMON /CHEAPAML_PARMS_R/        COMMON /CHEAPAML_PARMS_R/
45       &       cheapaml_h,       &       cheapaml_h,
46       &       cheapaml_kdiff,       &       cheapaml_kdiff,
 c    &       cheapaml_taurelax1,  
47       &       cheapaml_taurelax2,       &       cheapaml_taurelax2,
 c    &       cheapaml_xf,  
 c    &       cheapaml_dtc,  
48       &       rhoa, cpair, stefan,       &       rhoa, cpair, stefan,
49       &       lath, xkar, gasR,       &       lath, xkar, gasR,
50       &       dsolms, dsolmn,       &       dsolms, dsolmn,
51       &       xphaseinit, gamma_blk, humid_fac, p0,       &       xphaseinit, gamma_blk, humid_fac, p0,
52       &       Celcius2K, xgs, xef, hm,       &       xgs, xef, hm,
53       &       zu, zt, zq,       &       zu, zt, zq,
54       &       cdrag_1, cdrag_2, cdrag_3       &       cdrag_1, cdrag_2, cdrag_3,
55         &       externForcingPeriod_cheap,
56         &       externForcingCycle_cheap    
57        _RL    cheapaml_h        _RL    cheapaml_h
58        _RL    cheapaml_kdiff        _RL    cheapaml_kdiff
 c     _RL    cheapaml_taurelax1  
59        _RL    cheapaml_taurelax2        _RL    cheapaml_taurelax2
 c     _RL    cheapaml_xf  
 c     _RL    cheapaml_dtc  
60        _RL    rhoa, cpair, stefan        _RL    rhoa, cpair, stefan
61        _RL    lath, xkar, gasR        _RL    lath, xkar, gasR
62        _RL    dsolms, dsolmn        _RL    dsolms, dsolmn
63        _RL    xphaseinit, gamma_blk, humid_fac, p0        _RL    xphaseinit, gamma_blk, humid_fac, p0
64        _RL    Celcius2K, xgs, xef, hm        _RL    xgs, xef, hm
65        _RL    zu, zt, zq        _RL    zu, zt, zq
66        _RL    cdrag_1, cdrag_2, cdrag_3        _RL    cdrag_1, cdrag_2, cdrag_3
67          _RL    externForcingPeriod_cheap
68          _RL    externForcingCycle_cheap    
69    
70        COMMON /CHEAPAML_PARMS_I/        COMMON /CHEAPAML_PARMS_I/
71       &       cheapaml_ntim,       &       cheapaml_ntim,
# Line 83  c     _RL    cheapaml_dtc Line 77  c     _RL    cheapaml_dtc
77       &       useFreshwaterFlux,       &       useFreshwaterFlux,
78       &       useFluxLimit,       &       useFluxLimit,
79       &       useStressOption,       &       useStressOption,
80       &       useRelativeHumidity       &       useRelativeHumidity,
81         &       periodicExternalForcing_cheap
82        LOGICAL useFreshwaterFlux        LOGICAL useFreshwaterFlux
83        LOGICAL useFluxLimit        LOGICAL useFluxLimit
84        LOGICAL useStressOption        LOGICAL useStressOption
85        LOGICAL useRelativeHumidity        LOGICAL useRelativeHumidity
86          LOGICAL periodicExternalForcing_cheap
87    
88        COMMON /CHEAPAML_PARMS_C/        COMMON /CHEAPAML_PARMS_C/
89       &       AirTempFile, AirQFile, AirQrelFile, SolarFile,       &       AirTempFile, AirQFile, SolarFile,
90       &       UWindFile, VWindFile, UStressFile, VStressFile,       &       UWindFile, VWindFile, UStressFile, VStressFile,
91       &       TrFile, QrFile, QrrelFile,       &       TrFile, QrFile,
92       &       WaveHFile, WavePFile, FluxFormula, WaveModel       &       WaveHFile, WavePFile, FluxFormula, WaveModel
93    
94        CHARACTER*(MAX_LEN_FNAM) AirTempFile        CHARACTER*(MAX_LEN_FNAM) AirTempFile
95        CHARACTER*(MAX_LEN_FNAM) AirQFile        CHARACTER*(MAX_LEN_FNAM) AirQFile
       CHARACTER*(MAX_LEN_FNAM) AirQrelFile  
96        CHARACTER*(MAX_LEN_FNAM) SolarFile        CHARACTER*(MAX_LEN_FNAM) SolarFile
97        CHARACTER*(MAX_LEN_FNAM) UWindFile        CHARACTER*(MAX_LEN_FNAM) UWindFile
98        CHARACTER*(MAX_LEN_FNAM) VWindFile        CHARACTER*(MAX_LEN_FNAM) VWindFile
# Line 105  c     _RL    cheapaml_dtc Line 100  c     _RL    cheapaml_dtc
100        CHARACTER*(MAX_LEN_FNAM) VStressFile        CHARACTER*(MAX_LEN_FNAM) VStressFile
101        CHARACTER*(MAX_LEN_FNAM) TrFile        CHARACTER*(MAX_LEN_FNAM) TrFile
102        CHARACTER*(MAX_LEN_FNAM) QrFile        CHARACTER*(MAX_LEN_FNAM) QrFile
       CHARACTER*(MAX_LEN_FNAM) QrrelFile  
103        CHARACTER*(MAX_LEN_FNAM) WaveHFile        CHARACTER*(MAX_LEN_FNAM) WaveHFile
104        CHARACTER*(MAX_LEN_FNAM) WavePFile        CHARACTER*(MAX_LEN_FNAM) WavePFile
105        CHARACTER*(MAX_LEN_FNAM) FluxFormula        CHARACTER*(MAX_LEN_FNAM) FluxFormula
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22