Theorem diftpsn3 3849

Description: Removal of a singleton from an unordered triple. (Contributed by Alexander van der Vekens, 5-Oct-2017.)

Assertion

Ref	Expression
diftpsn3	|- ((A =/= C /\ B =/= C) -> ({A, B, C} \ {C}) = {A, B})

Proof of Theorem diftpsn3

Step	Hyp	Ref	Expression
1		df-tp 3743	. . . 4 |- {A, B, C} = ({A, B} u. {C})
2	1	a1i 10	. . 3 |- ((A =/= C /\ B =/= C) -> {A, B, C} = ({A, B} u. {C}))
3	2	difeq1d 3384	. 2 |- ((A =/= C /\ B =/= C) -> ({A, B, C} \ {C}) = (({A, B} u. {C}) \ {C}))
4		difundir 3508	. . 3 |- (({A, B} u. {C}) \ {C}) = (({A, B} \ {C}) u. ({C} \ {C}))
5	4	a1i 10	. 2 |- ((A =/= C /\ B =/= C) -> (({A, B} u. {C}) \ {C}) = (({A, B} \ {C}) u. ({C} \ {C})))
6		df-pr 3742	. . . . . . . . 9 |- {A, B} = ({A} u. {B})
7	6	a1i 10	. . . . . . . 8 |- ((A =/= C /\ B =/= C) -> {A, B} = ({A} u. {B}))
8	7	ineq1d 3456	. . . . . . 7 |- ((A =/= C /\ B =/= C) -> ({A, B} i^i {C}) = (({A} u. {B}) i^i {C}))
9		incom 3448	. . . . . . . . 9 |- (({A} u. {B}) i^i {C}) = ({C} i^i ({A} u. {B}))
10		indi 3501	. . . . . . . . 9 |- ({C} i^i ({A} u. {B})) = (({C} i^i {A}) u. ({C} i^i {B}))
11	9, 10	eqtri 2373	. . . . . . . 8 |- (({A} u. {B}) i^i {C}) = (({C} i^i {A}) u. ({C} i^i {B}))
12	11	a1i 10	. . . . . . 7 |- ((A =/= C /\ B =/= C) -> (({A} u. {B}) i^i {C}) = (({C} i^i {A}) u. ({C} i^i {B})))
13		necom 2597	. . . . . . . . . . 11 |- (A =/= C <-> C =/= A)
14		disjsn2 3787	. . . . . . . . . . 11 |- (C =/= A -> ({C} i^i {A}) = (/))
15	13, 14	sylbi 187	. . . . . . . . . 10 |- (A =/= C -> ({C} i^i {A}) = (/))
16	15	adantr 451	. . . . . . . . 9 |- ((A =/= C /\ B =/= C) -> ({C} i^i {A}) = (/))
17		necom 2597	. . . . . . . . . . 11 |- (B =/= C <-> C =/= B)
18		disjsn2 3787	. . . . . . . . . . 11 |- (C =/= B -> ({C} i^i {B}) = (/))
19	17, 18	sylbi 187	. . . . . . . . . 10 |- (B =/= C -> ({C} i^i {B}) = (/))
20	19	adantl 452	. . . . . . . . 9 |- ((A =/= C /\ B =/= C) -> ({C} i^i {B}) = (/))
21	16, 20	uneq12d 3419	. . . . . . . 8 |- ((A =/= C /\ B =/= C) -> (({C} i^i {A}) u. ({C} i^i {B})) = ((/) u. (/)))
22		unidm 3407	. . . . . . . 8 |- ((/) u. (/)) = (/)
23	21, 22	syl6eq 2401	. . . . . . 7 |- ((A =/= C /\ B =/= C) -> (({C} i^i {A}) u. ({C} i^i {B})) = (/))
24	8, 12, 23	3eqtrd 2389	. . . . . 6 |- ((A =/= C /\ B =/= C) -> ({A, B} i^i {C}) = (/))
25		disj3 3595	. . . . . 6 |- (({A, B} i^i {C}) = (/) <-> {A, B} = ({A, B} \ {C}))
26	24, 25	sylib 188	. . . . 5 |- ((A =/= C /\ B =/= C) -> {A, B} = ({A, B} \ {C}))
27	26	eqcomd 2358	. . . 4 |- ((A =/= C /\ B =/= C) -> ({A, B} \ {C}) = {A, B})
28		difid 3618	. . . . 5 |- ({C} \ {C}) = (/)
29	28	a1i 10	. . . 4 |- ((A =/= C /\ B =/= C) -> ({C} \ {C}) = (/))
30	27, 29	uneq12d 3419	. . 3 |- ((A =/= C /\ B =/= C) -> (({A, B} \ {C}) u. ({C} \ {C})) = ({A, B} u. (/)))
31		un0 3575	. . 3 |- ({A, B} u. (/)) = {A, B}
32	30, 31	syl6eq 2401	. 2 |- ((A =/= C /\ B =/= C) -> (({A, B} \ {C}) u. ({C} \ {C})) = {A, B})
33	3, 5, 32	3eqtrd 2389	1 |- ((A =/= C /\ B =/= C) -> ({A, B, C} \ {C}) = {A, B})

Syntax hints:   -> wi 4   /\ wa 358   = wceq 1642   =/= wne 2516   \ cdif 3206   u. cun 3207   i^i cin 3208  (/)c0 3550  {csn 3737  {cpr 3738  {ctp 3739

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1546  ax-5 1557  ax-17 1616  ax-9 1654  ax-8 1675  ax-6 1729  ax-7 1734  ax-11 1746  ax-12 1925  ax-ext 2334

This theorem depends on definitions:  df-bi 177  df-or 359  df-an 360  df-nan 1288  df-tru 1319  df-ex 1542  df-nf 1545  df-sb 1649  df-clab 2340  df-cleq 2346  df-clel 2349  df-nfc 2478  df-ne 2518  df-ral 2619  df-v 2861  df-nin 3211  df-compl 3212  df-in 3213  df-un 3214  df-dif 3215  df-ss 3259  df-nul 3551  df-sn 3741  df-pr 3742  df-tp 3743

This theorem is referenced by: (None)