(E((Subscript[s, 1]),…   ,(Subscript[s, N]))=-(∑_(i=1)^N) (Subscript[h, i])(Subscript[s, i])+(∑_(i=1)^N) (∑_(j>i)^N)(Subscript[J, ij])(Subscript[s, i])(Subscript[s, j]),(8))