Users' Mathboxes Mathbox for Alan Sare < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  onfrALTlem5VD Structured version   Visualization version   GIF version

Theorem onfrALTlem5VD 42458
Description: Virtual deduction proof of onfrALTlem5 42115. The following User's Proof is a Virtual Deduction proof completed automatically by the tools program completeusersproof.cmd, which invokes Mel L. O'Cat's mmj2 and Norm Megill's Metamath Proof Assistant. onfrALTlem5 42115 is onfrALTlem5VD 42458 without virtual deductions and was automatically derived from onfrALTlem5VD 42458.
1:: 𝑎 ∈ V
2:1: (𝑎𝑥) ∈ V
3:2: ([(𝑎𝑥) / 𝑏]𝑏 = ∅ ↔ (𝑎 𝑥) = ∅)
4:3: [(𝑎𝑥) / 𝑏]𝑏 = ∅ ↔ ¬ (𝑎𝑥) = ∅)
5:: ((𝑎𝑥) ≠ ∅ ↔ ¬ (𝑎𝑥 ) = ∅)
6:4,5: [(𝑎𝑥) / 𝑏]𝑏 = ∅ ↔ (𝑎𝑥) ≠ ∅)
7:2: [(𝑎𝑥) / 𝑏]𝑏 = ∅ ↔ [(𝑎𝑥) / 𝑏]¬ 𝑏 = ∅)
8:: (𝑏 ≠ ∅ ↔ ¬ 𝑏 = ∅)
9:8: 𝑏(𝑏 ≠ ∅ ↔ ¬ 𝑏 = ∅)
10:2,9: ([(𝑎𝑥) / 𝑏]𝑏 ≠ ∅ ↔ [(𝑎𝑥) / 𝑏]¬ 𝑏 = ∅)
11:7,10: [(𝑎𝑥) / 𝑏]𝑏 = ∅ ↔ [(𝑎𝑥) / 𝑏]𝑏 ≠ ∅)
12:6,11: ([(𝑎𝑥) / 𝑏]𝑏 ≠ ∅ ↔ ( 𝑎𝑥) ≠ ∅)
13:2: ([(𝑎𝑥) / 𝑏]𝑏 ⊆ (𝑎𝑥 ) ↔ (𝑎𝑥) ⊆ (𝑎𝑥))
14:12,13: (([(𝑎𝑥) / 𝑏]𝑏 ⊆ (𝑎 𝑥) ∧ [(𝑎𝑥) / 𝑏]𝑏 ≠ ∅) ↔ ((𝑎𝑥) ⊆ (𝑎 𝑥) ∧ (𝑎𝑥) ≠ ∅))
15:2: ([(𝑎𝑥) / 𝑏](𝑏 ⊆ (𝑎 𝑥) ∧ 𝑏 ≠ ∅) ↔ ([(𝑎𝑥) / 𝑏]𝑏 ⊆ (𝑎𝑥) ∧ [(𝑎𝑥) / 𝑏]𝑏 ≠ ∅))
16:15,14: ([(𝑎𝑥) / 𝑏](𝑏 ⊆ (𝑎 𝑥) ∧ 𝑏 ≠ ∅) ↔ ((𝑎𝑥) ⊆ (𝑎𝑥) ∧ (𝑎𝑥) ≠ ∅))
17:2: (𝑎𝑥) / 𝑏(𝑏𝑦) = ( (𝑎𝑥) / 𝑏𝑏(𝑎𝑥) / 𝑏𝑦)
18:2: (𝑎𝑥) / 𝑏𝑏 = (𝑎𝑥)
19:2: (𝑎𝑥) / 𝑏𝑦 = 𝑦
20:18,19: ((𝑎𝑥) / 𝑏𝑏(𝑎 𝑥) / 𝑏𝑦) = ((𝑎𝑥) ∩ 𝑦)
21:17,20: (𝑎𝑥) / 𝑏(𝑏𝑦) = (( 𝑎𝑥) ∩ 𝑦)
22:2: ([(𝑎𝑥) / 𝑏](𝑏𝑦) = ∅ ↔ (𝑎𝑥) / 𝑏(𝑏𝑦) = (𝑎𝑥) / 𝑏 ∅)
23:2: (𝑎𝑥) / 𝑏∅ = ∅
24:21,23: ((𝑎𝑥) / 𝑏(𝑏𝑦) = (𝑎𝑥) / 𝑏∅ ↔ ((𝑎𝑥) ∩ 𝑦) = ∅)
25:22,24: ([(𝑎𝑥) / 𝑏](𝑏𝑦) = ∅ ↔ ((𝑎𝑥) ∩ 𝑦) = ∅)
26:2: ([(𝑎𝑥) / 𝑏]𝑦𝑏𝑦 (𝑎𝑥))
27:25,26: (([(𝑎𝑥) / 𝑏]𝑦𝑏[ (𝑎𝑥) / 𝑏](𝑏𝑦) = ∅) ↔ (𝑦 ∈ (𝑎𝑥) ∧ (( 𝑎𝑥) ∩ 𝑦) = ∅))
28:2: ([(𝑎𝑥) / 𝑏](𝑦𝑏 ∧ (𝑏 𝑦) = ∅) ↔ ([(𝑎𝑥) / 𝑏]𝑦𝑏[(𝑎𝑥) / 𝑏](𝑏𝑦) = ∅))
29:27,28: ([(𝑎𝑥) / 𝑏](𝑦𝑏 ∧ (𝑏 𝑦) = ∅) ↔ (𝑦 ∈ (𝑎𝑥) ∧ ((𝑎𝑥) ∩ 𝑦) = ∅))
30:29: 𝑦([(𝑎𝑥) / 𝑏](𝑦𝑏 ∧ (𝑏𝑦) = ∅) ↔ (𝑦 ∈ (𝑎𝑥) ∧ ((𝑎𝑥) ∩ 𝑦) = ∅))
31:30: (∃𝑦[(𝑎𝑥) / 𝑏](𝑦𝑏 ∧ (𝑏𝑦) = ∅) ↔ ∃𝑦(𝑦 ∈ (𝑎𝑥) ∧ ((𝑎𝑥) 𝑦) = ∅))
32:: (∃𝑦 ∈ (𝑎𝑥)((𝑎𝑥) ∩ 𝑦) = ∅ ↔ ∃𝑦(𝑦 ∈ (𝑎𝑥) ∧ ((𝑎𝑥) ∩ 𝑦) = ∅ ))
33:31,32: (∃𝑦[(𝑎𝑥) / 𝑏](𝑦𝑏 ∧ (𝑏𝑦) = ∅) ↔ ∃𝑦 ∈ (𝑎𝑥)((𝑎𝑥) ∩ 𝑦) = ∅)
34:2: (∃𝑦[(𝑎𝑥) / 𝑏](𝑦𝑏 ∧ (𝑏𝑦) = ∅) ↔ [(𝑎𝑥) / 𝑏]𝑦(𝑦𝑏 ∧ ( 𝑏𝑦) = ∅))
35:33,34: ([(𝑎𝑥) / 𝑏]𝑦(𝑦𝑏 ∧ (𝑏𝑦) = ∅) ↔ ∃𝑦 ∈ (𝑎𝑥)((𝑎𝑥) ∩ 𝑦 ) = ∅)
36:: (∃𝑦𝑏(𝑏𝑦) = ∅ ↔ ∃𝑦 (𝑦𝑏 ∧ (𝑏𝑦) = ∅))
37:36: 𝑏(∃𝑦𝑏(𝑏𝑦) = ∅ ↔ 𝑦(𝑦𝑏 ∧ (𝑏𝑦) = ∅))
38:2,37: ([(𝑎𝑥) / 𝑏]𝑦𝑏(𝑏 𝑦) = ∅ ↔ [(𝑎𝑥) / 𝑏]𝑦(𝑦𝑏 ∧ (𝑏𝑦) = ∅))
39:35,38: ([(𝑎𝑥) / 𝑏]𝑦𝑏(𝑏 𝑦) = ∅ ↔ ∃𝑦 ∈ (𝑎𝑥)((𝑎𝑥) ∩ 𝑦) = ∅)
40:16,39: (([(𝑎𝑥) / 𝑏](𝑏 ⊆ (𝑎 𝑥) ∧ 𝑏 ≠ ∅) → [(𝑎𝑥) / 𝑏]𝑦𝑏(𝑏 𝑦) = ∅) ↔ (((𝑎𝑥) ⊆ (𝑎𝑥) ∧ (𝑎𝑥) ≠ ∅) → ∃𝑦 ∈ (𝑎𝑥)((𝑎𝑥) ∩ 𝑦) = ∅))
41:2: ([(𝑎𝑥) / 𝑏]((𝑏 ⊆ (𝑎 𝑥) ∧ 𝑏 ≠ ∅) → ∃𝑦𝑏(𝑏𝑦) = ∅) ↔ ([(𝑎 𝑥) / 𝑏](𝑏 ⊆ (𝑎𝑥) ∧ 𝑏 ≠ ∅) → [(𝑎𝑥) / 𝑏]𝑦𝑏(𝑏𝑦) = ∅))
qed:40,41: ([(𝑎𝑥) / 𝑏]((𝑏 ⊆ (𝑎 𝑥) ∧ 𝑏 ≠ ∅) → ∃𝑦𝑏(𝑏𝑦) = ∅) ↔ (((𝑎 𝑥) ⊆ (𝑎𝑥) ∧ (𝑎𝑥) ≠ ∅) → ∃𝑦 ∈ (𝑎𝑥 )((𝑎𝑥) ∩ 𝑦) = ∅))
(Contributed by Alan Sare, 22-Jul-2012.) (Proof modification is discouraged.) (New usage is discouraged.)
Assertion
Ref Expression
onfrALTlem5VD ([(𝑎𝑥) / 𝑏]((𝑏 ⊆ (𝑎𝑥) ∧ 𝑏 ≠ ∅) → ∃𝑦𝑏 (𝑏𝑦) = ∅) ↔ (((𝑎𝑥) ⊆ (𝑎𝑥) ∧ (𝑎𝑥) ≠ ∅) → ∃𝑦 ∈ (𝑎𝑥)((𝑎𝑥) ∩ 𝑦) = ∅))
Distinct variable groups:   𝑎,𝑏,𝑦   𝑥,𝑏,𝑦

