Boring_ Derived Type

type, public :: Boring_

Contents

Variables

Project Name URL position TP Length SamplingPoint Elevation Depth PTest_Depth PTest_NValue SoilType Color

Type-Bound Procedures

create example

Components

Type	Visibility	Attributes		Name		Initial
character(len=:),	public,	allocatable	::	Project
character(len=:),	public,	allocatable	::	Name
character(len=:),	public,	allocatable	::	URL
real(kind=real64),	public		::	position(1:3)	=	0.0d0
real(kind=real64),	public		::	TP
real(kind=real64),	public		::	Length
integer(kind=int32),	public		::	SamplingPoint	=	1
real(kind=real64),	public,	allocatable	::	Elevation(:)
real(kind=real64),	public,	allocatable	::	Depth(:)
real(kind=real64),	public,	allocatable	::	PTest_Depth(:)
real(kind=real64),	public,	allocatable	::	PTest_NValue(:)
integer(kind=int32),	public,	allocatable	::	SoilType(:)
integer(kind=int32),	public,	allocatable	::	Color(:)

Type-Bound Procedures

procedure, public :: create => createBoring

public subroutine createBoring(obj, SamplingPoint)

Arguments

Type Intent Optional Attributes Name

class(Boring_), intent(inout) :: obj

integer(kind=int32), intent(in) :: SamplingPoint

procedure, public :: example => exampleBoring

public subroutine exampleBoring(obj)

Arguments

Type Intent Optional Attributes Name

class(Boring_), intent(inout) :: obj