(\[LeftBracketingBar](Subscript[ψ, ±])⟩=(1/(Sqrt[2]))((Subscript[\[LeftBracketingBar]α⟩, A])(Subscript[\[LeftBracketingBar]α⟩, B])±(Subscript[\[LeftBracketingBar]-α⟩, A])(Subscript[\[LeftBracketingBar]-α⟩, B]))(Eqn.   1))