Proof of Theorem onfrALTlem5VD
StepHypRef Expression
1 vex 3434 . . . 4 𝑎 ∈ V
21inex1 5244 . . 3 (𝑎𝑥) ∈ V
3 sbcimg 3770 . . 3 ((𝑎𝑥) ∈ V → ([(𝑎𝑥) / 𝑏]((𝑏 ⊆ (𝑎𝑥) ∧ 𝑏 ≠ ∅) → ∃𝑦𝑏 (𝑏𝑦) = ∅) ↔ ([(𝑎𝑥) / 𝑏](𝑏 ⊆ (𝑎𝑥) ∧ 𝑏 ≠ ∅) → [(𝑎𝑥) / 𝑏]𝑦𝑏 (𝑏𝑦) = ∅)))
42, 3e0a 42345 . 2 ([(𝑎𝑥) / 𝑏]((𝑏 ⊆ (𝑎𝑥) ∧ 𝑏 ≠ ∅) → ∃𝑦𝑏 (𝑏𝑦) = ∅) ↔ ([(𝑎𝑥) / 𝑏](𝑏 ⊆ (𝑎𝑥) ∧ 𝑏 ≠ ∅) → [(𝑎𝑥) / 𝑏]𝑦𝑏 (𝑏𝑦) = ∅))
5 sbcan 3771 . . . 4 ([(𝑎𝑥) / 𝑏](𝑏 ⊆ (𝑎𝑥) ∧ 𝑏 ≠ ∅) ↔ ([(𝑎𝑥) / 𝑏]𝑏 ⊆ (𝑎𝑥) ∧ [(𝑎𝑥) / 𝑏]𝑏 ≠ ∅))
6 sseq1 3950 . . . . . 6 (𝑏 = (𝑎𝑥) → (𝑏 ⊆ (𝑎𝑥) ↔ (𝑎𝑥) ⊆ (𝑎𝑥)))
72, 6sbcie 3762 . . . . 5 ([(𝑎𝑥) / 𝑏]𝑏 ⊆ (𝑎𝑥) ↔ (𝑎𝑥) ⊆ (𝑎𝑥))
8 df-ne 2945 . . . . . . 7 (𝑏 ≠ ∅ ↔ ¬ 𝑏 = ∅)
98sbcbii 3780 . . . . . 6 ([(𝑎𝑥) / 𝑏]𝑏 ≠ ∅ ↔ [(𝑎𝑥) / 𝑏] ¬ 𝑏 = ∅)
10 sbcng 3769 . . . . . . . 8 ((𝑎𝑥) ∈ V → ([(𝑎𝑥) / 𝑏] ¬ 𝑏 = ∅ ↔ ¬ [(𝑎𝑥) / 𝑏]𝑏 = ∅))
1110bicomd 222 . . . . . . 7 ((𝑎𝑥) ∈ V → (¬ [(𝑎𝑥) / 𝑏]𝑏 = ∅ ↔ [(𝑎𝑥) / 𝑏] ¬ 𝑏 = ∅))
122, 11e0a 42345 . . . . . 6 [(𝑎𝑥) / 𝑏]𝑏 = ∅ ↔ [(𝑎𝑥) / 𝑏] ¬ 𝑏 = ∅)
13 eqsbc1 3768 . . . . . . . 8 ((𝑎𝑥) ∈ V → ([(𝑎𝑥) / 𝑏]𝑏 = ∅ ↔ (𝑎𝑥) = ∅))
142, 13e0a 42345 . . . . . . 7 ([(𝑎𝑥) / 𝑏]𝑏 = ∅ ↔ (𝑎𝑥) = ∅)
1514necon3bbii 2992 . . . . . 6 [(𝑎𝑥) / 𝑏]𝑏 = ∅ ↔ (𝑎𝑥) ≠ ∅)
169, 12, 153bitr2i 298 . . . . 5 ([(𝑎𝑥) / 𝑏]𝑏 ≠ ∅ ↔ (𝑎𝑥) ≠ ∅)
177, 16anbi12i 626 . . . 4 (([(𝑎𝑥) / 𝑏]𝑏 ⊆ (𝑎𝑥) ∧ [(𝑎𝑥) / 𝑏]𝑏 ≠ ∅) ↔ ((𝑎𝑥) ⊆ (𝑎𝑥) ∧ (𝑎𝑥) ≠ ∅))
185, 17bitri 274 . . 3 ([(𝑎𝑥) / 𝑏](𝑏 ⊆ (𝑎𝑥) ∧ 𝑏 ≠ ∅) ↔ ((𝑎𝑥) ⊆ (𝑎𝑥) ∧ (𝑎𝑥) ≠ ∅))
19 df-rex 3071 . . . . 5 (∃𝑦𝑏 (𝑏𝑦) = ∅ ↔ ∃𝑦(𝑦𝑏 ∧ (𝑏𝑦) = ∅))
2019sbcbii 3780 . . . 4 ([(𝑎𝑥) / 𝑏]𝑦𝑏 (𝑏𝑦) = ∅ ↔ [(𝑎𝑥) / 𝑏]𝑦(𝑦𝑏 ∧ (𝑏𝑦) = ∅))
21 sbcan 3771 . . . . . . 7 ([(𝑎𝑥) / 𝑏](𝑦𝑏 ∧ (𝑏𝑦) = ∅) ↔ ([(𝑎𝑥) / 𝑏]𝑦𝑏[(𝑎𝑥) / 𝑏](𝑏𝑦) = ∅))
22 sbcel2gv 3792 . . . . . . . . 9 ((𝑎𝑥) ∈ V → ([(𝑎𝑥) / 𝑏]𝑦𝑏𝑦 ∈ (𝑎𝑥)))
232, 22e0a 42345 . . . . . . . 8 ([(𝑎𝑥) / 𝑏]𝑦𝑏𝑦 ∈ (𝑎𝑥))
24 sbceqg 4348 . . . . . . . . . 10 ((𝑎𝑥) ∈ V → ([(𝑎𝑥) / 𝑏](𝑏𝑦) = ∅ ↔ (𝑎𝑥) / 𝑏(𝑏𝑦) = (𝑎𝑥) / 𝑏∅))
252, 24e0a 42345 . . . . . . . . 9 ([(𝑎𝑥) / 𝑏](𝑏𝑦) = ∅ ↔ (𝑎𝑥) / 𝑏(𝑏𝑦) = (𝑎𝑥) / 𝑏∅)
26 csbin 4378 . . . . . . . . . . 11 (𝑎𝑥) / 𝑏(𝑏𝑦) = ((𝑎𝑥) / 𝑏𝑏(𝑎𝑥) / 𝑏𝑦)
27 csbvarg 4370 . . . . . . . . . . . . 13 ((𝑎𝑥) ∈ V → (𝑎𝑥) / 𝑏𝑏 = (𝑎𝑥))
282, 27e0a 42345 . . . . . . . . . . . 12 (𝑎𝑥) / 𝑏𝑏 = (𝑎𝑥)
29 csbconstg 3855 . . . . . . . . . . . . 13 ((𝑎𝑥) ∈ V → (𝑎𝑥) / 𝑏𝑦 = 𝑦)
302, 29e0a 42345 . . . . . . . . . . . 12 (𝑎𝑥) / 𝑏𝑦 = 𝑦
3128, 30ineq12i 4149 . . . . . . . . . . 11 ((𝑎𝑥) / 𝑏𝑏(𝑎𝑥) / 𝑏𝑦) = ((𝑎𝑥) ∩ 𝑦)
3226, 31eqtri 2767 . . . . . . . . . 10 (𝑎𝑥) / 𝑏(𝑏𝑦) = ((𝑎𝑥) ∩ 𝑦)
33 csb0 4346 . . . . . . . . . 10 (𝑎𝑥) / 𝑏∅ = ∅
3432, 33eqeq12i 2757 . . . . . . . . 9 ((𝑎𝑥) / 𝑏(𝑏𝑦) = (𝑎𝑥) / 𝑏∅ ↔ ((𝑎𝑥) ∩ 𝑦) = ∅)
3525, 34bitri 274 . . . . . . . 8 ([(𝑎𝑥) / 𝑏](𝑏𝑦) = ∅ ↔ ((𝑎𝑥) ∩ 𝑦) = ∅)
3623, 35anbi12i 626 . . . . . . 7 (([(𝑎𝑥) / 𝑏]𝑦𝑏[(𝑎𝑥) / 𝑏](𝑏𝑦) = ∅) ↔ (𝑦 ∈ (𝑎𝑥) ∧ ((𝑎𝑥) ∩ 𝑦) = ∅))
3721, 36bitri 274 . . . . . 6 ([(𝑎𝑥) / 𝑏](𝑦𝑏 ∧ (𝑏𝑦) = ∅) ↔ (𝑦 ∈ (𝑎𝑥) ∧ ((𝑎𝑥) ∩ 𝑦) = ∅))
3837exbii 1853 . . . . 5 (∃𝑦[(𝑎𝑥) / 𝑏](𝑦𝑏 ∧ (𝑏𝑦) = ∅) ↔ ∃𝑦(𝑦 ∈ (𝑎𝑥) ∧ ((𝑎𝑥) ∩ 𝑦) = ∅))
39 sbcex2 3785 . . . . 5 ([(𝑎𝑥) / 𝑏]𝑦(𝑦𝑏 ∧ (𝑏𝑦) = ∅) ↔ ∃𝑦[(𝑎𝑥) / 𝑏](𝑦𝑏 ∧ (𝑏𝑦) = ∅))
40 df-rex 3071 . . . . 5 (∃𝑦 ∈ (𝑎𝑥)((𝑎𝑥) ∩ 𝑦) = ∅ ↔ ∃𝑦(𝑦 ∈ (𝑎𝑥) ∧ ((𝑎𝑥) ∩ 𝑦) = ∅))
4138, 39, 403bitr4i 302 . . . 4 ([(𝑎𝑥) / 𝑏]𝑦(𝑦𝑏 ∧ (𝑏𝑦) = ∅) ↔ ∃𝑦 ∈ (𝑎𝑥)((𝑎𝑥) ∩ 𝑦) = ∅)
4220, 41bitri 274 . . 3 ([(𝑎𝑥) / 𝑏]𝑦𝑏 (𝑏𝑦) = ∅ ↔ ∃𝑦 ∈ (𝑎𝑥)((𝑎𝑥) ∩ 𝑦) = ∅)
4318, 42imbi12i 350 . 2 (([(𝑎𝑥) / 𝑏](𝑏 ⊆ (𝑎𝑥) ∧ 𝑏 ≠ ∅) → [(𝑎𝑥) / 𝑏]𝑦𝑏 (𝑏𝑦) = ∅) ↔ (((𝑎𝑥) ⊆ (𝑎𝑥) ∧ (𝑎𝑥) ≠ ∅) → ∃𝑦 ∈ (𝑎𝑥)((𝑎𝑥) ∩ 𝑦) = ∅))
444, 43bitri 274 1 ([(𝑎𝑥) / 𝑏]((𝑏 ⊆ (𝑎𝑥) ∧ 𝑏 ≠ ∅) → ∃𝑦𝑏 (𝑏𝑦) = ∅) ↔ (((𝑎𝑥) ⊆ (𝑎𝑥) ∧ (𝑎𝑥) ≠ ∅) → ∃𝑦 ∈ (𝑎𝑥)((𝑎𝑥) ∩ 𝑦) = ∅))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 395   = wceq 1541  wex 1785  wcel 2109  wne 2944  wrex 3066  Vcvv 3430  [wsbc 3719  csb 3836  cin 3890  wss 3891  c0 4261
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1801  ax-4 1815  ax-5 1916  ax-6 1974  ax-7 2014  ax-8 2111  ax-9 2119  ax-10 2140  ax-11 2157  ax-12 2174  ax-ext 2710  ax-sep 5226
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3an 1087  df-tru 1544  df-fal 1554  df-ex 1786  df-nf 1790  df-sb 2071  df-clab 2717  df-cleq 2731  df-clel 2817  df-nfc 2890  df-ne 2945  df-rex 3071  df-rab 3074  df-v 3432  df-sbc 3720  df-csb 3837  df-dif 3894  df-in 3898  df-ss 3908  df-nul 4262
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator