Theorem dedlemb 965

Description: Lemma for iffalse 3534. (Contributed by NM, 15-May-1999.) (Proof shortened by Andrew Salmon, 7-May-2011.)

Assertion

Ref	Expression
dedlemb	|- ( -. ph -> ( ch <-> ( ( ps /\ ph ) \/ ( ch /\ -. ph ) ) ) )

Proof of Theorem dedlemb

Step	Hyp	Ref	Expression
1		olc 706	. . 3 |- ( ( ch /\ -. ph ) -> ( ( ps /\ ph ) \/ ( ch /\ -. ph ) ) )
2	1	expcom 115	. 2 |- ( -. ph -> ( ch -> ( ( ps /\ ph ) \/ ( ch /\ -. ph ) ) ) )
3		pm2.21 612	. . . 4 |- ( -. ph -> ( ph -> ch ) )
4	3	adantld 276	. . 3 |- ( -. ph -> ( ( ps /\ ph ) -> ch ) )
5		simpl 108	. . . 4 |- ( ( ch /\ -. ph ) -> ch )
6	5	a1i 9	. . 3 |- ( -. ph -> ( ( ch /\ -. ph ) -> ch ) )
7	4, 6	jaod 712	. 2 |- ( -. ph -> ( ( ( ps /\ ph ) \/ ( ch /\ -. ph ) ) -> ch ) )
8	2, 7	impbid 128	1 |- ( -. ph -> ( ch <-> ( ( ps /\ ph ) \/ ( ch /\ -. ph ) ) ) )

Syntax hints:   -. wn 3   -> wi 4   /\ wa 103   <-> wb 104   \/ wo 703

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in2 610  ax-io 704

This theorem depends on definitions:  df-bi 116

This theorem is referenced by:  iffalse  3534