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 35367
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 1949 . . 3 Ⅎ𝑑𝜑
2 nfrab1 3435 . . 3 Ⅎ𝑑{𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}
3 nfcv 2926 . . 3 Ⅎ𝑑∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵}
4 reprdifc.a . . . . . . . . . . 11 (𝜑 → 𝐴 ⊆ ℕ)
5 reprdifc.m . . . . . . . . . . . 12 (𝜑 → 𝑀 ∈ ℕ0)
65nn0zd 12758 . . . . . . . . . . 11 (𝜑 → 𝑀 ∈ ℤ)
7 reprdifc.s . . . . . . . . . . 11 (𝜑 → 𝑆 ∈ ℕ0)
84, 6, 7reprval 35350 . . . . . . . . . 10 (𝜑 → (𝐴(repr‘𝑆)𝑀) = {𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀})
98eleq2d 2850 . . . . . . . . 9 (𝜑 → (𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ↔ 𝑑 ∈ {𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}))
10 rabid 3436 . . . . . . . . 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 4052 . . . . . . . . . 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 12381 . . . . . . . . . . . . . 14 ℕ ∈ V
2019a1i 11 . . . . . . . . . . . . 13 (𝜑 → ℕ ∈ V)
21 reprdifc.b . . . . . . . . . . . . 13 (𝜑 → 𝐵 ⊆ ℕ)
2220, 21ssexd 5293 . . . . . . . . . . . 12 (𝜑 → 𝐵 ∈ V)
23 ovexd 7486 . . . . . . . . . . . 12 (𝜑 → (0..^𝑆) ∈ V)
24 elmapg 8897 . . . . . . . . . . . 12 ((𝐵 ∈ V ∧ (0..^𝑆) ∈ V) → (𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ 𝑑:(0..^𝑆)⟶𝐵))
2522, 23, 24syl2anc 596 . . . . . . . . . . 11 (𝜑 → (𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ 𝑑:(0..^𝑆)⟶𝐵))
2625adantr 486 . . . . . . . . . 10 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → (𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ↔ 𝑑:(0..^𝑆)⟶𝐵))
27 ffnfv 7151 . . . . . . . . . . 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 35352 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑑 ∈ (𝐴(repr‘𝑆)𝑀)) → 𝑑:(0..^𝑆)⟶𝐴)
3332ffnd 6740 . . . . . . . . . . . 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 3118 . . . . . . . 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 6915 . . . . . . . . . 10 (𝑐 = 𝑑 → (𝑐‘𝑥) = (𝑑‘𝑥))
4342eleq1d 2849 . . . . . . . . 9 (𝑐 = 𝑑 → ((𝑐‘𝑥) ∈ 𝐵 ↔ (𝑑‘𝑥) ∈ 𝐵))
4443notbid 321 . . . . . . . 8 (𝑐 = 𝑑 → (¬ (𝑐‘𝑥) ∈ 𝐵 ↔ ¬ (𝑑‘𝑥) ∈ 𝐵))
4544elrab 3648 . . . . . . 7 (𝑑 ∈ {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵} ↔ (𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ¬ (𝑑‘𝑥) ∈ 𝐵))
4645rexbii 3113 . . . . . 6 (∃𝑥 ∈ (0..^𝑆)𝑑 ∈ {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵} ↔ ∃𝑥 ∈ (0..^𝑆)(𝑑 ∈ (𝐴(repr‘𝑆)𝑀) ∧ ¬ (𝑑‘𝑥) ∈ 𝐵))
47 r19.42v 3198 . . . . . 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 3436 . . . 4 (𝑑 ∈ {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ↔ (𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∧ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀))
51 eliun 4960 . . . 4 (𝑑 ∈ ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵} ↔ ∃𝑥 ∈ (0..^𝑆)𝑑 ∈ {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
5249, 50, 513bitr4g 317 . . 3 (𝜑 → (𝑑 ∈ {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ↔ 𝑑 ∈ ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵}))
531, 2, 3, 52eqrd 3932 . 2 (𝜑 → {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} = ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
5421, 6, 7reprval 35350 . . . 4 (𝜑 → (𝐵(repr‘𝑆)𝑀) = {𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀})
558, 54difeq12d 4067 . . 3 (𝜑 → ((𝐴(repr‘𝑆)𝑀) ∖ (𝐵(repr‘𝑆)𝑀)) = ({𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ∖ {𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}))
56 difrab2 33193 . . 3 ({𝑑 ∈ (𝐴 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀} ∖ {𝑑 ∈ (𝐵 ↑m (0..^𝑆)) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}) = {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀}
5755, 56eqtrdi 2814 . 2 (𝜑 → ((𝐴(repr‘𝑆)𝑀) ∖ (𝐵(repr‘𝑆)𝑀)) = {𝑑 ∈ ((𝐴 ↑m (0..^𝑆)) ∖ (𝐵 ↑m (0..^𝑆))) ∣ Σ𝑎 ∈ (0..^𝑆)(𝑑‘𝑎) = 𝑀})
58 reprdifc.c . . . 4 𝐶 = {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵}
5958a1i 11 . . 3 (𝜑 → 𝐶 = {𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
6059iuneq2d 4986 . 2 (𝜑 → ∪ 𝑥 ∈ (0..^𝑆)𝐶 = ∪ 𝑥 ∈ (0..^𝑆){𝑐 ∈ (𝐴(repr‘𝑆)𝑀) ∣ ¬ (𝑐‘𝑥) ∈ 𝐵})
6153, 57, 603eqtr4d 2808 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 2147  ∀wral 3080  ∃wrex 3090  {crab 3416  Vcvv 3454   ⊆ wss 3900   ∖ cdif 4048  ∪ ciun 4956   Fn wfn 6561  ⟶wf 6562  ‘cfv 6566  (class class class)co 7451   ↑m cmap 8885  0cc0 11239  ℕcn 12375  ℕ0cn0 12646  ℤcz 12733  ..^cfzo 13828  Σcsu 15897  reprcrepr 35348
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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5238  ax-sep 5255  ax-nul 5266  ax-pow 5334  ax-pr 5398  ax-un 7783  ax-cnex 11295  ax-resscn 11296  ax-1cn 11297  ax-icn 11298  ax-addcl 11299  ax-addrcl 11300  ax-mulcl 11301  ax-mulrcl 11302  ax-i2m1 11307  ax-1ne0 11308  ax-rnegex 11310  ax-rrecex 11311  ax-cnre 11312
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 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-ral 3081  df-rex 3091  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4841  df-uni 4873  df-iun 4958  df-br 5109  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-we 5613  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-res 5670  df-ima 5671  df-pred 6330  df-ord 6391  df-on 6392  df-lim 6393  df-suc 6394  df-iota 6520  df-fun 6568  df-fn 6569  df-f 6570  df-f1 6571  df-fo 6572  df-f1o 6573  df-fv 6574  df-ov 7454  df-oprab 7455  df-mpo 7456  df-om 7912  df-1st 8035  df-2nd 8036  df-frecs 8337  df-wrecs 8368  df-recs 8417  df-rdg 8456  df-map 8887  df-neg 11583  df-nn 12376  df-n0 12647  df-z 12734  df-seq 14185  df-sum 15898  df-repr 35349
This theorem is used by:  hgt750lema  35397
  Copyright terms: Public domain W3C validator