function EExecD1(OOO,X,Y,Att,Sg1,Sg2)
{
    var R={Re:undefined, Im:undefined}
	if ((X.OB==undefined) || (Y.OB==undefined)) return false;
	if ((X.OB=="P") && (Y.OB=="P") && (IsSobstv(X)) && (IsSobstv(Y)))
	{
		R=CompSqrt(CompSum(CompSqr(CompSub(X.X,Y.X)),CompSqr(CompSub(X.Y,Y.Y))));
		if ((Math.abs(R.Re)+Math.abs(R.Im))>=Eps) 
		{
			TODuga_Create(OOO,X.X,X.Y,R,X.X.Re+R.Re,X.Y.Re,X.X.Re+R.Re,X.Y.Re,Att1);
		}
        AddInc(OOO,Y);
        return true;
	}

	if ((X.OB=="P") && (Y.OB=="P") &&
	(IsSobstv(X)) && (IsSobstv(Y)) &&
    (IsReal(X)) && !(IsReal(Y))) 
	{
		var RR=new Object();
		EExecC2(RR,X,Y,RR,Att5,1,1);
		TODuga_Create(OOO,X.X,X.Y,RR.C,X.X.Re,X.Y.Re,X.X.Re,X.Y.Re,Att1);
		AddInc(OOO,Y);
        return true;
	}


	if ((X.OB=="P") && (Y.OB=="D") && (IsSobstv(X)) && (IsReal(X))) 
	{
		D=Math.sqrt(Sqr(X.X.Re-Y.Xc.Re)+Sqr(X.Y.Re-Y.Yc.Re));
		R.Re=D-Y.R.Re*Sg2; 
		R.Im=0;
		if ((Math.abs(R.Re)+Math.abs(R.Im))>=Eps) 
		{
			TODuga_Create(OOO,X.X,X.Y,R,X.X.Re+R.Re,X.Y.Re,X.X.Re+R.Re,X.Y.Re,Att1);
		}
		else if (Att.Chk==1) TOEmpty_Create(OOO,Att);

		AddInc(OOO,Y);
        return true;
	}
	if (Att.Chk==1) TOEmpty_Create(OOO,Att);
	return true;
} // EExecD1