12345678910111213//put mirrored prims into a new group (name from string parameter)string grpName = ch("../outGrpName");int val;if(grpName != "") {val = i@mirror - prim(1, "mirror", @primnum);} else {//if not out name is given then use in name + mark all prims with mirror=1grpName = ch("../inGrpName");val = i@mirror;}setprimgroup(0, grpName, @primnum, val, "set");