Exercise logic.propositional.consequence

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

Derivation

Final term is not finished
p -> (q /\ r) => (p /\ q /\ p /\ r) || (~(p /\ q) /\ ~(p /\ r))
logic.propositional.demorganand, initial=TList [TCon logic1.implies [TVar "p",TCon logic1.and [TVar "q",TVar "r"]]]
p -> (q /\ r) => (p /\ q /\ p /\ r) || ((~p || ~q) /\ ~(p /\ r))
logic.propositional.demorganand
p -> (q /\ r) => (p /\ q /\ p /\ r) || ((~p || ~q) /\ (~p || ~r))
absorpand-subset
p -> (q /\ r) => (p /\ q /\ r) || ((~p || ~q) /\ (~p || ~r))