norm_complex_sp Function

private pure function norm_complex_sp(vec, p) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	vec(:)
integer,	intent(in),	optional		::	p

Return Value real(kind=dp)