Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  reprdifc Structured version   Visualization version   GIF version

Theorem reprdifc 35304
Description: Express the representations as a sum of integers in a difference of sets using conditions on each of the indices. (Contributed by Thierry Arnoux, 27-Dec-2021.)
Hypotheses
Ref Expression
reprdifc.c 𝐶 = {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵}
reprdifc.a (𝜑 → 𝐴 ⊆ ℕ)
reprdifc.b (𝜑 → 𝐵 ⊆ ℕ)
reprdifc.m (𝜑 → 𝑀 ∈ ℕ0)
reprdifc.s (𝜑 → 𝑆 ∈ ℕ0)
Assertion
Ref Expression
reprdifc (𝜑 → ((𝐴(repr‘𝑆)𝑀) ∖ (𝐵(repr‘𝑆)𝑀)) = ∪ 𝑥 ∈ (0..^𝑆)𝐶)
Distinct variable groups:   𝐴,𝑐,𝑥   𝐵,𝑐,𝑥   𝑀,𝑐,𝑥   𝑆,𝑐,𝑥   𝜑,𝑥
Allowed substitution hints:   𝜑(𝑐)   𝐶(𝑥, 𝑐)

Proof of Theorem reprdifc
Dummy variables 𝑑 𝑎 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nfv 1946 . . 3 Ⅎ𝑑𝜑
2 nfrab1 3431 . . 3 Ⅎ𝑑{𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}
3 nfcv 2922 . . 3 Ⅎ𝑑∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵}
4 reprdifc.a . . . . . . . . . . 11 (𝜑 → 𝐴 ⊆ ℕ)
5 reprdifc.m . . . . . . . . . . . 12 (𝜑 → 𝑀 ∈ ℕ0)
65nn0zd 12723 . . . . . . . . . . 11 (𝜑 → 𝑀 ∈ ℤ)
7 reprdifc.s . . . . . . . . . . 11 (𝜑 → 𝑆 ∈ ℕ0)
84, 6, 7reprval 35287 . . . . . . . . . 10 (𝜑 → (𝐴(repr‘𝑆)𝑀) = {𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀})
98eleq2d 2846 . . . . . . . . 9 (𝜑 → (𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ↔ 𝑑 ∈ {𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}))
10 rabid 3432 . . . . . . . . 9 (𝑑 ∈ {𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ↔ (𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀))
119, 10bitrdi 290 . . . . . . . 8 (𝜑 → (𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ↔ (𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀)))
1211anbi1d 643 . . . . . . 7 (𝜑 → ((𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆))) ↔ ((𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀) ∧ ¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆)))))
13 eldif 4048 . . . . . . . . . 10 (𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ↔ (𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∧ ¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆))))
1413anbi1i 636 . . . . . . . . 9 ((𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀) ↔ ((𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∧ ¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆))) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀))
15 an32 659 . . . . . . . . 9 (((𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∧ ¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆))) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀) ↔ ((𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀) ∧ ¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆))))
1614, 15bitri 278 . . . . . . . 8 ((𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀) ↔ ((𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀) ∧ ¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆))))
1716a1i 11 . . . . . . 7 (𝜑 → ((𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀) ↔ ((𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀) ∧ ¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆)))))
1812, 17bitr4d 285 . . . . . 6 (𝜑 → ((𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆))) ↔ (𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀)))
19 nnex 12346 . . . . . . . . . . . . . 14 ℕ ∈ V
2019a1i 11 . . . . . . . . . . . . 13 (𝜑 → ℕ ∈ V)
21 reprdifc.b . . . . . . . . . . . . 13 (𝜑 → 𝐵 ⊆ ℕ)
2220, 21ssexd 5285 . . . . . . . . . . . 12 (𝜑 → 𝐵 ∈ V)
23 ovexd 7457 . . . . . . . . . . . 12 (𝜑 → (0..^𝑆) ∈ V)
24 elmapg 8864 . . . . . . . . . . . 12 ((𝐵 ∈ V ∧ (0..^𝑆) ∈ V) → (𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ 𝑑:(0..^𝑆)⟶𝐵))
2522, 23, 24syl2anc 596 . . . . . . . . . . 11 (𝜑 → (𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ 𝑑:(0..^𝑆)⟶𝐵))
2625adantr 486 . . . . . . . . . 10 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → (𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ 𝑑:(0..^𝑆)⟶𝐵))
27 ffnfv 7122 . . . . . . . . . . 11 (𝑑:(0..^𝑆)⟶𝐵 ↔ (𝑑 Fn (0..^𝑆) ∧ ∀𝑥 ∈ (0..^𝑆)(𝑑‘𝑥) ∈ 𝐵))
284adantr 486 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → 𝐴 ⊆ ℕ)
296adantr 486 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → 𝑀 ∈ ℤ)
307adantr 486 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → 𝑆 ∈ ℕ0)
31 simpr 490 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → 𝑑 ∈ (𝐴(repr‘𝑆)𝑀))
3228, 29, 30, 31reprf 35289 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → 𝑑:(0..^𝑆)⟶𝐴)
3332ffnd 6713 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → 𝑑 Fn (0..^𝑆))
3433biantrurd 542 . . . . . . . . . . 11 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → (∀𝑥 ∈ (0..^𝑆)(𝑑‘𝑥) ∈ 𝐵 ↔ (𝑑 Fn (0..^𝑆) ∧ ∀𝑥 ∈ (0..^𝑆)(𝑑‘𝑥) ∈ 𝐵)))
3527, 34bitr4id 293 . . . . . . . . . 10 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → (𝑑:(0..^𝑆)⟶𝐵 ↔ ∀𝑥 ∈ (0..^𝑆)(𝑑‘𝑥) ∈ 𝐵))
3626, 35bitrd 282 . . . . . . . . 9 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → (𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ ∀𝑥 ∈ (0..^𝑆)(𝑑‘𝑥) ∈ 𝐵))
3736notbid 321 . . . . . . . 8 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → (¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ ¬ ∀𝑥 ∈ (0..^𝑆)(𝑑‘𝑥) ∈ 𝐵))
38 rexnal 3114 . . . . . . . 8 (∃𝑥 ∈ (0..^𝑆) ¬ (𝑑‘𝑥) ∈ 𝐵 ↔ ¬ ∀𝑥 ∈ (0..^𝑆)(𝑑‘𝑥) ∈ 𝐵)
3937, 38bitr4di 292 . . . . . . 7 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → (¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ ∃𝑥 ∈ (0..^𝑆) ¬ (𝑑‘𝑥) ∈ 𝐵))
4039pm5.32da 590 . . . . . 6 (𝜑 → ((𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ¬ 𝑑 ∈ (𝐵 ↑m (0..^𝑆))) ↔ (𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ∃𝑥 ∈ (0..^𝑆) ¬ (𝑑‘𝑥) ∈ 𝐵)))
4118, 40bitr3d 284 . . . . 5 (𝜑 → ((𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀) ↔ (𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ∃𝑥 ∈ (0..^𝑆) ¬ (𝑑‘𝑥) ∈ 𝐵)))
42 fveq1 6887 . . . . . . . . . 10 (𝑐 = 𝑑 → (𝑐‘𝑥) = (𝑑‘𝑥))
4342eleq1d 2845 . . . . . . . . 9 (𝑐 = 𝑑 → ((𝑐‘𝑥) ∈ 𝐵 ↔ (𝑑‘𝑥) ∈ 𝐵))
4443notbid 321 . . . . . . . 8 (𝑐 = 𝑑 → (¬ (𝑐‘𝑥) ∈ 𝐵 ↔ ¬ (𝑑‘𝑥) ∈ 𝐵))
4544elrab 3644 . . . . . . 7 (𝑑 ∈ {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵} ↔ (𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ¬ (𝑑‘𝑥) ∈ 𝐵))
4645rexbii 3109 . . . . . 6 (∃𝑥 ∈ (0..^𝑆)𝑑 ∈ {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵} ↔ ∃𝑥 ∈ (0..^𝑆)(𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ¬ (𝑑‘𝑥) ∈ 𝐵))
47 r19.42v 3194 . . . . . 6 (∃𝑥 ∈ (0..^𝑆)(𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ¬ (𝑑‘𝑥) ∈ 𝐵) ↔ (𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ∃𝑥 ∈ (0..^𝑆) ¬ (𝑑‘𝑥) ∈ 𝐵))
4846, 47bitri 278 . . . . 5 (∃𝑥 ∈ (0..^𝑆)𝑑 ∈ {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵} ↔ (𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ∃𝑥 ∈ (0..^𝑆) ¬ (𝑑‘𝑥) ∈ 𝐵))
4941, 48bitr4di 292 . . . 4 (𝜑 → ((𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀) ↔ ∃𝑥 ∈ (0..^𝑆)𝑑 ∈ {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵}))
50 rabid 3432 . . . 4 (𝑑 ∈ {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ↔ (𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀))
51 eliun 4954 . . . 4 (𝑑 ∈ ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵} ↔ ∃𝑥 ∈ (0..^𝑆)𝑑 ∈ {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
5249, 50, 513bitr4g 317 . . 3 (𝜑 → (𝑑 ∈ {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ↔ 𝑑 ∈ ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵}))
531, 2, 3, 52eqrd 3928 . 2 (𝜑 → {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} = ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
5421, 6, 7reprval 35287 . . . 4 (𝜑 → (𝐵(repr‘𝑆)𝑀) = {𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀})
558, 54difeq12d 4063 . . 3 (𝜑 → ((𝐴(repr‘𝑆)𝑀) ∖ (𝐵(repr‘𝑆)𝑀)) = ({𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ∖ {𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}))
56 difrab2 33143 . . 3 ({𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ∖ {𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}) = {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}
5755, 56eqtrdi 2811 . 2 (𝜑 → ((𝐴(repr‘𝑆)𝑀) ∖ (𝐵(repr‘𝑆)𝑀)) = {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀})
58 reprdifc.c . . . 4 𝐶 = {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵}
5958a1i 11 . . 3 (𝜑 → 𝐶 = {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
6059iuneq2d 4980 . 2 (𝜑 → ∪ 𝑥 ∈ (0..^𝑆)𝐶 = ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
6153, 57, 603eqtr4d 2805 1 (𝜑 → ((𝐴(repr‘𝑆)𝑀) ∖ (𝐵(repr‘𝑆)𝑀)) = ∪ 𝑥 ∈ (0..^𝑆)𝐶)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1569   ∈ wcel 2144  ∀wral 3076  ∃wrex 3086  {crab 3412  Vcvv 3450   ⊆ wss 3896   ∖ cdif 4044  ∪ ciun 4950   Fn wfn 6536  ⟶wf 6537  ‘cfv 6541  (class class class)co 7422   ↑m cmap 8852  0cc0 11205  ℕcn 12340  ℕ0cn0 12611  ℤcz 12698  ..^cfzo 13793  Σcsu 15860  reprcrepr 35285
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7753  ax-cnex 11261  ax-resscn 11262  ax-1cn 11263  ax-icn 11264  ax-addcl 11265  ax-addrcl 11266  ax-mulcl 11267  ax-mulrcl 11268  ax-i2m1 11273  ax-1ne0 11274  ax-rnegex 11276  ax-rrecex 11277  ax-cnre 11278
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3848  df-ss 3897  df-pss 4013  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5545  df-eprel 5550  df-po 5558  df-so 5559  df-fr 5603  df-we 5605  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-pred 6306  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6496  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-ov 7425  df-oprab 7426  df-mpo 7427  df-om 7880  df-1st 8003  df-2nd 8004  df-frecs 8304  df-wrecs 8335  df-recs 8384  df-rdg 8423  df-map 8854  df-neg 11549  df-nn 12341  df-n0 12612  df-z 12699  df-seq 14150  df-sum 15861  df-repr 35286
This theorem is used by:  hgt750lema  35334
  Copyright terms: Public domain W3C validator