Commit 3aa7f40f authored by Pavel Kus's avatar Pavel Kus

setting mpi-related parameters consistently for non-mpi case

parent cb4464ff
......@@ -444,6 +444,14 @@ module elpa_impl
! Otherwise parameters are missing
error = ELPA_ERROR
#else
call self%set("process_row", 0, error)
call self%set("process_col", 0, error)
call self%set("process_id", 0, error)
call self%set("is_process_id_zero", 1, error)
call self%set("num_process_rows", 1, error)
call self%set("num_process_cols", 1, error)
call self%set("num_processes", 1, error)
#endif
end function
......
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