prim_split Subroutine

private pure subroutine prim_split(q, dir, gam, rho, un, ut, p, c, mn, mt)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	q(neq2d)
integer,	intent(in)			::	dir
real(kind=wp),	intent(in)			::	gam
real(kind=wp),	intent(out)			::	rho
real(kind=wp),	intent(out)			::	un
real(kind=wp),	intent(out)			::	ut
real(kind=wp),	intent(out)			::	p
real(kind=wp),	intent(out)			::	c
integer,	intent(out)			::	mn
integer,	intent(out)			::	mt