fn EExecPLPO5 &out_Prm1 &out_Prm2 &out_Prm3 &out_Prm4 in_Prm1 in_Prm2 in_Prm3 in_Prm4 Att_1 Att_2 Att_3 Att_4 Sg1 Sg2 Sg3 Sg4 FM = ( if ((in_Prm1==undefined) or (in_Prm2==undefined) or (in_Prm3==undefined) or (in_Prm4==undefined)) then return false local o1,o4,o5,o6,o7 TOChisl_Create &Chisl1 (Complex -354.0 0.0) Att5 TOChisl_Create &Chisl2 (Complex 93.0 0.0) Att5 TOChisl_Create &Chisl3 (Complex -354.0 0.0) Att5 TOChisl_Create &Chisl4 (Complex -7.0 0.0) Att5 CreateCopy &p1 in_Prm1 p1.FAtt=in_Prm1.FAtt CreateCopy &p2 in_Prm2 p2.FAtt=in_Prm2.FAtt CreateCopy &o2 in_Prm3 o2.FAtt=in_Prm3.FAtt CreateCopy &o3 in_Prm4 o3.FAtt=in_Prm4.FAtt EExecO2 &o1 Chisl1 Chisl2 Chisl3 Chisl4 att5 1 1 1 1 "0" EExecO5 &o4 o2 p1 rect att5 1 1 1 "0" EExecO1 &o5 p2 Null att5 1 1 "0" EExecO5 &o6 o3 p2 rect att5 1 1 1 "0" EExecO1 &o7 p1 Null att5 1 1 "0" CreateCopy &out_Prm1 o4 out_Prm1.FAtt=o4.FAtt CreateCopy &out_Prm2 o5 out_Prm2.FAtt=o5.FAtt CreateCopy &out_Prm3 o7 out_Prm3.FAtt=o7.FAtt CreateCopy &out_Prm4 o6 out_Prm4.FAtt=o6.FAtt return true ) -- EExecPLPO5