private function pos_2d_real_int64(this, i, j) result(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=int64),
|
intent(in) |
|
|
:: |
i |
|
integer(kind=int64),
|
intent(in) |
|
|
:: |
j |
|
Return Value
real(kind=dp)
Source Code
function pos_2d_real_int64(this, i, j) result(val)
class(shared_ragged_array_real_t), intent(inout) :: this
integer(int64), intent(in) :: i, j
real(dp) :: val
val = this%ptr(i)%res(j)
end function pos_2d_real_int64