sum_zintox Subroutine

public subroutine sum_zintox(u_x, u_z, nz)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(inout),		device, dimension(:, :, :)	::	u_x
real(kind=dp),	intent(in),		device, dimension(:, :, :)	::	u_z
integer,	intent(in),		value	::	nz