Theorem ackbij1lem2 8926

Description: Lemma for ackbij2 8948. (Contributed by Stefan O'Rear, 18-Nov-2014.)

Assertion

Ref	Expression
ackbij1lem2	⊢ (𝐴 ∈ 𝐵 → (𝐵 ∩ suc 𝐴) = ({𝐴} ∪ (𝐵 ∩ 𝐴)))

Proof of Theorem ackbij1lem2

Step	Hyp	Ref	Expression
1		df-suc 5646	. . . 4 ⊢ suc 𝐴 = (𝐴 ∪ {𝐴})
2	1	ineq2i 3773	. . 3 ⊢ (𝐵 ∩ suc 𝐴) = (𝐵 ∩ (𝐴 ∪ {𝐴}))
3		indi 3832	. . 3 ⊢ (𝐵 ∩ (𝐴 ∪ {𝐴})) = ((𝐵 ∩ 𝐴) ∪ (𝐵 ∩ {𝐴}))
4		uncom 3719	. . 3 ⊢ ((𝐵 ∩ 𝐴) ∪ (𝐵 ∩ {𝐴})) = ((𝐵 ∩ {𝐴}) ∪ (𝐵 ∩ 𝐴))
5	2, 3, 4	3eqtri 2636	. 2 ⊢ (𝐵 ∩ suc 𝐴) = ((𝐵 ∩ {𝐴}) ∪ (𝐵 ∩ 𝐴))
6		snssi 4280	. . . 4 ⊢ (𝐴 ∈ 𝐵 → {𝐴} ⊆ 𝐵)
7		sseqin2 3779	. . . 4 ⊢ ({𝐴} ⊆ 𝐵 ↔ (𝐵 ∩ {𝐴}) = {𝐴})
8	6, 7	sylib 207	. . 3 ⊢ (𝐴 ∈ 𝐵 → (𝐵 ∩ {𝐴}) = {𝐴})
9	8	uneq1d 3728	. 2 ⊢ (𝐴 ∈ 𝐵 → ((𝐵 ∩ {𝐴}) ∪ (𝐵 ∩ 𝐴)) = ({𝐴} ∪ (𝐵 ∩ 𝐴)))
10	5, 9	syl5eq 2656	1 ⊢ (𝐴 ∈ 𝐵 → (𝐵 ∩ suc 𝐴) = ({𝐴} ∪ (𝐵 ∩ 𝐴)))

Syntax hints:   → wi 4   = wceq 1475   ∈ wcel 1977   ∪ cun 3538   ∩ cin 3539   ⊆ wss 3540  {csn 4125  suc csuc 5642

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-v 3175  df-un 3545  df-in 3547  df-ss 3554  df-sn 4126  df-suc 5646

This theorem is referenced by:  ackbij1lem15  8939  ackbij1lem16  8940