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 47524
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 47520 . . . . 5 (𝑀𝑉 → ( assIntOp ‘𝑀) = {𝑜 ∈ (𝑀m (𝑀 × 𝑀)) ∣ 𝑜 assLaw 𝑀})
21eleq2d 2811 . . . 4 (𝑀𝑉 → ( ∈ ( assIntOp ‘𝑀) ↔ ∈ {𝑜 ∈ (𝑀m (𝑀 × 𝑀)) ∣ 𝑜 assLaw 𝑀}))
3 breq1 5155 . . . . 5 (𝑜 = → (𝑜 assLaw 𝑀 assLaw 𝑀))
43elrab 3680 . . . 4 ( ∈ {𝑜 ∈ (𝑀m (𝑀 × 𝑀)) ∣ 𝑜 assLaw 𝑀} ↔ ( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀))
52, 4bitrdi 286 . . 3 (𝑀𝑉 → ( ∈ ( assIntOp ‘𝑀) ↔ ( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀)))
6 elmapi 8877 . . . . . 6 ( ∈ (𝑀m (𝑀 × 𝑀)) → :(𝑀 × 𝑀)⟶𝑀)
76ad2antrl 726 . . . . 5 ((𝑀𝑉 ∧ ( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀)) → :(𝑀 × 𝑀)⟶𝑀)
8 isasslaw 47506 . . . . . . . 8 (( ∈ (𝑀m (𝑀 × 𝑀)) ∧ 𝑀𝑉) → ( assLaw 𝑀 ↔ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))))
98biimpd 228 . . . . . . 7 (( ∈ (𝑀m (𝑀 × 𝑀)) ∧ 𝑀𝑉) → ( assLaw 𝑀 → ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))))
109impancom 450 . . . . . 6 (( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀) → (𝑀𝑉 → ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))))
1110impcom 406 . . . . 5 ((𝑀𝑉 ∧ ( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀)) → ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))
127, 11jca 510 . . . 4 ((𝑀𝑉 ∧ ( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀)) → ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))))
1312ex 411 . . 3 (𝑀𝑉 → (( ∈ (𝑀m (𝑀 × 𝑀)) ∧ assLaw 𝑀) → ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))))
145, 13sylbid 239 . 2 (𝑀𝑉 → ( ∈ ( assIntOp ‘𝑀) → ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))))
15 isclintop 47521 . . . . . . 7 (𝑀𝑉 → ( ∈ ( clIntOp ‘𝑀) ↔ :(𝑀 × 𝑀)⟶𝑀))
1615biimprcd 249 . . . . . 6 ( :(𝑀 × 𝑀)⟶𝑀 → (𝑀𝑉 ∈ ( clIntOp ‘𝑀)))
1716adantr 479 . . . . 5 (( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))) → (𝑀𝑉 ∈ ( clIntOp ‘𝑀)))
1817impcom 406 . . . 4 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → ∈ ( clIntOp ‘𝑀))
19 sqxpexg 7762 . . . . . . . . 9 (𝑀𝑉 → (𝑀 × 𝑀) ∈ V)
20 fex 7242 . . . . . . . . 9 (( :(𝑀 × 𝑀)⟶𝑀 ∧ (𝑀 × 𝑀) ∈ V) → ∈ V)
2119, 20sylan2 591 . . . . . . . 8 (( :(𝑀 × 𝑀)⟶𝑀𝑀𝑉) → ∈ V)
2221ancoms 457 . . . . . . 7 ((𝑀𝑉 :(𝑀 × 𝑀)⟶𝑀) → ∈ V)
23 simpl 481 . . . . . . 7 ((𝑀𝑉 :(𝑀 × 𝑀)⟶𝑀) → 𝑀𝑉)
24 isasslaw 47506 . . . . . . . 8 (( ∈ V ∧ 𝑀𝑉) → ( assLaw 𝑀 ↔ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))))
2524bicomd 222 . . . . . . 7 (( ∈ V ∧ 𝑀𝑉) → (∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)) ↔ assLaw 𝑀))
2622, 23, 25syl2anc 582 . . . . . 6 ((𝑀𝑉 :(𝑀 × 𝑀)⟶𝑀) → (∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)) ↔ assLaw 𝑀))
2726biimpd 228 . . . . 5 ((𝑀𝑉 :(𝑀 × 𝑀)⟶𝑀) → (∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)) → assLaw 𝑀))
2827impr 453 . . . 4 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → assLaw 𝑀)
29 assintopval 47519 . . . . . . 7 (𝑀𝑉 → ( assIntOp ‘𝑀) = {𝑜 ∈ ( clIntOp ‘𝑀) ∣ 𝑜 assLaw 𝑀})
3029adantr 479 . . . . . 6 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → ( assIntOp ‘𝑀) = {𝑜 ∈ ( clIntOp ‘𝑀) ∣ 𝑜 assLaw 𝑀})
3130eleq2d 2811 . . . . 5 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → ( ∈ ( assIntOp ‘𝑀) ↔ ∈ {𝑜 ∈ ( clIntOp ‘𝑀) ∣ 𝑜 assLaw 𝑀}))
323elrab 3680 . . . . 5 ( ∈ {𝑜 ∈ ( clIntOp ‘𝑀) ∣ 𝑜 assLaw 𝑀} ↔ ( ∈ ( clIntOp ‘𝑀) ∧ assLaw 𝑀))
3331, 32bitrdi 286 . . . 4 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → ( ∈ ( assIntOp ‘𝑀) ↔ ( ∈ ( clIntOp ‘𝑀) ∧ assLaw 𝑀)))
3418, 28, 33mpbir2and 711 . . 3 ((𝑀𝑉 ∧ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))) → ∈ ( assIntOp ‘𝑀))
3534ex 411 . 2 (𝑀𝑉 → (( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧))) → ∈ ( assIntOp ‘𝑀)))
3614, 35impbid 211 1 (𝑀𝑉 → ( ∈ ( assIntOp ‘𝑀) ↔ ( :(𝑀 × 𝑀)⟶𝑀 ∧ ∀𝑥𝑀𝑦𝑀𝑧𝑀 ((𝑥 𝑦) 𝑧) = (𝑥 (𝑦 𝑧)))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 394   = wceq 1533  wcel 2098  wral 3050  {crab 3418  Vcvv 3461   class class class wbr 5152   × cxp 5679  wf 6549  cfv 6553  (class class class)co 7423  m cmap 8854   assLaw casslaw 47498   clIntOp cclintop 47511   assIntOp cassintop 47512
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 2166  ax-ext 2696  ax-rep 5289  ax-sep 5303  ax-nul 5310  ax-pow 5368  ax-pr 5432  ax-un 7745
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  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 2703  df-cleq 2717  df-clel 2802  df-nfc 2877  df-ne 2930  df-ral 3051  df-rex 3060  df-reu 3364  df-rab 3419  df-v 3463  df-sbc 3776  df-csb 3892  df-dif 3949  df-un 3951  df-in 3953  df-ss 3963  df-nul 4325  df-if 4533  df-pw 4608  df-sn 4633  df-pr 4635  df-op 4639  df-uni 4913  df-iun 5002  df-br 5153  df-opab 5215  df-mpt 5236  df-id 5579  df-xp 5687  df-rel 5688  df-cnv 5689  df-co 5690  df-dm 5691  df-rn 5692  df-res 5693  df-ima 5694  df-iota 6505  df-fun 6555  df-fn 6556  df-f 6557  df-f1 6558  df-fo 6559  df-f1o 6560  df-fv 6561  df-ov 7426  df-oprab 7427  df-mpo 7428  df-1st 8002  df-2nd 8003  df-map 8856  df-asslaw 47502  df-intop 47513  df-clintop 47514  df-assintop 47515
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator