fn EExecSP4P &out_Prm1 &out_Prm2 in_Prm1 in_Prm2 in_Prm3 in_Prm4 in_Prm5 in_Prm6 in_Prm7 in_Prm8  Att_1 Att_2 Sg1 Sg2 Sg3 Sg4 Sg5 Sg6 Sg7 Sg8 FM  =
(
	if ((in_Prm1==undefined) or (in_Prm2==undefined) or (in_Prm3==undefined) or (in_Prm4==undefined) or (in_Prm5==undefined) or (in_Prm6==undefined) or (in_Prm7==undefined) or (in_Prm8==undefined)) then return false

	local  c1,d1,d2,o1,o10,o11,o12,o13,o14,o15,o16,o17,o18,o19,o2,o21,o22,o23,o24,o25,o26,o27,o3,o4,o5,o6,o7,o8,o9,p10,p11,p12,p13,p14,p15,p16,p9

	TOChisl_Create &Chisl1 (Complex -331.0 0.0) Att5
	TOChisl_Create &Chisl2 (Complex 18.0 0.0) Att5
	TOChisl_Create &Chisl3 (Complex -331.0 0.0) Att5
	TOChisl_Create &Chisl4 (Complex -82.0 0.0) Att5
	TOChisl_Create &Chisl5 (Complex -190.0 0.0) Att5
	TOChisl_Create &Chisl6 (Complex 68.0 0.0) Att5
	TOChisl_Create &Chisl7 (Complex -190.0 0.0) Att5
	TOChisl_Create &Chisl8 (Complex -32.0 0.0) Att5
	TOChisl_Create &Chisl9 (Complex -56.0 0.0) Att5
	TOChisl_Create &Chisl10 (Complex -10.0 0.0) Att5
	TOChisl_Create &Chisl11 (Complex -56.0 0.0) Att5
	TOChisl_Create &Chisl12 (Complex -110.0 0.0) Att5
	TOChisl_Create &Chisl13 (Complex 84.0 0.0) Att5
	TOChisl_Create &Chisl14 (Complex -53.0 0.0) Att5
	TOChisl_Create &Chisl15 (Complex 84.0 0.0) Att5
	TOChisl_Create &Chisl16 (Complex -153.0 0.0) Att5

	CreateCopy &p1 in_Prm1
	p1.FAtt=in_Prm1.FAtt

	CreateCopy &p2 in_Prm2
	p2.FAtt=in_Prm2.FAtt

	CreateCopy &p3 in_Prm3
	p3.FAtt=in_Prm3.FAtt

	CreateCopy &p4 in_Prm4
	p4.FAtt=in_Prm4.FAtt

	CreateCopy &p5 in_Prm5
	p5.FAtt=in_Prm5.FAtt

	CreateCopy &p6 in_Prm6
	p6.FAtt=in_Prm6.FAtt

	CreateCopy &p7 in_Prm7
	p7.FAtt=in_Prm7.FAtt

	CreateCopy &p8 in_Prm8
	p8.FAtt=in_Prm8.FAtt

	EExecO2 &o1  Chisl1 Chisl2 Chisl3 Chisl4  att5  1 1 1 1  "0"
	EExecO2 &o2  Chisl5 Chisl6 Chisl7 Chisl8  att5  1 1 1 1  "0"
	EExecO2 &o3  Chisl9 Chisl10 Chisl11 Chisl12  att5  1 1 1 1  "0"
	EExecO2 &o4  Chisl13 Chisl14 Chisl15 Chisl16  att5  1 1 1 1  "0"
	EExecO0 &o5  p3 p1  att5  1 1  "0"
	EExecO0 &o6  p4 p2  att5  1 1  "0"
	EExecPA &p9  o6  att0  1  "0"
	EExecPA &p10  o5  att0  1  "0"
	EExecO0 &o7  p5 p1  att5  1 1  "0"
	EExecO0 &o8  p6 p2  att5  1 1  "0"
	EExecPA &p11  o8  att0  1  "0"
	EExecPA &p12  o7  att0  1  "0"
	EExecO0 &o9  p7 p1  att5  1 1  "0"
	EExecO0 &o10  p8 p2  att5  1 1  "0"
	EExecPA &p13  o10  att0  1  "0"
	EExecO1 &o11  p10 null  att0  1 1  "0"
	EExecO5 &o12  o6 p9 rect  att0  1 1 1  "0"
	EExecO1 &o13  p9 null  att0  1 1  "0"
	EExecO5 &o14  o5 p10 rect  att0  1 1 1  "0"
	EExecO1 &o15  p12 null  att0  1 1  "0"
	EExecO5 &o16  o8 p11 rect  att0  1 1 1  "0"
	EExecO5 &o17  o7 p12 rect  att0  1 1 1  "0"
	EExecO1 &o18  p11 null  att0  1 1  "0"
	EExecPA &p14  o9  att0  1  "0"
	EExecO1 &o19  p14 null  att0  1 1  "0"
	EExecO5 &o21  o10 p13 rect  att0  1 1 1  "0"
	EExecO1 &o22  p13 null  att0  1 1  "0"
	EExecO5 &o23  o9 p14 rect  att0  1 1 1  "0"
	EExecPLPL &o24 &o25  o11 o12 o14 o13 o15 o16 o17 o18  att5 att5  1 1 1 1 1 1 1 1  "0"
	EExecPLPL &o26 &o27  o11 o12 o14 o13 o19 o21 o23 o22  att5 att5  1 1 1 1 1 1 1 1  "0"
	EExecP2 &p15  o24 o26  att0  1 1  "0"
	EExecP2 &p16  o25 o27  att0  1 1  "0"
	EExecCPP &c1  p1 p2 p15 p16  att0  1 1 1 1  "0"
	EExecD0 &d1  p15 c1  att0  1 1  "0"
	EExecD0 &d2  p16 c1  att0  1 1  "0"

	CreateCopy &out_Prm1 d1
	out_Prm1.FAtt=d1.FAtt

	CreateCopy &out_Prm2 d2
	out_Prm2.FAtt=d2.FAtt

	return true
) -- EExecSP4P