Replace all occurrences of a value in an integer column
@param[in,out] df The data frame instance @param[in] col_index Index of the column @param[in] old_value Value to replace @param[in] new_value Replacement value
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(data_frame), | intent(inout) | :: | df | |||
integer, | intent(in) | :: | col_index | |||
integer(kind=ik), | intent(in) | :: | old_value | |||
integer(kind=ik), | intent(in) | :: | new_value |
subroutine df_replace_value_integer(df, col_index, old_value, new_value) type(data_frame), intent(inout) :: df integer, intent(in) :: col_index integer(ik), intent(in) :: old_value, new_value integer(ik), dimension(:), allocatable :: col integer :: i col = df_get_col_integer(df, col_index) do i = 1, size(col) if (col(i) == old_value) then col(i) = new_value end if end do call df_set_col_integer(df, col_index, col) end subroutine df_replace_value_integer