Exercise logic.propositional.consequence

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

Derivation

Final term is not finished
q => (p /\ q /\ p) || (~p /\ ~p) || (~q /\ ~p)
absorpand-subset, initial=TList [TVar "q"]
q => (p /\ q /\ p) || ~p || (~q /\ ~p)