increment_num_cols Subroutine

private subroutine increment_num_cols(this)

Type Bound

data_frame

Arguments

Type IntentOptional Attributes Name
class(data_frame), intent(inout) :: this

Source Code

    subroutine increment_num_cols(this)
        class(data_frame), intent(inout) :: this
        this % num_cols = this % num_cols + 1
    end subroutine increment_num_cols