pkg/fizhi/fizhi_land_coms.h

C $Header: /u/gcmpack/MITgcm/pkg/fizhi/land_coms.h,v 1.2 2004/05/05 00:39:21 edhill Exp $
C $Name:  $

c Land State Common
c -----------------
      common /land_state/ tcanopy, tdeep, ecanopy, 
     . swetshal, swetroot, swetdeep, snodep, capac
      _RL tcanopy(nchp), tdeep(nchp), ecanopy(nchp), swetshal(nchp)
      _RL swetroot(nchp), swetdeep(nchp), snodep(nchp), capac(nchp)

c Land Mapping Common
c -------------------
      common /land_mapping/ chlt, chlon, igrd
      _RL chlt(nchp), chlon(nchp)
      integer igrd(nchp) 
1	molod	1.1	C $Header: /u/gcmpack/MITgcm/pkg/fizhi/land_coms.h,v 1.2 2004/05/05 00:39:21 edhill Exp $
2			C $Name: $
3
4			c Land State Common
5			c -----------------
6			common /land_state/ tcanopy, tdeep, ecanopy,
7			. swetshal, swetroot, swetdeep, snodep, capac
8			_RL tcanopy(nchp), tdeep(nchp), ecanopy(nchp), swetshal(nchp)
9			_RL swetroot(nchp), swetdeep(nchp), snodep(nchp), capac(nchp)
10
11			c Land Mapping Common
12			c -------------------
13			common /land_mapping/ chlt, chlon, igrd
14			_RL chlt(nchp), chlon(nchp)
15			integer igrd(nchp)