a := sp[1,1,1,1,1,1,1,1,1]+sp[2,2,1,1,1,1,1]+sp[1,1,1,1,1,1,1]+sp[2,2,2,1,1,1]
+sp[2,1,1,1,1,1]+sp[3,3,1,1,1]+sp[2,2,1,1,1]+2*sp[1,1,1,1,1]+sp[3,2,2,2]+sp[2,
2,2,1]+sp[2,1,1,1]+sp[2,2,1]+2*sp[1,1,1]+sp[1];