ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  brtpos2 GIF version

Theorem brtpos2 5920
Description: Value of the transposition at a pair 𝐴, 𝐵. (Contributed by Mario Carneiro, 10-Sep-2015.)
Assertion
Ref Expression
brtpos2 (𝐵𝑉 → (𝐴tpos 𝐹𝐵 ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵)))

Proof of Theorem brtpos2
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 reltpos 5919 . . . 4 Rel tpos 𝐹
21brrelexi 4430 . . 3 (𝐴tpos 𝐹𝐵𝐴 ∈ V)
32a1i 9 . 2 (𝐵𝑉 → (𝐴tpos 𝐹𝐵𝐴 ∈ V))
4 elex 2619 . . . 4 (𝐴 ∈ (dom 𝐹 ∪ {∅}) → 𝐴 ∈ V)
54adantr 270 . . 3 ((𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵) → 𝐴 ∈ V)
65a1i 9 . 2 (𝐵𝑉 → ((𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵) → 𝐴 ∈ V))
7 df-tpos 5914 . . . . . 6 tpos 𝐹 = (𝐹 ∘ (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥}))
87breqi 3811 . . . . 5 (𝐴tpos 𝐹𝐵𝐴(𝐹 ∘ (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥}))𝐵)
9 brcog 4550 . . . . 5 ((𝐴 ∈ V ∧ 𝐵𝑉) → (𝐴(𝐹 ∘ (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥}))𝐵 ↔ ∃𝑦(𝐴(𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})𝑦𝑦𝐹𝐵)))
108, 9syl5bb 190 . . . 4 ((𝐴 ∈ V ∧ 𝐵𝑉) → (𝐴tpos 𝐹𝐵 ↔ ∃𝑦(𝐴(𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})𝑦𝑦𝐹𝐵)))
11 funmpt 4988 . . . . . . . . . . 11 Fun (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})
12 funbrfv2b 5270 . . . . . . . . . . 11 (Fun (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥}) → (𝐴(𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})𝑦 ↔ (𝐴 ∈ dom (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥}) ∧ ((𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})‘𝐴) = 𝑦)))
1311, 12ax-mp 7 . . . . . . . . . 10 (𝐴(𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})𝑦 ↔ (𝐴 ∈ dom (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥}) ∧ ((𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})‘𝐴) = 𝑦))
14 vex 2613 . . . . . . . . . . . . . . . . 17 𝑥 ∈ V
15 snexg 3976 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ V → {𝑥} ∈ V)
1614, 15ax-mp 7 . . . . . . . . . . . . . . . 16 {𝑥} ∈ V
1716cnvex 4906 . . . . . . . . . . . . . . 15 {𝑥} ∈ V
1817uniex 4220 . . . . . . . . . . . . . 14 {𝑥} ∈ V
19 eqid 2083 . . . . . . . . . . . . . 14 (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥}) = (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})
2018, 19dmmpti 5079 . . . . . . . . . . . . 13 dom (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥}) = (dom 𝐹 ∪ {∅})
2120eleq2i 2149 . . . . . . . . . . . 12 (𝐴 ∈ dom (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥}) ↔ 𝐴 ∈ (dom 𝐹 ∪ {∅}))
22 eqcom 2085 . . . . . . . . . . . 12 (((𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})‘𝐴) = 𝑦𝑦 = ((𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})‘𝐴))
2321, 22anbi12i 448 . . . . . . . . . . 11 ((𝐴 ∈ dom (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥}) ∧ ((𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})‘𝐴) = 𝑦) ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦 = ((𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})‘𝐴)))
24 snexg 3976 . . . . . . . . . . . . . . . 16 (𝐴 ∈ (dom 𝐹 ∪ {∅}) → {𝐴} ∈ V)
25 cnvexg 4905 . . . . . . . . . . . . . . . 16 ({𝐴} ∈ V → {𝐴} ∈ V)
2624, 25syl 14 . . . . . . . . . . . . . . 15 (𝐴 ∈ (dom 𝐹 ∪ {∅}) → {𝐴} ∈ V)
27 uniexg 4221 . . . . . . . . . . . . . . 15 ({𝐴} ∈ V → {𝐴} ∈ V)
2826, 27syl 14 . . . . . . . . . . . . . 14 (𝐴 ∈ (dom 𝐹 ∪ {∅}) → {𝐴} ∈ V)
29 sneq 3427 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝐴 → {𝑥} = {𝐴})
3029cnveqd 4559 . . . . . . . . . . . . . . . 16 (𝑥 = 𝐴{𝑥} = {𝐴})
3130unieqd 3632 . . . . . . . . . . . . . . 15 (𝑥 = 𝐴 {𝑥} = {𝐴})
3231, 19fvmptg 5300 . . . . . . . . . . . . . 14 ((𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴} ∈ V) → ((𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})‘𝐴) = {𝐴})
3328, 32mpdan 412 . . . . . . . . . . . . 13 (𝐴 ∈ (dom 𝐹 ∪ {∅}) → ((𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})‘𝐴) = {𝐴})
3433eqeq2d 2094 . . . . . . . . . . . 12 (𝐴 ∈ (dom 𝐹 ∪ {∅}) → (𝑦 = ((𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})‘𝐴) ↔ 𝑦 = {𝐴}))
3534pm5.32i 442 . . . . . . . . . . 11 ((𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦 = ((𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})‘𝐴)) ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦 = {𝐴}))
3623, 35bitri 182 . . . . . . . . . 10 ((𝐴 ∈ dom (𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥}) ∧ ((𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})‘𝐴) = 𝑦) ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦 = {𝐴}))
3713, 36bitri 182 . . . . . . . . 9 (𝐴(𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})𝑦 ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦 = {𝐴}))
38 ancom 262 . . . . . . . . 9 ((𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦 = {𝐴}) ↔ (𝑦 = {𝐴} ∧ 𝐴 ∈ (dom 𝐹 ∪ {∅})))
3937, 38bitri 182 . . . . . . . 8 (𝐴(𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})𝑦 ↔ (𝑦 = {𝐴} ∧ 𝐴 ∈ (dom 𝐹 ∪ {∅})))
4039anbi1i 446 . . . . . . 7 ((𝐴(𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})𝑦𝑦𝐹𝐵) ↔ ((𝑦 = {𝐴} ∧ 𝐴 ∈ (dom 𝐹 ∪ {∅})) ∧ 𝑦𝐹𝐵))
41 anass 393 . . . . . . 7 (((𝑦 = {𝐴} ∧ 𝐴 ∈ (dom 𝐹 ∪ {∅})) ∧ 𝑦𝐹𝐵) ↔ (𝑦 = {𝐴} ∧ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵)))
4240, 41bitri 182 . . . . . 6 ((𝐴(𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})𝑦𝑦𝐹𝐵) ↔ (𝑦 = {𝐴} ∧ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵)))
4342exbii 1537 . . . . 5 (∃𝑦(𝐴(𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})𝑦𝑦𝐹𝐵) ↔ ∃𝑦(𝑦 = {𝐴} ∧ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵)))
44 exsimpr 1550 . . . . . . 7 (∃𝑦(𝑦 = {𝐴} ∧ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵)) → ∃𝑦(𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵))
45 exsimpl 1549 . . . . . . . 8 (∃𝑦(𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵) → ∃𝑦 𝐴 ∈ (dom 𝐹 ∪ {∅}))
46 19.9v 1794 . . . . . . . 8 (∃𝑦 𝐴 ∈ (dom 𝐹 ∪ {∅}) ↔ 𝐴 ∈ (dom 𝐹 ∪ {∅}))
4745, 46sylib 120 . . . . . . 7 (∃𝑦(𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵) → 𝐴 ∈ (dom 𝐹 ∪ {∅}))
4844, 47syl 14 . . . . . 6 (∃𝑦(𝑦 = {𝐴} ∧ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵)) → 𝐴 ∈ (dom 𝐹 ∪ {∅}))
49 simpl 107 . . . . . 6 ((𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵) → 𝐴 ∈ (dom 𝐹 ∪ {∅}))
50 breq1 3808 . . . . . . . . 9 (𝑦 = {𝐴} → (𝑦𝐹𝐵 {𝐴}𝐹𝐵))
5150anbi2d 452 . . . . . . . 8 (𝑦 = {𝐴} → ((𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵) ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵)))
5251ceqsexgv 2732 . . . . . . 7 ( {𝐴} ∈ V → (∃𝑦(𝑦 = {𝐴} ∧ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵)) ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵)))
5328, 52syl 14 . . . . . 6 (𝐴 ∈ (dom 𝐹 ∪ {∅}) → (∃𝑦(𝑦 = {𝐴} ∧ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵)) ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵)))
5448, 49, 53pm5.21nii 653 . . . . 5 (∃𝑦(𝑦 = {𝐴} ∧ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ 𝑦𝐹𝐵)) ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵))
5543, 54bitri 182 . . . 4 (∃𝑦(𝐴(𝑥 ∈ (dom 𝐹 ∪ {∅}) ↦ {𝑥})𝑦𝑦𝐹𝐵) ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵))
5610, 55syl6bb 194 . . 3 ((𝐴 ∈ V ∧ 𝐵𝑉) → (𝐴tpos 𝐹𝐵 ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵)))
5756expcom 114 . 2 (𝐵𝑉 → (𝐴 ∈ V → (𝐴tpos 𝐹𝐵 ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵))))
583, 6, 57pm5.21ndd 654 1 (𝐵𝑉 → (𝐴tpos 𝐹𝐵 ↔ (𝐴 ∈ (dom 𝐹 ∪ {∅}) ∧ {𝐴}𝐹𝐵)))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 102  wb 103   = wceq 1285  wex 1422  wcel 1434  Vcvv 2610  cun 2980  c0 3267  {csn 3416   cuni 3621   class class class wbr 3805  cmpt 3859  ccnv 4390  dom cdm 4391  ccom 4395  Fun wfun 4946  cfv 4952  tpos ctpos 5913
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-io 663  ax-5 1377  ax-7 1378  ax-gen 1379  ax-ie1 1423  ax-ie2 1424  ax-8 1436  ax-10 1437  ax-11 1438  ax-i12 1439  ax-bndl 1440  ax-4 1441  ax-13 1445  ax-14 1446  ax-17 1460  ax-i9 1464  ax-ial 1468  ax-i5r 1469  ax-ext 2065  ax-sep 3916  ax-pow 3968  ax-pr 3992  ax-un 4216
This theorem depends on definitions:  df-bi 115  df-3an 922  df-tru 1288  df-nf 1391  df-sb 1688  df-eu 1946  df-mo 1947  df-clab 2070  df-cleq 2076  df-clel 2079  df-nfc 2212  df-ral 2358  df-rex 2359  df-rab 2362  df-v 2612  df-sbc 2825  df-un 2986  df-in 2988  df-ss 2995  df-pw 3402  df-sn 3422  df-pr 3423  df-op 3425  df-uni 3622  df-br 3806  df-opab 3860  df-mpt 3861  df-id 4076  df-xp 4397  df-rel 4398  df-cnv 4399  df-co 4400  df-dm 4401  df-rn 4402  df-res 4403  df-ima 4404  df-iota 4917  df-fun 4954  df-fn 4955  df-fv 4960  df-tpos 5914
This theorem is referenced by:  brtpos0  5921  reldmtpos  5922  brtposg  5923  dftpos4  5932  tpostpos  5933
  Copyright terms: Public domain W3C validator