quat_is_normalized Function

public function quat_is_normalized(q)

Returns .true. if quaternion is normalized, i.e. if it is a unit quaternion

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rp),	intent(in),		dimension(4)	::	q	A quaternion

Return Value logical