klein_sum Interface

public interface klein_sum

Contents


Module Procedures

private pure function klein_sum_real_1d(array) result(the_result)

Similar approach to Neumaier but introduces two levels of compensation

Arguments

Type IntentOptional Attributes Name
real, intent(in), dimension(:) :: array

Return Value real