PetiClass Module

Uses

Contents

Derived Types

Peti_

Subroutines

initPeti exportPeti

Derived Types

type, public :: Peti_

Components

Type	Visibility	Attributes		Name		Initial
type(FEMDomain_),	public		::	FEMDomain
real(kind=real64),	public		::	Thickness
real(kind=real64),	public		::	length
real(kind=real64),	public		::	width
real(kind=real64),	public		::	MaxThickness
real(kind=real64),	public		::	Maxlength
real(kind=real64),	public		::	Maxwidth
real(kind=real64),	public		::	center_bottom(3)
real(kind=real64),	public		::	center_top(3)
real(kind=real64),	public		::	radius_bottom(3)
real(kind=real64),	public		::	radius_top(3)
real(kind=real64),	public		::	outer_normal_bottom(3)
real(kind=real64),	public		::	outer_normal_top(3)
integer(kind=int32),	public		::	Division
type(Stem_),	public,	pointer	::	pStem

Type-Bound Procedures

procedure, public :: Init => initPeti
procedure, public :: export => exportPeti

Subroutines

public subroutine initPeti(obj, Thickness, length, width, MaxThickness, Maxlength, Maxwidth, rotx, roty, rotz, location)

Arguments

Type	Intent	Optional	Attributes		Name
class(Peti_),	intent(inout)			::	obj
real(kind=real64),	intent(in),	optional		::	Thickness
real(kind=real64),	intent(in),	optional		::	length
real(kind=real64),	intent(in),	optional		::	width
real(kind=real64),	intent(in),	optional		::	MaxThickness
real(kind=real64),	intent(in),	optional		::	Maxlength
real(kind=real64),	intent(in),	optional		::	Maxwidth
real(kind=real64),	intent(in),	optional		::	rotx
real(kind=real64),	intent(in),	optional		::	roty
real(kind=real64),	intent(in),	optional		::	rotz
real(kind=real64),	intent(in),	optional		::	location(3)

public subroutine exportPeti(obj, FileName, PetiID)

Arguments

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