1 |
jmc |
1.5 |
C $Header: /u/gcmpack/MITgcm/pkg/atm_ocn_coupler/ATMVARS.h,v 1.4 2007/06/18 21:20:35 jmc Exp $ |
2 |
jmc |
1.1 |
C $Name: $ |
3 |
|
|
|
4 |
jmc |
1.4 |
C *==========================================================* |
5 |
|
|
C | ATMVARS.h Declare arrays for holding data on the atmos. |
6 |
|
|
C | grid. Arrays may need adding or removing |
7 |
|
|
C | different couplings. |
8 |
|
|
C *==========================================================* |
9 |
jmc |
1.5 |
|
10 |
jmc |
1.4 |
C AtmDepths_atm :: Atmos. depths on atmos. grid |
11 |
|
|
C OcMxlD_atm :: Ocean mixed-layer depths on atmos. grid (m) |
12 |
|
|
C SST_atm :: Sea surface temperature on atmos. grid ( oC). |
13 |
|
|
C SSS_atm :: Sea surface temperature on atmos. grid (psu). |
14 |
|
|
C vSq_atm :: Sea surface velocity square on atmos. grid (m2/s2) |
15 |
|
|
C fluxCO2_atm :: flux of CO2 from ocn->Atm on atmos. grid (mol/m2/s) |
16 |
|
|
C atmSLPr_atm :: Sea Level atmos. pressure on atmos. grid (Pa) |
17 |
|
|
C HeatFlux_atm :: net Heat flux on atmos. grid (W/m2, +=upward) |
18 |
|
|
C qShortWave_atm :: net shortwave radiation on atmos. grid (W/m2, +=upward) |
19 |
|
|
C TauX_atm :: Zonal momentum flux on atmos. grid ( N/m^2, same |
20 |
|
|
C sign as the wind ; positive wind == westward flow) |
21 |
|
|
C TauY_atm :: Meridional momentum flux on atmos. grid ( N/m^2, same |
22 |
|
|
C sign as the wind ; positive wind == northward flow) |
23 |
|
|
C EvMPr_atm :: Fresh water flux (=Evap-Precip) on atmos. grid |
24 |
jmc |
1.5 |
C ( kg/m2/s, positive into atmosphere). |
25 |
jmc |
1.4 |
C RunOff_atm :: Fresh water flux (=RunOff) on atmos. grid |
26 |
jmc |
1.5 |
C ( kg/m2/s, positive is leaving the land bucket) |
27 |
jmc |
1.4 |
C ROEnFx_atm :: Energy carried by RunOff on atmos. grid |
28 |
|
|
C ( W/m2, +=leaving land bucket) |
29 |
|
|
C SaltFlx_atm :: salt flux from sea-ice compon. on atmos. grid |
30 |
jmc |
1.5 |
C ( g/m2/s, +=upward=leaving the ocean) |
31 |
jmc |
1.4 |
C sIceMass_atm :: sea-ice mass on atmos. grid (kg/m2) |
32 |
|
|
C aCO2_atm :: atmos CO2 on atmos. grid (parts by volume) |
33 |
|
|
C wSpeed_atm :: surface windspeed on atmos. grid (m/s) |
34 |
|
|
C sIceFrac_atm :: sea-ice fraction on atmos. grid |
35 |
jmc |
1.1 |
|
36 |
|
|
COMMON /ATMVARS_R/ |
37 |
|
|
& AtmDepths_atm, |
38 |
jmc |
1.4 |
& OcMxlD_atm, SST_atm, SSS_atm, vSq_atm, fluxCO2_atm, |
39 |
jmc |
1.1 |
& atmSLPr_atm, HeatFlux_atm, qShortWave_atm, |
40 |
|
|
c & qLatent_atm, qSensible_atm, qLongWave_atm, |
41 |
|
|
c & uVelGround_atm, vVelGround_atm, |
42 |
|
|
& TauX_atm, TauY_atm, |
43 |
|
|
& EvMPr_atm, RunOff_atm, ROEnFx_atm, |
44 |
jmc |
1.4 |
& SaltFlx_atm, sIceMass_atm, |
45 |
|
|
& aCO2_atm, wSpeed_atm, sIceFrac_atm |
46 |
jmc |
1.1 |
|
47 |
|
|
_RS AtmDepths_atm (Nx_atm,Ny_atm) |
48 |
|
|
_RL OcMxlD_atm (Nx_atm,Ny_atm) |
49 |
|
|
_RL SST_atm (Nx_atm,Ny_atm) |
50 |
|
|
_RL SSS_atm (Nx_atm,Ny_atm) |
51 |
|
|
_RL vSq_atm (Nx_atm,Ny_atm) |
52 |
jmc |
1.4 |
_RL fluxCO2_atm (Nx_atm,Ny_atm) |
53 |
jmc |
1.1 |
_RL atmSLPr_atm (Nx_atm,Ny_atm) |
54 |
|
|
_RL HeatFlux_atm (Nx_atm,Ny_atm) |
55 |
|
|
_RL qShortWave_atm (Nx_atm,Ny_atm) |
56 |
|
|
c _RL qLatent_atm (Nx_atm,Ny_atm) |
57 |
|
|
c _RL qSensible_atm (Nx_atm,Ny_atm) |
58 |
|
|
c _RL qLongWave_atm (Nx_atm,Ny_atm) |
59 |
|
|
c _RL uVelGround_atm (Nx_atm,Ny_atm) |
60 |
|
|
c _RL vVelGround_atm (Nx_atm,Ny_atm) |
61 |
|
|
_RL TauX_atm (Nx_atm,Ny_atm) |
62 |
|
|
_RL TauY_atm (Nx_atm,Ny_atm) |
63 |
|
|
_RL EvMPr_atm (Nx_atm,Ny_atm) |
64 |
|
|
_RL RunOff_atm (Nx_atm,Ny_atm) |
65 |
|
|
_RL ROEnFx_atm (Nx_atm,Ny_atm) |
66 |
|
|
_RL SaltFlx_atm (Nx_atm,Ny_atm) |
67 |
|
|
_RL sIceMass_atm (Nx_atm,Ny_atm) |
68 |
jmc |
1.4 |
_RL aCO2_atm (Nx_atm,Ny_atm) |
69 |
|
|
_RL wSpeed_atm (Nx_atm,Ny_atm) |
70 |
|
|
_RL sIceFrac_atm (Nx_atm,Ny_atm) |