handle_copy_solution_2d Subroutine

private subroutine handle_copy_solution_2d(session, id, op, n_prims, prim_names, reply_header, reply_payload, status, message)

2D COPY_SOLUTION: session packs one i-fastest float64 block per requested primitive (x,y,rho,u,v,p) into a flat buffer; rank 0 transfers it to the binary payload and emits the nx/ny-bearing reply header. Collective.

Arguments

Type	Intent	Optional	Attributes		Name
type(solver_session_t),	intent(inout)			::	session
character(len=*),	intent(in)			::	id
character(len=*),	intent(in)			::	op
integer,	intent(in)			::	n_prims
character(len=16),	intent(in)			::	prim_names(:)
integer(kind=int8),	intent(out),		allocatable	::	reply_header(:)
integer(kind=int8),	intent(out),		allocatable	::	reply_payload(:)
integer,	intent(out)			::	status
character(len=*),	intent(out)			::	message