wAT1exp Function

private function wAT1exp(self, alpha)

wAT1exp: the "w" function of the standard AT1exp model, i.e.

Type Bound

MEF90DefMechAT1exp_Type

Arguments

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

Return Value real(kind=c_double)