Exercise logic.propositional.consequence

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

Derivation

Final term is not finished

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

⇒ absorpand-subset, initial=TList [TCon logic1.or [TCon logic1.and [TCon logic1.not [TVar "p"],TCon logic1.or [TCon logic1.not [TVar "p"],TVar "r"]],TCon logic1.and [TVar "q",TCon logic1.or [TCon logic1.not [TVar "p"],TVar "r"]]]]

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