private subroutine set_val_real_int32(this, i, j, val)
Type Bound
shared_ragged_array_real_t
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
class(shared_ragged_array_real_t),
|
intent(inout) |
|
|
:: |
this |
|
|
integer(kind=int32),
|
intent(in) |
|
|
:: |
i |
|
|
integer(kind=int32),
|
intent(in) |
|
|
:: |
j |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
val |
|
Source Code
subroutine set_val_real_int32(this, i, j, val)
class(shared_ragged_array_real_t), intent(inout) :: this
integer(int32), intent(in) :: i, j
real(dp), intent(in) :: val
this%ptr(i)%res(j) = val
end subroutine set_val_real_int32