have hba := not_or.mp h.right
α : Type u
r s : α → α → Prop
a b : α
h : ¬Lexcomb r s a b ∧ ¬Lexcomb r s b a
hab : ¬r a b ∧ ¬(Incomp r a b ∧ s a b)
⊢ Incomp r a b ∧ Incomp s a b
α : Type u
r s : α → α → Prop
a b : α
h : ¬Lexcomb r s a b ∧ ¬Lexcomb r s b a
hab : ¬r a b ∧ ¬(Incomp r a b ∧ s a b)
hba : ¬r b a ∧ ¬(Incomp r b a ∧ s b a)
⊢ Incomp r a b ∧ Incomp s a b