setpar_Loetsch Subroutine

public subroutine setpar_Loetsch(mp, ms, x2dx)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=i_d),	intent(in)			::	mp
integer(kind=i_d),	intent(in)			::	ms
real(kind=r_2),	intent(in),		DIMENSION(:,:)	::	x2dx