PlantNodeClass Module

Contents

Derived Types

PlantNode_

Subroutines

initNode exportNode

Derived Types

type, public :: PlantNode_

Components

Type	Visibility	Attributes		Name		Initial
character(len=200),	public		::	crop_name
logical,	public		::	Reproductive
type(Leaf_),	public,	allocatable	::	Leaf(:)
type(Peti_),	public,	allocatable	::	Peti(:)
type(Flower_),	public,	allocatable	::	Flower(:)
type(Pod_),	public,	allocatable	::	Pod(:)
type(Stem_),	public,	allocatable	::	Stem(:)
type(PlantRoot_),	public,	allocatable	::	Root(:)

Type-Bound Procedures

procedure, public :: init => initNode
procedure, public :: export => exportNode

Subroutines

public subroutine initNode(obj, regacy, PlantName, Stage, LeafThickness, Leaflength, Leafwidth, LeafShapeFactor, MaxLeafThickness, MaxLeaflength, MaxLeafwidth, PetiThickness, Petilength, Petiwidth, PetiShapeFactor, MaxPetiThickness, MaxPetilength, MaxPetiwidth, StemThickness, Stemlength, Stemwidth, StemShapeFactor, MaxStemThickness, MaxStemlength, MaxStemwidth, location)

Arguments

Type	Intent	Optional	Attributes		Name
class(PlantNode_),	intent(inout),		target	::	obj
logical,	intent(in),	optional		::	regacy
character(len=*),	intent(in)			::	PlantName
character(len=2),	intent(in)			::	Stage
real(kind=real64),	intent(in),	optional		::	LeafThickness
real(kind=real64),	intent(in),	optional		::	Leaflength
real(kind=real64),	intent(in),	optional		::	Leafwidth
real(kind=real64),	intent(in),	optional		::	LeafShapeFactor
real(kind=real64),	intent(in),	optional		::	MaxLeafThickness
real(kind=real64),	intent(in),	optional		::	MaxLeaflength
real(kind=real64),	intent(in),	optional		::	MaxLeafwidth
real(kind=real64),	intent(in),	optional		::	PetiThickness
real(kind=real64),	intent(in),	optional		::	Petilength
real(kind=real64),	intent(in),	optional		::	Petiwidth
real(kind=real64),	intent(in),	optional		::	PetiShapeFactor
real(kind=real64),	intent(in),	optional		::	MaxPetiThickness
real(kind=real64),	intent(in),	optional		::	MaxPetilength
real(kind=real64),	intent(in),	optional		::	MaxPetiwidth
real(kind=real64),	intent(in),	optional		::	StemThickness
real(kind=real64),	intent(in),	optional		::	Stemlength
real(kind=real64),	intent(in),	optional		::	Stemwidth
real(kind=real64),	intent(in),	optional		::	StemShapeFactor
real(kind=real64),	intent(in),	optional		::	MaxStemThickness
real(kind=real64),	intent(in),	optional		::	MaxStemlength
real(kind=real64),	intent(in),	optional		::	MaxStemwidth
real(kind=real64),	intent(in),	optional		::	location(3)

public subroutine exportNode(obj, FileName, objID)

Arguments

Type	Intent	Optional	Attributes		Name
class(PlantNode_),	intent(in)			::	obj
character(len=*),	intent(in),	optional		::	FileName
integer(kind=int32),	intent(inout)			::	objID