fn EExecO9 &out_prm1 &out_prm2 &out_prm3 &out_prm4 in_prm1 in_prm2 Att_out1 Att_t1 Att_out2 Att_t2 Sg1 Sg2 FM =
(
	local Result,p0,conica,o0,t1,t2,out1,out2
	if ((in_prm1==undefined) or (in_prm2==undefined)) then return false

	local p0,conica,o0,t2,out1,out2
	CreateCopy &p0 in_prm1 
	p0.FAtt=CopyAtt Att0 

	CreateCopy &conica in_prm2 
	conica.FAtt=CopyAtt Att0 

	EExecY6 &o0 p0 conica Att5 Sg1 Sg2 "0"
	EExecPG &t2 &t1 o0 conica Att_t2 Att_t1 1 Sg2 "0"
	EExecO0 &out1 p0 t1 Att_out1 Sg1 1 "0"
	EExecO0 &out2 p0 t2 Att_out2 Sg1 1 "0"

	CreateCopy &out_prm1 out1 
	out_prm1.FAtt=CopyAtt Att_out1 

	CreateCopy &out_prm2 t1 
	out_prm2.FAtt=CopyAtt Att_t1 

	AddInc out_prm1 out_prm2 
	AddInc out_prm1 in_prm1 

	CreateCopy &out_prm3 out2 
	out_prm3.FAtt=CopyAttAtt_out2 

	CreateCopy &out_prm4 t2 
	out_prm4.FAtt=CopyAtt Att_t2 

	AddInc &out_prm3 out_prm4 
	AddInc &out_prm3 in_prm1 

	return true
) -- EExecO9