copy_current_solution Subroutine

public subroutine copy_current_solution(ctx, x, rho, u, p, is_ok, message)

Copy the current solution into primitive-variable arrays.

Arguments

Type	Intent	Optional	Attributes		Name
type(solver_run_context_t),	intent(in)			::	ctx	Solver context (read-only).
real(kind=wp),	intent(out)			::	x(:)
real(kind=wp),	intent(out)			::	rho(:)
real(kind=wp),	intent(out)			::	u(:)
real(kind=wp),	intent(out)			::	p(:)
logical,	intent(out),	optional		::	is_ok
character(len=*),	intent(out),	optional		::	message