1 |
cnh |
1.4 |
C $Header: /u/gcmpack/models/MITgcmUV/pkg/aim/com_forcing1.h,v 1.3 2001/02/04 14:38:49 cnh Exp $ |
2 |
|
|
C $Name: $ |
3 |
adcroft |
1.2 |
C $Namer: $ |
4 |
|
|
|
5 |
|
|
C-- /LSMASK/ land-sea masks |
6 |
cnh |
1.4 |
common /LSMASK/ fmask1(ngp,MAX_NO_THREADS) ! fractional land-sea mask |
7 |
adcroft |
1.2 |
|
8 |
|
|
C-- /FORFIX/ Time invariant forcing fields |
9 |
cnh |
1.4 |
common /FORFIX/ phi0(ngp,MAX_NO_THREADS), ! surface geopotential |
10 |
|
|
. alb0(ngp,MAX_NO_THREADS) ! land-surface albedo |
11 |
adcroft |
1.2 |
|
12 |
|
|
C-- /FORCIN/ Forcing fields |
13 |
cnh |
1.4 |
common /FORCIN/ sst1(ngp,MAX_NO_THREADS), ! SST |
14 |
|
|
. oice1(ngp,MAX_NO_THREADS), ! sea ice fraction |
15 |
|
|
. stl1(ngp,MAX_NO_THREADS), ! land-surface temperature |
16 |
|
|
. snow1(ngp,MAX_NO_THREADS), ! snow depth (mm water) |
17 |
|
|
. soilq1(ngp,MAX_NO_THREADS) ! soil wetness (mm water) |