module marbl_sizes

  use marbl_kinds_mod, only : int_kind

  implicit none

  public

  !-----------------------------------------------------------------------------
  ! number of ecosystem tracers
  !-----------------------------------------------------------------------------
  
  integer(int_kind), parameter :: ecosys_tracer_cnt = ECOSYS_NT
  integer(int_kind), parameter :: ecosys_ciso_tracer_cnt = 14

  !-----------------------------------------------------------------------------
  ! number of ecosystem constituents and grazing interactions
  !-----------------------------------------------------------------------------
  
  integer (KIND=int_kind), parameter :: zooplankton_cnt = ZOOPLANKTON_CNT
  integer (KIND=int_kind), parameter :: autotroph_cnt   = AUTOTROPH_CNT
  integer (KIND=int_kind), parameter :: grazer_prey_cnt = GRAZER_PREY_CNT

  integer (KIND=int_kind), parameter :: max_prey_class_size = 9

  !-----------------------------------------------------------------------------
  ! total number of tracers used by marbl
  !-----------------------------------------------------------------------------

  integer (int_kind) :: ecosys_used_tracer_cnt

  !-----------------------------------------------------------------------------
  ! number of surface forcing fields
  !-----------------------------------------------------------------------------

  integer :: num_surface_forcing_fields 

  !-----------------------------------------------------------------------------
  ! array bounds 
  !-----------------------------------------------------------------------------

  integer (int_kind) :: ecosys_ind_beg = 1
  integer (int_kind) :: ecosys_ind_end
  integer (int_kind) :: ecosys_ciso_ind_beg
  integer (int_kind) :: ecosys_ciso_ind_end

end module marbl_sizes