1 |
C $Header: /u/gcmpack/MITgcm/pkg/aim_ocn_coupler/ATMVARS.h,v 1.1 2003/12/15 02:28:00 jmc Exp $ |
2 |
C $Name: $ |
3 |
|
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 |
C AtmDepths_atm - Atmos. depths on atmos. grid |
10 |
C OcMxlD_atm - Ocean mixed-layer depths on atmos. grid (m) |
11 |
C SST_atm - Sea surface temperature on atmos. grid ( oC). |
12 |
C SSS_atm - Sea surface temperature on atmos. grid (psu). |
13 |
C vSq_atm - Sea surface velocity square on atmos. grid (m2/s2) |
14 |
C atmSLPr_atm - Sea Level atmos. pressure on atmos. grid (Pa) |
15 |
C HeatFlux_atm - net Heat flux on atmos. grid (W/m2, +=upward) |
16 |
C qShortWave_atm - net shortwave radiation on atmos. grid (W/m2, +=upward) |
17 |
C TauX_atm - Zonal momentum flux on atmos. grid ( N/m^2, same |
18 |
C sign as the wind ; positive wind == westward flow) |
19 |
C TauY_atm - Meridional momentum flux on atmos. grid ( N/m^2, same |
20 |
C sign as the wind ; positive wind == northward flow) |
21 |
C EvMPr_atm - Fresh water flux (=Evap-Precip) on atmos. grid |
22 |
C ( m/s, positive into atmosphere). |
23 |
C RunOff_atm - Fresh water flux (=RunOff) on atmos. grid |
24 |
C ( m/s, positive is leaving the land bucket) |
25 |
C ROEnFx_atm - Energy carried by RunOff on atmos. grid |
26 |
C ( W/m2, +=leaving land bucket) |
27 |
C SaltFlx_atm - salt flux from sea-ice compon. on atmos. grid |
28 |
C (+=upward=leaving the ocean) |
29 |
C sIceMass_atm - sea-ice mass on atmos. grid (kg/m2) |
30 |
|
31 |
COMMON /ATMVARS_R/ |
32 |
& AtmDepths_atm, |
33 |
& OcMxlD_atm, SST_atm, SSS_atm, vSq_atm, |
34 |
& atmSLPr_atm, HeatFlux_atm, qShortWave_atm, |
35 |
c & qLatent_atm, qSensible_atm, qLongWave_atm, |
36 |
c & uVelGround_atm, vVelGround_atm, |
37 |
& TauX_atm, TauY_atm, |
38 |
& EvMPr_atm, RunOff_atm, ROEnFx_atm, |
39 |
& SaltFlx_atm, sIceMass_atm |
40 |
|
41 |
_RS AtmDepths_atm (Nx_atm,Ny_atm) |
42 |
_RL OcMxlD_atm (Nx_atm,Ny_atm) |
43 |
_RL SST_atm (Nx_atm,Ny_atm) |
44 |
_RL SSS_atm (Nx_atm,Ny_atm) |
45 |
_RL vSq_atm (Nx_atm,Ny_atm) |
46 |
_RL atmSLPr_atm (Nx_atm,Ny_atm) |
47 |
_RL HeatFlux_atm (Nx_atm,Ny_atm) |
48 |
_RL qShortWave_atm (Nx_atm,Ny_atm) |
49 |
c _RL qLatent_atm (Nx_atm,Ny_atm) |
50 |
c _RL qSensible_atm (Nx_atm,Ny_atm) |
51 |
c _RL qLongWave_atm (Nx_atm,Ny_atm) |
52 |
c _RL uVelGround_atm (Nx_atm,Ny_atm) |
53 |
c _RL vVelGround_atm (Nx_atm,Ny_atm) |
54 |
_RL TauX_atm (Nx_atm,Ny_atm) |
55 |
_RL TauY_atm (Nx_atm,Ny_atm) |
56 |
_RL EvMPr_atm (Nx_atm,Ny_atm) |
57 |
_RL RunOff_atm (Nx_atm,Ny_atm) |
58 |
_RL ROEnFx_atm (Nx_atm,Ny_atm) |
59 |
_RL SaltFlx_atm (Nx_atm,Ny_atm) |
60 |
_RL sIceMass_atm (Nx_atm,Ny_atm) |