Wrong intent declaration

parent 34fbaebf
......@@ -1646,7 +1646,7 @@ module ELPA2_compute
#else
real(kind=rk) :: q(ldq,matrixCols)
#endif
real(kind=rk), intent(out) :: hh_trans_real(:,:)
real(kind=rk), intent(in) :: hh_trans_real(:,:)
integer(kind=ik) :: np_rows, my_prow, np_cols, my_pcol
integer(kind=ik) :: i, j, ip, sweep, nbuf, l_nev, a_dim2
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment