Implies(Implies(p,Implies(q,r)), Implies(Implies(p,~r),Implies(p,~q)))/