/[MITgcm]/MITgcm/pkg/atm_compon_interf/ATMCPL.h
ViewVC logotype

Annotation of /MITgcm/pkg/atm_compon_interf/ATMCPL.h

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


Revision 1.2 - (hide annotations) (download)
Fri May 21 20:00:48 2004 UTC (20 years ago) by jmc
Branch: MAIN
CVS Tags: checkpoint58l_post, checkpoint57t_post, checkpoint57o_post, checkpoint58e_post, checkpoint57v_post, checkpoint53d_post, checkpoint58u_post, checkpoint58w_post, checkpoint54a_pre, checkpoint57m_post, checkpoint55c_post, checkpoint54e_post, checkpoint57s_post, checkpoint54a_post, checkpoint53c_post, checkpoint57k_post, checkpoint55d_pre, checkpoint57d_post, checkpoint57g_post, checkpoint57b_post, checkpoint57c_pre, checkpoint58r_post, checkpoint55j_post, checkpoint56b_post, checkpoint57i_post, checkpoint57y_post, checkpoint57e_post, checkpoint55h_post, checkpoint58n_post, checkpoint58x_post, checkpoint57g_pre, checkpoint54b_post, checkpoint55b_post, checkpoint58t_post, checkpoint58h_post, checkpoint54d_post, checkpoint56c_post, checkpoint57y_pre, checkpoint55, checkpoint57f_pre, checkpoint57a_post, checkpoint54, checkpoint58q_post, checkpoint54f_post, checkpoint55g_post, checkpoint58j_post, checkpoint59a, checkpoint55f_post, checkpoint59c, checkpoint59b, checkpoint57r_post, checkpoint59, checkpoint58, checkpoint57a_pre, checkpoint55i_post, checkpoint57, checkpoint56, eckpoint57e_pre, checkpoint57h_done, checkpoint58f_post, checkpoint53g_post, checkpoint57x_post, checkpoint57n_post, checkpoint58d_post, checkpoint58c_post, checkpoint57w_post, checkpoint57p_post, checkpint57u_post, checkpoint57f_post, checkpoint58a_post, checkpoint58i_post, checkpoint57q_post, checkpoint58g_post, checkpoint58o_post, checkpoint57z_post, checkpoint57c_post, checkpoint58y_post, checkpoint55e_post, checkpoint58k_post, checkpoint58v_post, checkpoint53f_post, checkpoint55a_post, checkpoint53d_pre, checkpoint54c_post, checkpoint58s_post, checkpoint58p_post, checkpoint57j_post, checkpoint58b_post, checkpoint57h_pre, checkpoint58m_post, checkpoint57l_post, checkpoint57h_post, checkpoint56a_post, checkpoint55d_post
Changes since 1.1: +69 -46 lines
File MIME type: text/plain
new version of atmosphere-coupler interface for AIM+thSIce and ocean models

