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 35249
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 1947 . . 3 Ⅎ𝑑𝜑
2 nfrab1 3432 . . 3 Ⅎ𝑑{𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}
3 nfcv 2923 . . 3 Ⅎ𝑑∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵}
4 reprdifc.a . . . . . . . . . . 11 (𝜑 → 𝐴 ⊆ ℕ)
5 reprdifc.m . . . . . . . . . . . 12 (𝜑 → 𝑀 ∈ ℕ0)
65nn0zd 12711 . . . . . . . . . . 11 (𝜑 → 𝑀 ∈ ℤ)
7 reprdifc.s . . . . . . . . . . 11 (𝜑 → 𝑆 ∈ ℕ0)
84, 6, 7reprval 35232 . . . . . . . . . 10 (𝜑 → (𝐴(repr‘𝑆)𝑀) = {𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀})
98eleq2d 2847 . . . . . . . . 9 (𝜑 → (𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ↔ 𝑑 ∈ {𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}))
10 rabid 3433 . . . . . . . . 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 3909 . . . . . . . . . 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 12334 . . . . . . . . . . . . . 14 ℕ ∈ V
2019a1i 11 . . . . . . . . . . . . 13 (𝜑 → ℕ ∈ V)
21 reprdifc.b . . . . . . . . . . . . 13 (𝜑 → 𝐵 ⊆ ℕ)
2220, 21ssexd 5286 . . . . . . . . . . . 12 (𝜑 → 𝐵 ∈ V)
23 ovexd 7453 . . . . . . . . . . . 12 (𝜑 → (0..^𝑆) ∈ V)
24 elmapg 8852 . . . . . . . . . . . 12 ((𝐵 ∈ V ∧ (0..^𝑆) ∈ V) → (𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ 𝑑:(0..^𝑆)⟶𝐵))
2522, 23, 24syl2anc 596 . . . . . . . . . . 11 (𝜑 → (𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ 𝑑:(0..^𝑆)⟶𝐵))
2625adantr 486 . . . . . . . . . 10 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → (𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ 𝑑:(0..^𝑆)⟶𝐵))
27 ffnfv 7117 . . . . . . . . . . 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 35234 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → 𝑑:(0..^𝑆)⟶𝐴)
3332ffnd 6708 . . . . . . . . . . . 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 3115 . . . . . . . 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 6882 . . . . . . . . . 10 (𝑐 = 𝑑 → (𝑐‘𝑥) = (𝑑‘𝑥))
4342eleq1d 2846 . . . . . . . . 9 (𝑐 = 𝑑 → ((𝑐‘𝑥) ∈ 𝐵 ↔ (𝑑‘𝑥) ∈ 𝐵))
4443notbid 321 . . . . . . . 8 (𝑐 = 𝑑 → (¬ (𝑐‘𝑥) ∈ 𝐵 ↔ ¬ (𝑑‘𝑥) ∈ 𝐵))
4544elrab 3645 . . . . . . 7 (𝑑 ∈ {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵} ↔ (𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ¬ (𝑑‘𝑥) ∈ 𝐵))
4645rexbii 3110 . . . . . 6 (∃𝑥 ∈ (0..^𝑆)𝑑 ∈ {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵} ↔ ∃𝑥 ∈ (0..^𝑆)(𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ¬ (𝑑‘𝑥) ∈ 𝐵))
47 r19.42v 3195 . . . . . 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 3433 . . . 4 (𝑑 ∈ {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ↔ (𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀))
51 eliun 4955 . . . 4 (𝑑 ∈ ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵} ↔ ∃𝑥 ∈ (0..^𝑆)𝑑 ∈ {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
5249, 50, 513bitr4g 317 . . 3 (𝜑 → (𝑑 ∈ {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ↔ 𝑑 ∈ ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵}))
531, 2, 3, 52eqrd 3950 . 2 (𝜑 → {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} = ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
5421, 6, 7reprval 35232 . . . 4 (𝜑 → (𝐵(repr‘𝑆)𝑀) = {𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀})
558, 54difeq12d 4075 . . 3 (𝜑 → ((𝐴(repr‘𝑆)𝑀) ∖ (𝐵(repr‘𝑆)𝑀)) = ({𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ∖ {𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}))
56 difrab2 33087 . . 3 ({𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ∖ {𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}) = {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}
5755, 56eqtrdi 2812 . 2 (𝜑 → ((𝐴(repr‘𝑆)𝑀) ∖ (𝐵(repr‘𝑆)𝑀)) = {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀})
58 reprdifc.c . . . 4 𝐶 = {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵}
5958a1i 11 . . 3 (𝜑 → 𝐶 = {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
6059iuneq2d 4981 . 2 (𝜑 → ∪ 𝑥 ∈ (0..^𝑆)𝐶 = ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
6153, 57, 603eqtr4d 2806 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 1570   ∈ wcel 2145  ∀wral 3077  ∃wrex 3087  {crab 3413  Vcvv 3451   ∖ cdif 3896   ⊆ wss 3899  ∪ ciun 4951   Fn wfn 6532  ⟶wf 6533  ‘cfv 6537  (class class class)co 7418   ↑m cmap 8840  0cc0 11193  ℕcn 12328  ℕ0cn0 12599  ℤcz 12686  ..^cfzo 13781  Σcsu 15846  reprcrepr 35230
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7749  ax-cnex 11249  ax-resscn 11250  ax-1cn 11251  ax-icn 11252  ax-addcl 11253  ax-addrcl 11254  ax-mulcl 11255  ax-mulrcl 11256  ax-i2m1 11261  ax-1ne0 11262  ax-rnegex 11264  ax-rrecex 11265  ax-cnre 11266
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3078  df-rex 3088  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-ov 7421  df-oprab 7422  df-mpo 7423  df-om 7876  df-1st 7999  df-2nd 8000  df-frecs 8292  df-wrecs 8323  df-recs 8372  df-rdg 8411  df-map 8842  df-neg 11537  df-nn 12329  df-n0 12600  df-z 12687  df-seq 14138  df-sum 15847  df-repr 35231
This theorem is used by:  hgt750lema  35279
  Copyright terms: Public domain W3C validator