Users' Mathboxes Mathbox for Alexander van der Vekens < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  isassintop Structured version   Visualization version   GIF version

Theorem isassintop 47165
Description: The predicate "is an associative (closed internal binary) operations for a set". (Contributed by FL, 2-Nov-2009.) (Revised by AV, 20-Jan-2020.)
Assertion
Ref Expression
isassintop (𝑀𝑉 → ( ∈ ( assIntOp ‘𝑀) ↔ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))))
Distinct variable groups:   𝑥,𝑀,𝑦,𝑧   𝑥, ,𝑦,𝑧
Allowed substitution hints:   𝑉(𝑥,𝑦,𝑧)

Proof of Theorem isassintop
Dummy variable 𝑜 is distinct from all other variables.
StepHypRef Expression
1 assintopmap 47161 . . . . 5 (𝑀𝑉 → ( assIntOp ‘𝑀) = {𝑜 ∈ (𝑀m (𝑀 × 𝑀)) ∣ 𝑜 assLaw 𝑀})
21eleq2d 2813 . . . 4 (𝑀𝑉 → ( ∈ ( assIntOp ‘𝑀) ↔ ∈ {𝑜 ∈ (𝑀m (𝑀 × 𝑀)) ∣ 𝑜 assLaw 𝑀}))
3 breq1 5144 . . . . 5 (𝑜 = → (𝑜 assLaw 𝑀 assLaw 𝑀))
43elrab 3678 . . . 4 ( ∈ {𝑜 ∈ (𝑀m (𝑀 × 𝑀)) ∣ 𝑜 assLaw 𝑀} ↔ ( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀))
52, 4bitrdi 287 . . 3 (𝑀𝑉 → ( ∈ ( assIntOp ‘𝑀) ↔ ( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀)))
6 elmapi 8845 . . . . . 6 ( ∈ (𝑀m (𝑀 × 𝑀)) → :(𝑀 × 𝑀)⟶𝑀)
76ad2antrl 725 . . . . 5 ((𝑀𝑉 ∧ ( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀)) → :(𝑀 × 𝑀)⟶𝑀)
8 isasslaw 47147 . . . . . . . 8 (( ∈ (𝑀m (𝑀 × 𝑀)) ∧ 𝑀𝑉) → ( assLaw 𝑀 ↔ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))))
98biimpd 228 . . . . . . 7 (( ∈ (𝑀m (𝑀 × 𝑀)) ∧ 𝑀𝑉) → ( assLaw 𝑀 → ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))))
109impancom 451 . . . . . 6 (( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀) → (𝑀𝑉 → ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))))
1110impcom 407 . . . . 5 ((𝑀𝑉 ∧ ( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀)) → ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))
127, 11jca 511 . . . 4 ((𝑀𝑉 ∧ ( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀)) → ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))))
1312ex 412 . . 3 (𝑀𝑉 → (( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀) → ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))))
145, 13sylbid 239 . 2 (𝑀𝑉 → ( ∈ ( assIntOp ‘𝑀) → ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))))
15 isclintop 47162 . . . . . . 7 (𝑀𝑉 → ( ∈ ( clIntOp ‘𝑀) ↔ :(𝑀 × 𝑀)⟶𝑀))
1615biimprcd 249 . . . . . 6 ( :(𝑀 × 𝑀)⟶𝑀 → (𝑀𝑉 ∈ ( clIntOp ‘𝑀)))
1716adantr 480 . . . . 5 (( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))) → (𝑀𝑉 ∈ ( clIntOp ‘𝑀)))
1817impcom 407 . . . 4 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → ∈ ( clIntOp ‘𝑀))
19 sqxpexg 7739 . . . . . . . . 9 (𝑀𝑉 → (𝑀 × 𝑀) ∈ V)
20 fex 7223 . . . . . . . . 9 (( :(𝑀 × 𝑀)⟶𝑀 ∧ (𝑀 × 𝑀) ∈ V) → ∈ V)
2119, 20sylan2 592 . . . . . . . 8 (( :(𝑀 × 𝑀)⟶𝑀𝑀𝑉) → ∈ V)
2221ancoms 458 . . . . . . 7 ((𝑀𝑉 :(𝑀 × 𝑀)⟶𝑀) → ∈ V)
23 simpl 482 . . . . . . 7 ((𝑀𝑉 :(𝑀 × 𝑀)⟶𝑀) → 𝑀𝑉)
24 isasslaw 47147 . . . . . . . 8 (( ∈ V ∧ 𝑀𝑉) → ( assLaw 𝑀 ↔ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))))
2524bicomd 222 . . . . . . 7 (( ∈ V ∧ 𝑀𝑉) → (∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)) ↔ assLaw 𝑀))
2622, 23, 25syl2anc 583 . . . . . 6 ((𝑀𝑉 :(𝑀 × 𝑀)⟶𝑀) → (∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)) ↔ assLaw 𝑀))
2726biimpd 228 . . . . 5 ((𝑀𝑉 :(𝑀 × 𝑀)⟶𝑀) → (∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)) → assLaw 𝑀))
2827impr 454 . . . 4 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → assLaw 𝑀)
29 assintopval 47160 . . . . . . 7 (𝑀𝑉 → ( assIntOp ‘𝑀) = {𝑜 ∈ ( clIntOp ‘𝑀) ∣ 𝑜 assLaw 𝑀})
3029adantr 480 . . . . . 6 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → ( assIntOp ‘𝑀) = {𝑜 ∈ ( clIntOp ‘𝑀) ∣ 𝑜 assLaw 𝑀})
3130eleq2d 2813 . . . . 5 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → ( ∈ ( assIntOp ‘𝑀) ↔ ∈ {𝑜 ∈ ( clIntOp ‘𝑀) ∣ 𝑜 assLaw 𝑀}))
323elrab 3678 . . . . 5 ( ∈ {𝑜 ∈ ( clIntOp ‘𝑀) ∣ 𝑜 assLaw 𝑀} ↔ ( ∈ ( clIntOp ‘𝑀) ∧ assLaw 𝑀))
3331, 32bitrdi 287 . . . 4 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → ( ∈ ( assIntOp ‘𝑀) ↔ ( ∈ ( clIntOp ‘𝑀) ∧ assLaw 𝑀)))
3418, 28, 33mpbir2and 710 . . 3 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → ∈ ( assIntOp ‘𝑀))
3534ex 412 . 2 (𝑀𝑉 → (( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))) → ∈ ( assIntOp ‘𝑀)))
3614, 35impbid 211 1 (𝑀𝑉 → ( ∈ ( assIntOp ‘𝑀) ↔ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395   = wceq 1533  wcel 2098  wral 3055  {crab 3426  Vcvv 3468   class class class wbr 5141   × cxp 5667  wf 6533  cfv 6537  (class class class)co 7405  m cmap 8822   assLaw casslaw 47139   clIntOp cclintop 47152   assIntOp cassintop 47153
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2697  ax-rep 5278  ax-sep 5292  ax-nul 5299  ax-pow 5356  ax-pr 5420  ax-un 7722
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2704  df-cleq 2718  df-clel 2804  df-nfc 2879  df-ne 2935  df-ral 3056  df-rex 3065  df-reu 3371  df-rab 3427  df-v 3470  df-sbc 3773  df-csb 3889  df-dif 3946  df-un 3948  df-in 3950  df-ss 3960  df-nul 4318  df-if 4524  df-pw 4599  df-sn 4624  df-pr 4626  df-op 4630  df-uni 4903  df-iun 4992  df-br 5142  df-opab 5204  df-mpt 5225  df-id 5567  df-xp 5675  df-rel 5676  df-cnv 5677  df-co 5678  df-dm 5679  df-rn 5680  df-res 5681  df-ima 5682  df-iota 6489  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-ov 7408  df-oprab 7409  df-mpo 7410  df-1st 7974  df-2nd 7975  df-map 8824  df-asslaw 47143  df-intop 47154  df-clintop 47155  df-assintop 47156
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator