#include "../general/precision_kinds.F90"
Go to the source code of this file.
|
subroutine | distribute_global_column_PRECISION (obj, g_col, l_col, noff, nlen, my_prow, np_rows, nblk) |
|
subroutine | distribute_global_column_4_PRECISION (obj, g_col, g_col_dim1, g_col_dim2, l_col, ldq, matrixcols, noff_in, noff, nlen, my_prow, np_rows, nblk) |
|
◆ distribute_global_column_4_PRECISION()
subroutine distribute_global_column_4_PRECISION |
( |
class(elpa_abstract_impl_t), intent(inout) | obj, |
|
|
real(kind=rk), dimension(1:g_col_dim1,1:g_col_dim2) | g_col, |
|
|
integer(kind=ik), intent(in) | g_col_dim1, |
|
|
integer(kind=ik), intent(in) | g_col_dim2, |
|
|
real(kind=rk), dimension(1:ldq,1:matrixcols) | l_col, |
|
|
integer(kind=ik), intent(in) | ldq, |
|
|
integer(kind=ik), intent(in) | matrixcols, |
|
|
integer(kind=ik), intent(in) | noff_in, |
|
|
integer(kind=ik) | noff, |
|
|
integer(kind=ik) | nlen, |
|
|
integer(kind=ik) | my_prow, |
|
|
integer(kind=ik) | np_rows, |
|
|
integer(kind=ik) | nblk ) |
◆ distribute_global_column_PRECISION()
subroutine distribute_global_column_PRECISION |
( |
class(elpa_abstract_impl_t), intent(inout) | obj, |
|
|
real(kind=rk), dimension(nlen) | g_col, |
|
|
real(kind=rk), dimension(*) | l_col, |
|
|
integer(kind=ik) | noff, |
|
|
integer(kind=ik) | nlen, |
|
|
integer(kind=ik) | my_prow, |
|
|
integer(kind=ik) | np_rows, |
|
|
integer(kind=ik) | nblk ) |