private function s_spline_matrix_dense__get_element(self, i, j) result(a_ij)
Type Bound
sll_t_spline_matrix_dense
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
class(sll_t_spline_matrix_dense),
|
intent(inout) |
|
|
:: |
self |
|
|
integer,
|
intent(in) |
|
|
:: |
i |
|
|
integer,
|
intent(in) |
|
|
:: |
j |
|
Return Value
real(kind=wp)
Source Code
function s_spline_matrix_dense__get_element( self, i, j ) result( a_ij )
class(sll_t_spline_matrix_dense), intent(inout) :: self
integer , intent(in ) :: i
integer , intent(in ) :: j
real(wp) :: a_ij
a_ij=self%a(i,j)
end function s_spline_matrix_dense__get_element