Sfunction := (i, j, k, l, m, n) -> P(i,j,k,l,m,n)-3*P(i,j,k)*P(l,m,n)-3*P(i,j,
l)*P(k,m,n)-3*P(i,j,m)*P(k,l,n)-3*P(i,j,n)*P(k,l,m)-3*P(i,k,l)*P(j,m,n)-3*P(i,
k,m)*P(j,l,n)-3*P(i,k,n)*P(j,l,m)-3*P(i,l,m)*P(j,k,n)-3*P(i,l,n)*P(j,k,m)-3*P(
i,m,n)*P(j,k,l);