1 jmc 1.2 C $Header: /u/gcmpack/MITgcm/pkg/aim_compon_interf/ATMCPL.h,v 1.1 2003/12/15 02:44:47 jmc Exp $
2     C $Name: $
3 jmc 1.1 C
4     C
5     C /==========================================================\
6     C | ATMCPL.h |
7     C | o Variables shared between atmos. component to coupler |
8     C | layer. |
9     C |==========================================================|
10     C | These variables are used in the atmos component. Grid |
11     C | variables have already been mapped/interpolated to the |
12     C | atmos grid. |
13     C | Which variables are exported will depend on the specific |
14     C | ocean coupling being utilised. The variables |
15     C | carried here will need to be customised accordingly. |
16     C \==========================================================/
17     C
18     C COMMON /ATM_ATM2CPL_R/
19 jmc 1.2 C atmSLPr - Atmospheric Sea-Level pressure anomaly (Pa=N/m2)
20     C HeatFlux - Atmospheric net surface heat flux (W/m^2) (+=upward).
21     C qShortWave - net shortwave radiation heat flux (W/m^2) (+=upward).
22     C qSensible - Sensible heatflux (W/m^2).
23     C qLatent - Latent heatflux (W/m^2).
24     C qLongWave - net longwave radiation heat flux (W/m^2) (+=upward).
25     C uVelGround - Zonal wind speed at the ground (m/s).
26     C vVelGround - Meridional wind speed at the ground (m/s).
27 jmc 1.1 C tauX - Atmospheric zonal momentum flux at lower boundary (N/m^2).
28     C Same sign as wind. Positive zonal wind is westward.
29     C tauY - Atmospheric meridional momentum flux at lower boundary (N/m^2).
30     C Same sign as wind. Positive meridional wind is northward.
31     C EvMPrFlux - Fresh water flux (=Evap-Precip) on atmos. grid
32     C ( m/s, positive into atmosphere).
33     C RunOffFlux - Fresh water flux (=RunOff) on atmos. grid
34     C ( m/s, positive is leaving the land bucket)
35 jmc 1.2 C RunOffEnFx - Energy carried by RunOff (W/m2) (+=leaving land bucket)
36     C iceSaltFlx - salt flux from sea-ice compon. (+=upward=leaving the ocean)
37     C seaIceMass - sea-ice mass (kg/m2)
38     C atmSLPrTime - Time period over which term has been integrated.
39 jmc 1.1 C HeatFluxTime - Time period over which flux field has been integrated.
40 jmc 1.2 C qShortWaveTime - Time period over which term has been integrated.
41     C qSensibleTime - Time period over which term has been integrated.
42     C qLatentTime - Time period over which term has been integrated.
43     C qLongwaveTime - Time period over which term has been integrated.
44     C uVelGroundTime - Time period over which term has been integrated.
45     C vVelGroundTime - Time period over which term has been integrated.
46 jmc 1.1 C tauXTime - Time period over which flux field has been integrated.
47     C tauYTime - Time period over which flux field has been integrated.
48     C EvMPrTime - Time period over which flux field has been integrated.
49     C RunOffTime - Time period over which flux field has been integrated.
50 jmc 1.2 C ROEnFxTime - Time period over which term has been integrated.
51     C saltFxTime - Time period over which term has been integrated.
52     C seaIceTime - Time period over which term has been integrated.
53 jmc 1.1 COMMON /ATM_ATM2CPL_R/
54 jmc 1.2 & atmSLPr, HeatFlux, qShortWave,
55     c & qSensible, qLatent, qLongWave,
56     c & uVelGround, vVelGround,
57     & tauX, tauY,
58     & EvMPrFlux, RunOffFlux, RunOffEnFx,
59     & iceSaltFlx, seaIceMass,
60     & atmSLPrTime, HeatFluxTime, qShortWaveTime,
61     c & qSensibleTime, qLatentTime, qLongWaveTime,
62     c & uVelGroundTime, vVelGroundTime,
63     & tauXtime, tauYtime,
64     & EvMPrTime, RunOffTime, ROEnFxTime,
65     & saltFxTime, seaIceTime
66     _RL atmSLPr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
67 jmc 1.1 _RL HeatFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
68 jmc 1.2 _RL qShortWave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
69     c _RL qSensible (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
70     c _RL qLatent (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
71     c _RL qLongWave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
72     c _RL uVelGround(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
73     c _RL vVelGround(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
74 jmc 1.1 _RL tauX (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
75     _RL tauY (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
76     _RL EvMPrFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
77     _RL RunOffFlux(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
78 jmc 1.2 _RL RunOffEnFx(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
79     _RL iceSaltFlx(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
80     _RL seaIceMass(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
81     _RL atmSLPrTime (nSx,nSy)
82     _RL HeatFluxTime (nSx,nSy)
83     _RL qShortWaveTime(nSx,nSy)
84     c _RL qSensibleTime (nSx,nSy)
85     c _RL qLatentTime (nSx,nSy)
86     c _RL qLongWaveTime (nSx,nSy)
87     c _RL uVelGroundTime(nSx,nSy)
88     c _RL vVelGroundTime(nSx,nSy)
89     _RL tauXTime (nSx,nSy)
90     _RL tauYTime (nSx,nSy)
91     _RL EvMPrTime (nSx,nSy)
92     _RL RunOffTime (nSx,nSy)
93     _RL ROEnFxTime (nSx,nSy)
94     _RL saltFxTime (nSx,nSy)
95     _RL seaIceTime (nSx,nSy)
96 jmc 1.1
97     C
98     C COMMON /ATM_CPL2ATM_R/
99 jmc 1.2 C ocMxlD - Ocean mixed-layer depth (m). ocMxlD==0. => land.
100     C SSTocn - Ocean surface temperature (oC). Undefined data for land points.
101     C SSSocn - Ocean surface salinity (psu). Undefined data for land points.
102     C vSqocn - Ocean surface velocity square (m2/s2).
103 jmc 1.1 COMMON /ATM_CPL2ATM_R/
104 jmc 1.2 & ocMxlD, SSTocn, SSSocn, vSqocn
105     _RL ocMxlD(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
106     _RL SSTocn(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
107     _RL SSSocn(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
108     _RL vSqocn(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)

  ViewVC Help
Powered by ViewVC 1.1.22