constituents Derived Type

type, public :: constituents


Components

Type Visibility Attributes Name Initial
integer, public :: num_tot = 0
integer, public :: num_pests = 0
character(len=16), public, dimension(:), allocatable :: pests

need to crosswalk pests to get pest_num for database - use sequential for object

integer, public, dimension(:), allocatable :: pest_num
integer, public :: num_paths = 0
character(len=16), public, dimension(:), allocatable :: paths
integer, public, dimension(:), allocatable :: path_num
integer, public :: num_metals = 0
character(len=16), public, dimension(:), allocatable :: metals
integer, public, dimension(:), allocatable :: metals_num
integer, public :: num_salts = 0
character(len=16), public, dimension(:), allocatable :: salts
integer, public, dimension(:), allocatable :: salts_num
integer, public :: num_cs = 0
character(len=16), public, dimension(:), allocatable :: cs
integer, public, dimension(:), allocatable :: cs_num