aAT2 Function

private function aAT2(self, alpha)

aAT2: the "a" function of the standard AT2 model, i.e. $a(\alpha) = \eta + (1-\eta)(1-\alpha)^2$

Type Bound

MEF90DefMechAT2_Type

Arguments

Type	Intent	Optional	Attributes		Name
class(MEF90DefMechAT2_Type),	intent(in)			::	self
real(kind=C_DOUBLE)				::	alpha

Return Value real(kind=c_double)