shr_megan_mod Module

Uses

Variables

Type	Visibility	Attributes		Name		Initial
character(len=CS),	public		::	shr_megan_fields_token	=	''
character(len=CL),	public		::	shr_megan_factors_file	=	''
type(shr_megan_mechcomp_t),	public,	pointer	::	shr_megan_mechcomps(:)
type(shr_megan_megcomp_t),	public,	pointer	::	shr_megan_linkedlist
integer,	public		::	shr_megan_megcomps_n	=	0
integer,	public		::	shr_megan_mechcomps_n	=	0
logical,	public		::	shr_megan_mapped_emisfctrs	=	.false.

Derived Types

type, public :: shr_megan_megcomp_t

Components

Type	Visibility	Attributes		Name		Initial
character(len=16),	public		::	name
integer,	public		::	index
real(kind=r8),	public,	pointer	::	emis_factors(:)
integer,	public		::	class_number
real(kind=r8),	public		::	coeff
real(kind=r8),	public		::	molec_weight
type(shr_megan_megcomp_t),	public,	pointer	::	next_megcomp

type, public :: shr_megan_comp_ptr

Components

Type	Visibility	Attributes		Name		Initial
type(shr_megan_megcomp_t),	public,	pointer	::	ptr

type, public :: shr_megan_mechcomp_t

Components

Type	Visibility	Attributes		Name		Initial
character(len=16),	public		::	name
type(shr_megan_comp_ptr),	public,	pointer	::	megan_comps(:)
integer,	public		::	n_megan_comps

Subroutines

public subroutine shr_megan_readnl(NLFileName, ID, megan_fields)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	NLFileName
integer,	intent(in)			::	ID
character(len=*),	intent(out)			::	megan_fields