set_val_int32_int64 Subroutine

private subroutine set_val_int32_int64(this, i, j, val)

Type Bound

shared_ragged_array_int32_t

Arguments

Type IntentOptional Attributes Name
class(shared_ragged_array_int32_t), intent(inout) :: this
integer(kind=int64), intent(in) :: i
integer(kind=int64), intent(in) :: j
integer(kind=int32), intent(in) :: val

Contents

Source Code

set_val_int32_int64

Source Code

    subroutine set_val_int32_int64(this, i, j, val)
        class(shared_ragged_array_int32_t), intent(inout) :: this
        integer(int64), intent(in) :: i, j
        integer(int32), intent(in) :: val

        this%ptr(i)%res(j) = val
    end subroutine set_val_int32_int64