df_abs_column_real Subroutine

public subroutine df_abs_column_real(df, col_index)

Take absolute value of all elements in a real column

@param[in,out] df The data frame instance @param[in] col_index Index of the column

Arguments

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

Source Code

    subroutine df_abs_column_real(df, col_index)
        type(data_frame), intent(inout) :: df
        integer, intent(in) :: col_index

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

        col = df_get_col_real(df, col_index)
        col = abs(col)
        call df_set_col_real(df, col_index, col)
    end subroutine df_abs_column_real