Go to the source code of this file.
Functions/Subroutines | |
subroutine | dqrm_remap_pnt (arr1d, pnt2d, n) |
This function makes a 2D pointer point to a 1D array. More... | |
subroutine dqrm_remap_pnt | ( | real(kind(1.d0)), dimension(1:n), target | arr1d, |
real(kind(1.d0)), dimension(:,:), pointer | pnt2d, | ||
integer | n | ||
) |
This function makes a 2D pointer point to a 1D array.
This is needed to have a single code handling single and multiple right-hand-sides. This is a dirty workaround that relies on iso_c_binding while waiting for the array bounds remapping to be supported by compilers (in F2008 standard).
Input: arr1d - the input 1d array
Output: pnt2d - the output 2d pointer pointing to arr1d
Definition at line 48 of file dqrm_remap_pnt.F90.
Referenced by dqrm_apply1d(), and dqrm_solve1d().