finish Subroutine

private subroutine finish(session, status_code, err, status, message)

Store the last writable-operation error and mirror it to optional outputs.

Arguments

Type	Intent	Optional	Attributes		Name
type(solver_session_t),	intent(inout)			::	session
integer,	intent(in)			::	status_code
character(len=*),	intent(in)			::	err
integer,	intent(out),	optional		::	status
character(len=*),	intent(out),	optional		::	message