Users' Mathboxes Mathbox for Brendan Leahy < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  itgaddnc Structured version   Visualization version   GIF version

Theorem itgaddnc 38691
Description: Choice-free analogue of itgadd 26150. (Contributed by Brendan Leahy, 11-Nov-2017.)
Hypotheses
Ref Expression
ibladdnc.1 ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ 𝑉)
ibladdnc.2 (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵) ∈ 𝐿1)
ibladdnc.3 ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐶 ∈ 𝑉)
ibladdnc.4 (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐶) ∈ 𝐿1)
ibladdnc.m (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶)) ∈ MblFn)
Assertion
Ref Expression
itgaddnc (𝜑 → ∫𝐴(𝐵 + 𝐶) d𝑥 = (∫𝐴𝐵 d𝑥 + ∫𝐴𝐶 d𝑥))
Distinct variable groups:   𝑥,𝐴   𝑥,𝑉   𝜑,𝑥
Allowed substitution hints:   𝐵(𝑥)   𝐶(𝑥)

Proof of Theorem itgaddnc
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 ibladdnc.2 . . . . . . . . 9 (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵) ∈ 𝐿1)
2 iblmbf 26093 . . . . . . . . 9 ((𝑥 ∈ 𝐴 ↦ 𝐵) ∈ 𝐿1 → (𝑥 ∈ 𝐴 ↦ 𝐵) ∈ MblFn)
31, 2syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵) ∈ MblFn)
4 ibladdnc.1 . . . . . . . 8 ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ 𝑉)
53, 4mbfmptcl 25962 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ℂ)
6 ibladdnc.4 . . . . . . . . 9 (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐶) ∈ 𝐿1)
7 iblmbf 26093 . . . . . . . . 9 ((𝑥 ∈ 𝐴 ↦ 𝐶) ∈ 𝐿1 → (𝑥 ∈ 𝐴 ↦ 𝐶) ∈ MblFn)
86, 7syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐶) ∈ MblFn)
9 ibladdnc.3 . . . . . . . 8 ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐶 ∈ 𝑉)
108, 9mbfmptcl 25962 . . . . . . 7 ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐶 ∈ ℂ)
115, 10readdd 15386 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℜ‘(𝐵 + 𝐶)) = ((ℜ‘𝐵) + (ℜ‘𝐶)))
1211itgeq2dv 26107 . . . . 5 (𝜑 → ∫𝐴(ℜ‘(𝐵 + 𝐶)) d𝑥 = ∫𝐴((ℜ‘𝐵) + (ℜ‘𝐶)) d𝑥)
135recld 15366 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℜ‘𝐵) ∈ ℝ)
145iblcn 26124 . . . . . . . 8 (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ∈ 𝐿1 ↔ ((𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵)) ∈ 𝐿1 ∧ (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵)) ∈ 𝐿1)))
151, 14mpbid 235 . . . . . . 7 (𝜑 → ((𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵)) ∈ 𝐿1 ∧ (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵)) ∈ 𝐿1))
1615simpld 500 . . . . . 6 (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵)) ∈ 𝐿1)
1710recld 15366 . . . . . 6 ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℜ‘𝐶) ∈ ℝ)
1810iblcn 26124 . . . . . . . 8 (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐶) ∈ 𝐿1 ↔ ((𝑥 ∈ 𝐴 ↦ (ℜ‘𝐶)) ∈ 𝐿1 ∧ (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐶)) ∈ 𝐿1)))
196, 18mpbid 235 . . . . . . 7 (𝜑 → ((𝑥 ∈ 𝐴 ↦ (ℜ‘𝐶)) ∈ 𝐿1 ∧ (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐶)) ∈ 𝐿1))
2019simpld 500 . . . . . 6 (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐶)) ∈ 𝐿1)
215, 10addcld 11331 . . . . . . . . 9 ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐵 + 𝐶) ∈ ℂ)
22 eqidd 2761 . . . . . . . . 9 (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶)) = (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶)))
23 ref 15284 . . . . . . . . . . 11 ℜ:ℂ⟶ℝ
2423a1i 11 . . . . . . . . . 10 (𝜑 → ℜ:ℂ⟶ℝ)
2524feqmptd 6953 . . . . . . . . 9 (𝜑 → ℜ = (𝑦 ∈ ℂ ↦ (ℜ‘𝑦)))
26 fveq2 6885 . . . . . . . . 9 (𝑦 = (𝐵 + 𝐶) → (ℜ‘𝑦) = (ℜ‘(𝐵 + 𝐶)))
2721, 22, 25, 26fmptco 7130 . . . . . . . 8 (𝜑 → (ℜ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) = (𝑥 ∈ 𝐴 ↦ (ℜ‘(𝐵 + 𝐶))))
2811mpteq2dva 5197 . . . . . . . 8 (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℜ‘(𝐵 + 𝐶))) = (𝑥 ∈ 𝐴 ↦ ((ℜ‘𝐵) + (ℜ‘𝐶))))
2927, 28eqtrd 2795 . . . . . . 7 (𝜑 → (ℜ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) = (𝑥 ∈ 𝐴 ↦ ((ℜ‘𝐵) + (ℜ‘𝐶))))
30 ibladdnc.m . . . . . . . . 9 (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶)) ∈ MblFn)
3121fmpttd 7115 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶)):𝐴⟶ℂ)
32 ismbfcn 25955 . . . . . . . . . 10 ((𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶)):𝐴⟶ℂ → ((𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶)) ∈ MblFn ↔ ((ℜ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) ∈ MblFn ∧ (ℑ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) ∈ MblFn)))
3331, 32syl 18 . . . . . . . . 9 (𝜑 → ((𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶)) ∈ MblFn ↔ ((ℜ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) ∈ MblFn ∧ (ℑ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) ∈ MblFn)))
3430, 33mpbid 235 . . . . . . . 8 (𝜑 → ((ℜ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) ∈ MblFn ∧ (ℑ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) ∈ MblFn))
3534simpld 500 . . . . . . 7 (𝜑 → (ℜ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) ∈ MblFn)
3629, 35eqeltrrd 2861 . . . . . 6 (𝜑 → (𝑥 ∈ 𝐴 ↦ ((ℜ‘𝐵) + (ℜ‘𝐶))) ∈ MblFn)
3713, 16, 17, 20, 36, 13, 17itgaddnclem2 38690 . . . . 5 (𝜑 → ∫𝐴((ℜ‘𝐵) + (ℜ‘𝐶)) d𝑥 = (∫𝐴(ℜ‘𝐵) d𝑥 + ∫𝐴(ℜ‘𝐶) d𝑥))
3812, 37eqtrd 2795 . . . 4 (𝜑 → ∫𝐴(ℜ‘(𝐵 + 𝐶)) d𝑥 = (∫𝐴(ℜ‘𝐵) d𝑥 + ∫𝐴(ℜ‘𝐶) d𝑥))
395, 10imaddd 15387 . . . . . . . 8 ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℑ‘(𝐵 + 𝐶)) = ((ℑ‘𝐵) + (ℑ‘𝐶)))
4039itgeq2dv 26107 . . . . . . 7 (𝜑 → ∫𝐴(ℑ‘(𝐵 + 𝐶)) d𝑥 = ∫𝐴((ℑ‘𝐵) + (ℑ‘𝐶)) d𝑥)
415imcld 15367 . . . . . . . 8 ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℑ‘𝐵) ∈ ℝ)
4215simprd 501 . . . . . . . 8 (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵)) ∈ 𝐿1)
4310imcld 15367 . . . . . . . 8 ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℑ‘𝐶) ∈ ℝ)
4419simprd 501 . . . . . . . 8 (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐶)) ∈ 𝐿1)
45 imf 15285 . . . . . . . . . . . . 13 ℑ:ℂ⟶ℝ
4645a1i 11 . . . . . . . . . . . 12 (𝜑 → ℑ:ℂ⟶ℝ)
4746feqmptd 6953 . . . . . . . . . . 11 (𝜑 → ℑ = (𝑦 ∈ ℂ ↦ (ℑ‘𝑦)))
48 fveq2 6885 . . . . . . . . . . 11 (𝑦 = (𝐵 + 𝐶) → (ℑ‘𝑦) = (ℑ‘(𝐵 + 𝐶)))
4921, 22, 47, 48fmptco 7130 . . . . . . . . . 10 (𝜑 → (ℑ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) = (𝑥 ∈ 𝐴 ↦ (ℑ‘(𝐵 + 𝐶))))
5039mpteq2dva 5197 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℑ‘(𝐵 + 𝐶))) = (𝑥 ∈ 𝐴 ↦ ((ℑ‘𝐵) + (ℑ‘𝐶))))
5149, 50eqtrd 2795 . . . . . . . . 9 (𝜑 → (ℑ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) = (𝑥 ∈ 𝐴 ↦ ((ℑ‘𝐵) + (ℑ‘𝐶))))
5234simprd 501 . . . . . . . . 9 (𝜑 → (ℑ ∘ (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶))) ∈ MblFn)
5351, 52eqeltrrd 2861 . . . . . . . 8 (𝜑 → (𝑥 ∈ 𝐴 ↦ ((ℑ‘𝐵) + (ℑ‘𝐶))) ∈ MblFn)
5441, 42, 43, 44, 53, 41, 43itgaddnclem2 38690 . . . . . . 7 (𝜑 → ∫𝐴((ℑ‘𝐵) + (ℑ‘𝐶)) d𝑥 = (∫𝐴(ℑ‘𝐵) d𝑥 + ∫𝐴(ℑ‘𝐶) d𝑥))
5540, 54eqtrd 2795 . . . . . 6 (𝜑 → ∫𝐴(ℑ‘(𝐵 + 𝐶)) d𝑥 = (∫𝐴(ℑ‘𝐵) d𝑥 + ∫𝐴(ℑ‘𝐶) d𝑥))
5655oveq2d 7436 . . . . 5 (𝜑 → (i · ∫𝐴(ℑ‘(𝐵 + 𝐶)) d𝑥) = (i · (∫𝐴(ℑ‘𝐵) d𝑥 + ∫𝐴(ℑ‘𝐶) d𝑥)))
57 ax-icn 11262 . . . . . . 7 i ∈ ℂ
5857a1i 11 . . . . . 6 (𝜑 → i ∈ ℂ)
5941, 42itgcl 26109 . . . . . 6 (𝜑 → ∫𝐴(ℑ‘𝐵) d𝑥 ∈ ℂ)
6043, 44itgcl 26109 . . . . . 6 (𝜑 → ∫𝐴(ℑ‘𝐶) d𝑥 ∈ ℂ)
6158, 59, 60adddid 11336 . . . . 5 (𝜑 → (i · (∫𝐴(ℑ‘𝐵) d𝑥 + ∫𝐴(ℑ‘𝐶) d𝑥)) = ((i · ∫𝐴(ℑ‘𝐵) d𝑥) + (i · ∫𝐴(ℑ‘𝐶) d𝑥)))
6256, 61eqtrd 2795 . . . 4 (𝜑 → (i · ∫𝐴(ℑ‘(𝐵 + 𝐶)) d𝑥) = ((i · ∫𝐴(ℑ‘𝐵) d𝑥) + (i · ∫𝐴(ℑ‘𝐶) d𝑥)))
6338, 62oveq12d 7438 . . 3 (𝜑 → (∫𝐴(ℜ‘(𝐵 + 𝐶)) d𝑥 + (i · ∫𝐴(ℑ‘(𝐵 + 𝐶)) d𝑥)) = ((∫𝐴(ℜ‘𝐵) d𝑥 + ∫𝐴(ℜ‘𝐶) d𝑥) + ((i · ∫𝐴(ℑ‘𝐵) d𝑥) + (i · ∫𝐴(ℑ‘𝐶) d𝑥))))
6413, 16itgcl 26109 . . . 4 (𝜑 → ∫𝐴(ℜ‘𝐵) d𝑥 ∈ ℂ)
6517, 20itgcl 26109 . . . 4 (𝜑 → ∫𝐴(ℜ‘𝐶) d𝑥 ∈ ℂ)
66 mulcl 11287 . . . . 5 ((i ∈ ℂ ∧ ∫𝐴(ℑ‘𝐵) d𝑥 ∈ ℂ) → (i · ∫𝐴(ℑ‘𝐵) d𝑥) ∈ ℂ)
6757, 59, 66sylancr 599 . . . 4 (𝜑 → (i · ∫𝐴(ℑ‘𝐵) d𝑥) ∈ ℂ)
68 mulcl 11287 . . . . 5 ((i ∈ ℂ ∧ ∫𝐴(ℑ‘𝐶) d𝑥 ∈ ℂ) → (i · ∫𝐴(ℑ‘𝐶) d𝑥) ∈ ℂ)
6957, 60, 68sylancr 599 . . . 4 (𝜑 → (i · ∫𝐴(ℑ‘𝐶) d𝑥) ∈ ℂ)
7064, 65, 67, 69add4d 11542 . . 3 (𝜑 → ((∫𝐴(ℜ‘𝐵) d𝑥 + ∫𝐴(ℜ‘𝐶) d𝑥) + ((i · ∫𝐴(ℑ‘𝐵) d𝑥) + (i · ∫𝐴(ℑ‘𝐶) d𝑥))) = ((∫𝐴(ℜ‘𝐵) d𝑥 + (i · ∫𝐴(ℑ‘𝐵) d𝑥)) + (∫𝐴(ℜ‘𝐶) d𝑥 + (i · ∫𝐴(ℑ‘𝐶) d𝑥))))
7163, 70eqtrd 2795 . 2 (𝜑 → (∫𝐴(ℜ‘(𝐵 + 𝐶)) d𝑥 + (i · ∫𝐴(ℑ‘(𝐵 + 𝐶)) d𝑥)) = ((∫𝐴(ℜ‘𝐵) d𝑥 + (i · ∫𝐴(ℑ‘𝐵) d𝑥)) + (∫𝐴(ℜ‘𝐶) d𝑥 + (i · ∫𝐴(ℑ‘𝐶) d𝑥))))
72 ovexd 7455 . . 3 ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐵 + 𝐶) ∈ V)
734, 1, 9, 6, 30ibladdnc 38688 . . 3 (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐵 + 𝐶)) ∈ 𝐿1)
7472, 73itgcnval 26125 . 2 (𝜑 → ∫𝐴(𝐵 + 𝐶) d𝑥 = (∫𝐴(ℜ‘(𝐵 + 𝐶)) d𝑥 + (i · ∫𝐴(ℑ‘(𝐵 + 𝐶)) d𝑥)))
754, 1itgcnval 26125 . . 3 (𝜑 → ∫𝐴𝐵 d𝑥 = (∫𝐴(ℜ‘𝐵) d𝑥 + (i · ∫𝐴(ℑ‘𝐵) d𝑥)))
769, 6itgcnval 26125 . . 3 (𝜑 → ∫𝐴𝐶 d𝑥 = (∫𝐴(ℜ‘𝐶) d𝑥 + (i · ∫𝐴(ℑ‘𝐶) d𝑥)))
7775, 76oveq12d 7438 . 2 (𝜑 → (∫𝐴𝐵 d𝑥 + ∫𝐴𝐶 d𝑥) = ((∫𝐴(ℜ‘𝐵) d𝑥 + (i · ∫𝐴(ℑ‘𝐵) d𝑥)) + (∫𝐴(ℜ‘𝐶) d𝑥 + (i · ∫𝐴(ℑ‘𝐶) d𝑥))))
7871, 74, 773eqtr4d 2805 1 (𝜑 → ∫𝐴(𝐵 + 𝐶) d𝑥 = (∫𝐴𝐵 d𝑥 + ∫𝐴𝐶 d𝑥))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1569   ∈ wcel 2144  Vcvv 3450   ↦ cmpt 5185   ∘ ccom 5654  ⟶wf 6534  ‘cfv 6538  (class class class)co 7420  ℂcc 11201  ℝcr 11202  ici 11205   + caddc 11206   · cmul 11208  ℜcre 15269  ℑcim 15270  MblFncmbf 25940  𝐿1cibl 25943  ∫citg 25944
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 7751  ax-inf2 9645  ax-cnex 11259  ax-resscn 11260  ax-1cn 11261  ax-icn 11262  ax-addcl 11263  ax-addrcl 11264  ax-mulcl 11265  ax-mulrcl 11266  ax-mulcom 11267  ax-addass 11268  ax-mulass 11269  ax-distr 11270  ax-i2m1 11271  ax-1ne0 11272  ax-1rid 11273  ax-rnegex 11274  ax-rrecex 11275  ax-cnre 11276  ax-pre-lttri 11277  ax-pre-lttrn 11278  ax-pre-ltadd 11279  ax-pre-mulgt0 11280  ax-pre-sup 11281  ax-addf 11282
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-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-ss 3896  df-pss 4014  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-int 4907  df-iun 4952  df-disj 5070  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-se 5604  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 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-of 7693  df-ofr 7694  df-om 7878  df-1st 8001  df-2nd 8002  df-frecs 8302  df-wrecs 8333  df-recs 8382  df-rdg 8421  df-1o 8479  df-2o 8480  df-er 8720  df-map 8852  df-pm 8853  df-en 8977  df-dom 8978  df-sdom 8979  df-fin 8980  df-fi 9406  df-sup 9437  df-inf 9438  df-oi 9507  df-dju 9985  df-card 10023  df-pnf 11348  df-mnf 11349  df-xr 11350  df-ltxr 11351  df-le 11352  df-sub 11546  df-neg 11547  df-div 11977  df-nn 12339  df-2 12408  df-3 12409  df-4 12410  df-n0 12610  df-z 12697  df-uz 12969  df-q 13079  df-rp 13124  df-xneg 13244  df-xadd 13245  df-xmul 13246  df-ioo 13483  df-ico 13485  df-icc 13486  df-fz 13643  df-fzo 13792  df-fl 13935  df-mod 14013  df-seq 14148  df-exp 14208  df-hash 14478  df-cj 15271  df-re 15272  df-im 15273  df-sqrt 15407  df-abs 15408  df-clim 15660  df-sum 15859  df-rest 17598  df-topgen 17619  df-psmet 21675  df-xmet 21676  df-met 21677  df-bl 21678  df-mopn 21679  df-top 23217  df-topon 23234  df-bases 23269  df-cmp 23710  df-ovol 25790  df-vol 25791  df-mbf 25945  df-itg1 25946  df-itg2 25947  df-ibl 25948  df-itg 25949  df-0p 25996
This theorem is used by:  itgsubnc  38693  itgmulc2nc  38699  ftc1cnnclem  38702
  Copyright terms: Public domain W3C validator