calculate_max_real Function

private function calculate_max_real(df, col_index) result(max_val)

Calculate maximum of a real column

Arguments

Type IntentOptional Attributes Name
type(data_frame), intent(in) :: df
integer, intent(in) :: col_index

Return Value real(kind=rk)


Source Code

    function calculate_max_real(df, col_index) result(max_val)
        type(data_frame), intent(in) :: df
        integer, intent(in) :: col_index
        real(rk) :: max_val

        real(rk), dimension(:), allocatable :: col

        col = df_get_col_real(df, col_index)
        max_val = maxval(col)
    end function calculate_max_real