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