norm_complex_dp Function

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

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(in) :: vec(:)
integer, intent(in), optional :: p

Return Value real(kind=dp)