/[MITgcm]/MITgcm/pkg/aim/com_forcing1.h
ViewVC logotype

Diff of /MITgcm/pkg/aim/com_forcing1.h

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

revision 1.3 by cnh, Sun Feb 4 14:38:49 2001 UTC revision 1.4 by cnh, Tue May 29 19:28:53 2001 UTC
# Line 3  C $Name$ Line 3  C $Name$
3  C $Namer: $  C $Namer: $
4    
5  C--   /LSMASK/ land-sea masks  C--   /LSMASK/ land-sea masks
6        common /LSMASK/ fmask1(ngp)       ! fractional land-sea mask        common /LSMASK/ fmask1(ngp,MAX_NO_THREADS) ! fractional land-sea mask
7    
8  C--   /FORFIX/ Time invariant forcing fields  C--   /FORFIX/ Time invariant forcing fields
9        common /FORFIX/ phi0(ngp),        ! surface geopotential        common /FORFIX/ phi0(ngp,MAX_NO_THREADS),  ! surface geopotential
10       .                alb0(ngp)         ! land-surface albedo       .                alb0(ngp,MAX_NO_THREADS)   ! land-surface albedo
11    
12  C--   /FORCIN/ Forcing fields  C--   /FORCIN/ Forcing fields
13        common /FORCIN/ sst1(ngp),        ! SST        common /FORCIN/ sst1(ngp,MAX_NO_THREADS),  ! SST
14       .                oice1(ngp),       ! sea ice fraction       .                oice1(ngp,MAX_NO_THREADS), ! sea ice fraction
15       .                stl1(ngp),        ! land-surface temperature       .                stl1(ngp,MAX_NO_THREADS),  ! land-surface temperature
16       .                snow1(ngp),       ! snow depth (mm water)       .                snow1(ngp,MAX_NO_THREADS), ! snow depth (mm water)
17       .                soilq1(ngp)       ! soil wetness (mm water)       .                soilq1(ngp,MAX_NO_THREADS) ! soil wetness (mm water)
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22