Exercise logic.propositional.consequence

Description
Prove that formula is a logical consequence of a set of formulas

Derivation

p || (q /\ r) => ~p -> r

⇒ logic.propositional.oroverand, initial=TList [TCon logic1.or [TVar "p",TCon logic1.and [TVar "q",TVar "r"]]]

(p || q) /\ (p || r) => ~p -> r

⇒ logic.propositional.defimpl

(p || q) /\ (p || r) => ~~p || r

⇒ logic.propositional.notnot

(p || q) /\ (p || r) => p || r

⇒ conj-elim

p || r => p || r