make_double Subroutine

public subroutine make_double(nI, nJ, elec1, elec2, tgt1, tgt2, ex, tParity)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nI(:)
integer,	intent(inout)			::	nJ(:)
integer,	intent(in)			::	elec1
integer,	intent(in)			::	elec2
integer,	intent(in)			::	tgt1
integer,	intent(in)			::	tgt2
integer,	intent(inout)			::	ex(2,2)
logical,	intent(out)			::	tParity

Contents