module eig
  use shr_kind_mod, only: r8 => shr_kind_r8
  implicit none

  integer,parameter :: Nhr=28      ! unused?
  integer,parameter :: NLi=44      ! number of levels for 90 km lb
! integer,parameter :: NLi=42      ! number of levels for 97 km lb
  integer,parameter :: NFi=24      ! number of longitudes?
  integer,parameter :: lmi=NLi*2
  integer,parameter :: NHN=149
  integer,parameter :: nk=11
  integer,parameter :: kVC=1
  integer,parameter :: ihe=0

  real(r8),parameter :: RE=6371.2_r8
  real(r8),parameter :: Bki=1.0_r8
  real(r8),parameter :: CLNPd=11.0_r8
end module eig