HSE Home Hilbert Space Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  HSE Home  >  Th. List  >  opsqrlem6 Structured version   Visualization version   GIF version

Theorem opsqrlem6 32164
Description: Lemma for opsqri . (Contributed by NM, 23-Aug-2006.) (New usage is discouraged.)
Hypotheses
Ref Expression
opsqrlem2.1 𝑇 ∈ HrmOp
opsqrlem2.2 𝑆 = (𝑥 ∈ HrmOp, 𝑦 ∈ HrmOp ↦ (𝑥 +op ((1 / 2) ·op (𝑇op (𝑥𝑥)))))
opsqrlem2.3 𝐹 = seq1(𝑆, (ℕ × { 0hop }))
opsqrlem6.4 𝑇op Iop
Assertion
Ref Expression
opsqrlem6 (𝑁 ∈ ℕ → (𝐹𝑁) ≤op Iop )
Distinct variable group:   𝑥,𝑦,𝑇
Allowed substitution hints:   𝑆(𝑥,𝑦)   𝐹(𝑥,𝑦)   𝑁(𝑥,𝑦)

Proof of Theorem opsqrlem6
Dummy variables 𝑗 𝑘 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fveq2 6906 . . 3 (𝑗 = 1 → (𝐹𝑗) = (𝐹‘1))
21breq1d 5153 . 2 (𝑗 = 1 → ((𝐹𝑗) ≤op Iop ↔ (𝐹‘1) ≤op Iop ))
3 fveq2 6906 . . 3 (𝑗 = (𝑘 + 1) → (𝐹𝑗) = (𝐹‘(𝑘 + 1)))
43breq1d 5153 . 2 (𝑗 = (𝑘 + 1) → ((𝐹𝑗) ≤op Iop ↔ (𝐹‘(𝑘 + 1)) ≤op Iop ))
5 fveq2 6906 . . 3 (𝑗 = 𝑁 → (𝐹𝑗) = (𝐹𝑁))
65breq1d 5153 . 2 (𝑗 = 𝑁 → ((𝐹𝑗) ≤op Iop ↔ (𝐹𝑁) ≤op Iop ))
7 opsqrlem2.1 . . . 4 𝑇 ∈ HrmOp
8 opsqrlem2.2 . . . 4 𝑆 = (𝑥 ∈ HrmOp, 𝑦 ∈ HrmOp ↦ (𝑥 +op ((1 / 2) ·op (𝑇op (𝑥𝑥)))))
9 opsqrlem2.3 . . . 4 𝐹 = seq1(𝑆, (ℕ × { 0hop }))
107, 8, 9opsqrlem2 32160 . . 3 (𝐹‘1) = 0hop
11 idleop 32150 . . 3 0hopop Iop
1210, 11eqbrtri 5164 . 2 (𝐹‘1) ≤op Iop
13 idhmop 32001 . . . . . . . 8 Iop ∈ HrmOp
147, 8, 9opsqrlem4 32162 . . . . . . . . 9 𝐹:ℕ⟶HrmOp
1514ffvelcdmi 7103 . . . . . . . 8 (𝑘 ∈ ℕ → (𝐹𝑘) ∈ HrmOp)
16 hmopd 32041 . . . . . . . 8 (( Iop ∈ HrmOp ∧ (𝐹𝑘) ∈ HrmOp) → ( Iopop (𝐹𝑘)) ∈ HrmOp)
1713, 15, 16sylancr 587 . . . . . . 7 (𝑘 ∈ ℕ → ( Iopop (𝐹𝑘)) ∈ HrmOp)
18 eqid 2737 . . . . . . . 8 (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) = (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘)))
19 hmopco 32042 . . . . . . . 8 ((( Iopop (𝐹𝑘)) ∈ HrmOp ∧ ( Iopop (𝐹𝑘)) ∈ HrmOp ∧ (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) = (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘)))) → (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) ∈ HrmOp)
2018, 19mp3an3 1452 . . . . . . 7 ((( Iopop (𝐹𝑘)) ∈ HrmOp ∧ ( Iopop (𝐹𝑘)) ∈ HrmOp) → (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) ∈ HrmOp)
2117, 17, 20syl2anc 584 . . . . . 6 (𝑘 ∈ ℕ → (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) ∈ HrmOp)
22 leopsq 32148 . . . . . . 7 (( Iopop (𝐹𝑘)) ∈ HrmOp → 0hopop (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))))
2317, 22syl 17 . . . . . 6 (𝑘 ∈ ℕ → 0hopop (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))))
24 opsqrlem6.4 . . . . . . . 8 𝑇op Iop
25 leop3 32144 . . . . . . . . 9 ((𝑇 ∈ HrmOp ∧ Iop ∈ HrmOp) → (𝑇op Iop ↔ 0hopop ( Iopop 𝑇)))
267, 13, 25mp2an 692 . . . . . . . 8 (𝑇op Iop ↔ 0hopop ( Iopop 𝑇))
2724, 26mpbi 230 . . . . . . 7 0hopop ( Iopop 𝑇)
28 hmopd 32041 . . . . . . . . 9 (( Iop ∈ HrmOp ∧ 𝑇 ∈ HrmOp) → ( Iopop 𝑇) ∈ HrmOp)
2913, 7, 28mp2an 692 . . . . . . . 8 ( Iopop 𝑇) ∈ HrmOp
30 leopadd 32151 . . . . . . . 8 ((((( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) ∈ HrmOp ∧ ( Iopop 𝑇) ∈ HrmOp) ∧ ( 0hopop (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) ∧ 0hopop ( Iopop 𝑇))) → 0hopop ((( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) +op ( Iopop 𝑇)))
3129, 30mpanl2 701 . . . . . . 7 (((( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) ∈ HrmOp ∧ ( 0hopop (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) ∧ 0hopop ( Iopop 𝑇))) → 0hopop ((( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) +op ( Iopop 𝑇)))
3227, 31mpanr2 704 . . . . . 6 (((( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) ∈ HrmOp ∧ 0hopop (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘)))) → 0hopop ((( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) +op ( Iopop 𝑇)))
3321, 23, 32syl2anc 584 . . . . 5 (𝑘 ∈ ℕ → 0hopop ((( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) +op ( Iopop 𝑇)))
34 2cn 12341 . . . . . . . . . 10 2 ∈ ℂ
35 hmopf 31893 . . . . . . . . . . 11 ((𝐹𝑘) ∈ HrmOp → (𝐹𝑘): ℋ⟶ ℋ)
3615, 35syl 17 . . . . . . . . . 10 (𝑘 ∈ ℕ → (𝐹𝑘): ℋ⟶ ℋ)
37 homulcl 31778 . . . . . . . . . 10 ((2 ∈ ℂ ∧ (𝐹𝑘): ℋ⟶ ℋ) → (2 ·op (𝐹𝑘)): ℋ⟶ ℋ)
3834, 36, 37sylancr 587 . . . . . . . . 9 (𝑘 ∈ ℕ → (2 ·op (𝐹𝑘)): ℋ⟶ ℋ)
39 hmopf 31893 . . . . . . . . . . 11 (𝑇 ∈ HrmOp → 𝑇: ℋ⟶ ℋ)
407, 39ax-mp 5 . . . . . . . . . 10 𝑇: ℋ⟶ ℋ
41 fco 6760 . . . . . . . . . . 11 (((𝐹𝑘): ℋ⟶ ℋ ∧ (𝐹𝑘): ℋ⟶ ℋ) → ((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ)
4236, 36, 41syl2anc 584 . . . . . . . . . 10 (𝑘 ∈ ℕ → ((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ)
43 hosubcl 31792 . . . . . . . . . 10 ((𝑇: ℋ⟶ ℋ ∧ ((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ) → (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ)
4440, 42, 43sylancr 587 . . . . . . . . 9 (𝑘 ∈ ℕ → (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ)
45 hmopf 31893 . . . . . . . . . . . 12 ( Iop ∈ HrmOp → Iop : ℋ⟶ ℋ)
4613, 45ax-mp 5 . . . . . . . . . . 11 Iop : ℋ⟶ ℋ
47 homulcl 31778 . . . . . . . . . . 11 ((2 ∈ ℂ ∧ Iop : ℋ⟶ ℋ) → (2 ·op Iop ): ℋ⟶ ℋ)
4834, 46, 47mp2an 692 . . . . . . . . . 10 (2 ·op Iop ): ℋ⟶ ℋ
49 hosubsub4 31837 . . . . . . . . . 10 (((2 ·op Iop ): ℋ⟶ ℋ ∧ (2 ·op (𝐹𝑘)): ℋ⟶ ℋ ∧ (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ) → (((2 ·op Iop ) −op (2 ·op (𝐹𝑘))) −op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = ((2 ·op Iop ) −op ((2 ·op (𝐹𝑘)) +op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))
5048, 49mp3an1 1450 . . . . . . . . 9 (((2 ·op (𝐹𝑘)): ℋ⟶ ℋ ∧ (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ) → (((2 ·op Iop ) −op (2 ·op (𝐹𝑘))) −op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = ((2 ·op Iop ) −op ((2 ·op (𝐹𝑘)) +op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))
5138, 44, 50syl2anc 584 . . . . . . . 8 (𝑘 ∈ ℕ → (((2 ·op Iop ) −op (2 ·op (𝐹𝑘))) −op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = ((2 ·op Iop ) −op ((2 ·op (𝐹𝑘)) +op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))
52 hosubcl 31792 . . . . . . . . . . . . . . 15 ((((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ ∧ (2 ·op (𝐹𝑘)): ℋ⟶ ℋ) → (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘))): ℋ⟶ ℋ)
5342, 38, 52syl2anc 584 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘))): ℋ⟶ ℋ)
54 hoadd32 31802 . . . . . . . . . . . . . . 15 (( Iop : ℋ⟶ ℋ ∧ (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘))): ℋ⟶ ℋ ∧ Iop : ℋ⟶ ℋ) → (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op Iop ) = (( Iop +op Iop ) +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
5546, 46, 54mp3an13 1454 . . . . . . . . . . . . . 14 ((((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘))): ℋ⟶ ℋ → (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op Iop ) = (( Iop +op Iop ) +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
5653, 55syl 17 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op Iop ) = (( Iop +op Iop ) +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
57 ho2times 31838 . . . . . . . . . . . . . . 15 ( Iop : ℋ⟶ ℋ → (2 ·op Iop ) = ( Iop +op Iop ))
5846, 57ax-mp 5 . . . . . . . . . . . . . 14 (2 ·op Iop ) = ( Iop +op Iop )
5958oveq1i 7441 . . . . . . . . . . . . 13 ((2 ·op Iop ) +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) = (( Iop +op Iop ) +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘))))
6056, 59eqtr4di 2795 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op Iop ) = ((2 ·op Iop ) +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
61 hoaddsubass 31834 . . . . . . . . . . . . . 14 (((2 ·op Iop ): ℋ⟶ ℋ ∧ ((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ ∧ (2 ·op (𝐹𝑘)): ℋ⟶ ℋ) → (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))) = ((2 ·op Iop ) +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
6248, 61mp3an1 1450 . . . . . . . . . . . . 13 ((((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ ∧ (2 ·op (𝐹𝑘)): ℋ⟶ ℋ) → (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))) = ((2 ·op Iop ) +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
6342, 38, 62syl2anc 584 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))) = ((2 ·op Iop ) +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
6460, 63eqtr4d 2780 . . . . . . . . . . 11 (𝑘 ∈ ℕ → (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op Iop ) = (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))))
6564oveq1d 7446 . . . . . . . . . 10 (𝑘 ∈ ℕ → ((( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op Iop ) −op 𝑇) = ((((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))) −op 𝑇))
66 hoaddcl 31777 . . . . . . . . . . . 12 (( Iop : ℋ⟶ ℋ ∧ (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘))): ℋ⟶ ℋ) → ( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))): ℋ⟶ ℋ)
6746, 53, 66sylancr 587 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))): ℋ⟶ ℋ)
68 hoaddsubass 31834 . . . . . . . . . . . 12 ((( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))): ℋ⟶ ℋ ∧ Iop : ℋ⟶ ℋ ∧ 𝑇: ℋ⟶ ℋ) → ((( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op Iop ) −op 𝑇) = (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op ( Iopop 𝑇)))
6946, 40, 68mp3an23 1455 . . . . . . . . . . 11 (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))): ℋ⟶ ℋ → ((( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op Iop ) −op 𝑇) = (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op ( Iopop 𝑇)))
7067, 69syl 17 . . . . . . . . . 10 (𝑘 ∈ ℕ → ((( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op Iop ) −op 𝑇) = (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op ( Iopop 𝑇)))
71 hoaddcl 31777 . . . . . . . . . . . 12 (((2 ·op Iop ): ℋ⟶ ℋ ∧ ((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ) → ((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ)
7248, 42, 71sylancr 587 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ)
73 hosubsub4 31837 . . . . . . . . . . . 12 ((((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ ∧ (2 ·op (𝐹𝑘)): ℋ⟶ ℋ ∧ 𝑇: ℋ⟶ ℋ) → ((((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))) −op 𝑇) = (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((2 ·op (𝐹𝑘)) +op 𝑇)))
7440, 73mp3an3 1452 . . . . . . . . . . 11 ((((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ ∧ (2 ·op (𝐹𝑘)): ℋ⟶ ℋ) → ((((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))) −op 𝑇) = (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((2 ·op (𝐹𝑘)) +op 𝑇)))
7572, 38, 74syl2anc 584 . . . . . . . . . 10 (𝑘 ∈ ℕ → ((((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))) −op 𝑇) = (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((2 ·op (𝐹𝑘)) +op 𝑇)))
7665, 70, 753eqtr3d 2785 . . . . . . . . 9 (𝑘 ∈ ℕ → (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op ( Iopop 𝑇)) = (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((2 ·op (𝐹𝑘)) +op 𝑇)))
77 hosubadd4 31833 . . . . . . . . . . . 12 ((((2 ·op Iop ): ℋ⟶ ℋ ∧ (2 ·op (𝐹𝑘)): ℋ⟶ ℋ) ∧ (𝑇: ℋ⟶ ℋ ∧ ((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ)) → (((2 ·op Iop ) −op (2 ·op (𝐹𝑘))) −op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((2 ·op (𝐹𝑘)) +op 𝑇)))
7840, 77mpanr1 703 . . . . . . . . . . 11 ((((2 ·op Iop ): ℋ⟶ ℋ ∧ (2 ·op (𝐹𝑘)): ℋ⟶ ℋ) ∧ ((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ) → (((2 ·op Iop ) −op (2 ·op (𝐹𝑘))) −op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((2 ·op (𝐹𝑘)) +op 𝑇)))
7948, 78mpanl1 700 . . . . . . . . . 10 (((2 ·op (𝐹𝑘)): ℋ⟶ ℋ ∧ ((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ) → (((2 ·op Iop ) −op (2 ·op (𝐹𝑘))) −op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((2 ·op (𝐹𝑘)) +op 𝑇)))
8038, 42, 79syl2anc 584 . . . . . . . . 9 (𝑘 ∈ ℕ → (((2 ·op Iop ) −op (2 ·op (𝐹𝑘))) −op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (((2 ·op Iop ) +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((2 ·op (𝐹𝑘)) +op 𝑇)))
8176, 80eqtr4d 2780 . . . . . . . 8 (𝑘 ∈ ℕ → (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op ( Iopop 𝑇)) = (((2 ·op Iop ) −op (2 ·op (𝐹𝑘))) −op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))
82 halfcn 12481 . . . . . . . . . . . 12 (1 / 2) ∈ ℂ
83 homulcl 31778 . . . . . . . . . . . 12 (((1 / 2) ∈ ℂ ∧ (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ) → ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))): ℋ⟶ ℋ)
8482, 44, 83sylancr 587 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))): ℋ⟶ ℋ)
85 hoadddi 31822 . . . . . . . . . . . 12 ((2 ∈ ℂ ∧ (𝐹𝑘): ℋ⟶ ℋ ∧ ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))): ℋ⟶ ℋ) → (2 ·op ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))) = ((2 ·op (𝐹𝑘)) +op (2 ·op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))))
8634, 85mp3an1 1450 . . . . . . . . . . 11 (((𝐹𝑘): ℋ⟶ ℋ ∧ ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))): ℋ⟶ ℋ) → (2 ·op ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))) = ((2 ·op (𝐹𝑘)) +op (2 ·op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))))
8736, 84, 86syl2anc 584 . . . . . . . . . 10 (𝑘 ∈ ℕ → (2 ·op ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))) = ((2 ·op (𝐹𝑘)) +op (2 ·op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))))
88 2ne0 12370 . . . . . . . . . . . . . 14 2 ≠ 0
8934, 88recidi 11998 . . . . . . . . . . . . 13 (2 · (1 / 2)) = 1
9089oveq1i 7441 . . . . . . . . . . . 12 ((2 · (1 / 2)) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (1 ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))
91 homulass 31821 . . . . . . . . . . . . . 14 ((2 ∈ ℂ ∧ (1 / 2) ∈ ℂ ∧ (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ) → ((2 · (1 / 2)) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (2 ·op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))
9234, 82, 91mp3an12 1453 . . . . . . . . . . . . 13 ((𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ → ((2 · (1 / 2)) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (2 ·op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))
9344, 92syl 17 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → ((2 · (1 / 2)) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (2 ·op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))
94 homullid 31819 . . . . . . . . . . . . 13 ((𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))): ℋ⟶ ℋ → (1 ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))
9544, 94syl 17 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (1 ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))
9690, 93, 953eqtr3a 2801 . . . . . . . . . . 11 (𝑘 ∈ ℕ → (2 ·op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))) = (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))
9796oveq2d 7447 . . . . . . . . . 10 (𝑘 ∈ ℕ → ((2 ·op (𝐹𝑘)) +op (2 ·op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))) = ((2 ·op (𝐹𝑘)) +op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))
9887, 97eqtrd 2777 . . . . . . . . 9 (𝑘 ∈ ℕ → (2 ·op ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))) = ((2 ·op (𝐹𝑘)) +op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))
9998oveq2d 7447 . . . . . . . 8 (𝑘 ∈ ℕ → ((2 ·op Iop ) −op (2 ·op ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))) = ((2 ·op Iop ) −op ((2 ·op (𝐹𝑘)) +op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))
10051, 81, 993eqtr4d 2787 . . . . . . 7 (𝑘 ∈ ℕ → (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op ( Iopop 𝑇)) = ((2 ·op Iop ) −op (2 ·op ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))))
101 hoaddcl 31777 . . . . . . . . 9 (((𝐹𝑘): ℋ⟶ ℋ ∧ ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))): ℋ⟶ ℋ) → ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))): ℋ⟶ ℋ)
10236, 84, 101syl2anc 584 . . . . . . . 8 (𝑘 ∈ ℕ → ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))): ℋ⟶ ℋ)
103 hosubdi 31827 . . . . . . . . 9 ((2 ∈ ℂ ∧ Iop : ℋ⟶ ℋ ∧ ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))): ℋ⟶ ℋ) → (2 ·op ( Iopop ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))) = ((2 ·op Iop ) −op (2 ·op ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))))
10434, 46, 103mp3an12 1453 . . . . . . . 8 (((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))): ℋ⟶ ℋ → (2 ·op ( Iopop ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))) = ((2 ·op Iop ) −op (2 ·op ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))))
105102, 104syl 17 . . . . . . 7 (𝑘 ∈ ℕ → (2 ·op ( Iopop ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))) = ((2 ·op Iop ) −op (2 ·op ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))))
106100, 105eqtr4d 2780 . . . . . 6 (𝑘 ∈ ℕ → (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op ( Iopop 𝑇)) = (2 ·op ( Iopop ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))))
107 hosubcl 31792 . . . . . . . . . 10 (( Iop : ℋ⟶ ℋ ∧ (𝐹𝑘): ℋ⟶ ℋ) → ( Iopop (𝐹𝑘)): ℋ⟶ ℋ)
10846, 36, 107sylancr 587 . . . . . . . . 9 (𝑘 ∈ ℕ → ( Iopop (𝐹𝑘)): ℋ⟶ ℋ)
109 hocsubdir 31804 . . . . . . . . . 10 (( Iop : ℋ⟶ ℋ ∧ (𝐹𝑘): ℋ⟶ ℋ ∧ ( Iopop (𝐹𝑘)): ℋ⟶ ℋ) → (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) = (( Iop ∘ ( Iopop (𝐹𝑘))) −op ((𝐹𝑘) ∘ ( Iopop (𝐹𝑘)))))
11046, 109mp3an1 1450 . . . . . . . . 9 (((𝐹𝑘): ℋ⟶ ℋ ∧ ( Iopop (𝐹𝑘)): ℋ⟶ ℋ) → (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) = (( Iop ∘ ( Iopop (𝐹𝑘))) −op ((𝐹𝑘) ∘ ( Iopop (𝐹𝑘)))))
11136, 108, 110syl2anc 584 . . . . . . . 8 (𝑘 ∈ ℕ → (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) = (( Iop ∘ ( Iopop (𝐹𝑘))) −op ((𝐹𝑘) ∘ ( Iopop (𝐹𝑘)))))
112 hmoplin 31961 . . . . . . . . . . . . . . 15 ( Iop ∈ HrmOp → Iop ∈ LinOp)
11313, 112ax-mp 5 . . . . . . . . . . . . . 14 Iop ∈ LinOp
114 hoddi 32009 . . . . . . . . . . . . . 14 (( Iop ∈ LinOp ∧ Iop : ℋ⟶ ℋ ∧ (𝐹𝑘): ℋ⟶ ℋ) → ( Iop ∘ ( Iopop (𝐹𝑘))) = (( Iop ∘ Iop ) −op ( Iop ∘ (𝐹𝑘))))
115113, 46, 114mp3an12 1453 . . . . . . . . . . . . 13 ((𝐹𝑘): ℋ⟶ ℋ → ( Iop ∘ ( Iopop (𝐹𝑘))) = (( Iop ∘ Iop ) −op ( Iop ∘ (𝐹𝑘))))
11636, 115syl 17 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → ( Iop ∘ ( Iopop (𝐹𝑘))) = (( Iop ∘ Iop ) −op ( Iop ∘ (𝐹𝑘))))
11746hoid1i 31808 . . . . . . . . . . . . . 14 ( Iop ∘ Iop ) = Iop
118117a1i 11 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → ( Iop ∘ Iop ) = Iop )
119 hoico2 31776 . . . . . . . . . . . . . 14 ((𝐹𝑘): ℋ⟶ ℋ → ( Iop ∘ (𝐹𝑘)) = (𝐹𝑘))
12036, 119syl 17 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → ( Iop ∘ (𝐹𝑘)) = (𝐹𝑘))
121118, 120oveq12d 7449 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (( Iop ∘ Iop ) −op ( Iop ∘ (𝐹𝑘))) = ( Iopop (𝐹𝑘)))
122116, 121eqtrd 2777 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ( Iop ∘ ( Iopop (𝐹𝑘))) = ( Iopop (𝐹𝑘)))
123 hmoplin 31961 . . . . . . . . . . . . . 14 ((𝐹𝑘) ∈ HrmOp → (𝐹𝑘) ∈ LinOp)
12415, 123syl 17 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (𝐹𝑘) ∈ LinOp)
125 hoddi 32009 . . . . . . . . . . . . . 14 (((𝐹𝑘) ∈ LinOp ∧ Iop : ℋ⟶ ℋ ∧ (𝐹𝑘): ℋ⟶ ℋ) → ((𝐹𝑘) ∘ ( Iopop (𝐹𝑘))) = (((𝐹𝑘) ∘ Iop ) −op ((𝐹𝑘) ∘ (𝐹𝑘))))
12646, 125mp3an2 1451 . . . . . . . . . . . . 13 (((𝐹𝑘) ∈ LinOp ∧ (𝐹𝑘): ℋ⟶ ℋ) → ((𝐹𝑘) ∘ ( Iopop (𝐹𝑘))) = (((𝐹𝑘) ∘ Iop ) −op ((𝐹𝑘) ∘ (𝐹𝑘))))
127124, 36, 126syl2anc 584 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → ((𝐹𝑘) ∘ ( Iopop (𝐹𝑘))) = (((𝐹𝑘) ∘ Iop ) −op ((𝐹𝑘) ∘ (𝐹𝑘))))
128 hoico1 31775 . . . . . . . . . . . . . 14 ((𝐹𝑘): ℋ⟶ ℋ → ((𝐹𝑘) ∘ Iop ) = (𝐹𝑘))
12936, 128syl 17 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → ((𝐹𝑘) ∘ Iop ) = (𝐹𝑘))
130129oveq1d 7446 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (((𝐹𝑘) ∘ Iop ) −op ((𝐹𝑘) ∘ (𝐹𝑘))) = ((𝐹𝑘) −op ((𝐹𝑘) ∘ (𝐹𝑘))))
131127, 130eqtrd 2777 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((𝐹𝑘) ∘ ( Iopop (𝐹𝑘))) = ((𝐹𝑘) −op ((𝐹𝑘) ∘ (𝐹𝑘))))
132122, 131oveq12d 7449 . . . . . . . . . 10 (𝑘 ∈ ℕ → (( Iop ∘ ( Iopop (𝐹𝑘))) −op ((𝐹𝑘) ∘ ( Iopop (𝐹𝑘)))) = (( Iopop (𝐹𝑘)) −op ((𝐹𝑘) −op ((𝐹𝑘) ∘ (𝐹𝑘)))))
13336, 46jctil 519 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ( Iop : ℋ⟶ ℋ ∧ (𝐹𝑘): ℋ⟶ ℋ))
134 hosubadd4 31833 . . . . . . . . . . 11 ((( Iop : ℋ⟶ ℋ ∧ (𝐹𝑘): ℋ⟶ ℋ) ∧ ((𝐹𝑘): ℋ⟶ ℋ ∧ ((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ)) → (( Iopop (𝐹𝑘)) −op ((𝐹𝑘) −op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (( Iop +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((𝐹𝑘) +op (𝐹𝑘))))
135133, 36, 42, 134syl12anc 837 . . . . . . . . . 10 (𝑘 ∈ ℕ → (( Iopop (𝐹𝑘)) −op ((𝐹𝑘) −op ((𝐹𝑘) ∘ (𝐹𝑘)))) = (( Iop +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((𝐹𝑘) +op (𝐹𝑘))))
136132, 135eqtrd 2777 . . . . . . . . 9 (𝑘 ∈ ℕ → (( Iop ∘ ( Iopop (𝐹𝑘))) −op ((𝐹𝑘) ∘ ( Iopop (𝐹𝑘)))) = (( Iop +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((𝐹𝑘) +op (𝐹𝑘))))
137 ho2times 31838 . . . . . . . . . . 11 ((𝐹𝑘): ℋ⟶ ℋ → (2 ·op (𝐹𝑘)) = ((𝐹𝑘) +op (𝐹𝑘)))
13836, 137syl 17 . . . . . . . . . 10 (𝑘 ∈ ℕ → (2 ·op (𝐹𝑘)) = ((𝐹𝑘) +op (𝐹𝑘)))
139138oveq2d 7447 . . . . . . . . 9 (𝑘 ∈ ℕ → (( Iop +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))) = (( Iop +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op ((𝐹𝑘) +op (𝐹𝑘))))
140 hoaddsubass 31834 . . . . . . . . . . 11 (( Iop : ℋ⟶ ℋ ∧ ((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ ∧ (2 ·op (𝐹𝑘)): ℋ⟶ ℋ) → (( Iop +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))) = ( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
14146, 140mp3an1 1450 . . . . . . . . . 10 ((((𝐹𝑘) ∘ (𝐹𝑘)): ℋ⟶ ℋ ∧ (2 ·op (𝐹𝑘)): ℋ⟶ ℋ) → (( Iop +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))) = ( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
14242, 38, 141syl2anc 584 . . . . . . . . 9 (𝑘 ∈ ℕ → (( Iop +op ((𝐹𝑘) ∘ (𝐹𝑘))) −op (2 ·op (𝐹𝑘))) = ( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
143136, 139, 1423eqtr2d 2783 . . . . . . . 8 (𝑘 ∈ ℕ → (( Iop ∘ ( Iopop (𝐹𝑘))) −op ((𝐹𝑘) ∘ ( Iopop (𝐹𝑘)))) = ( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
144111, 143eqtrd 2777 . . . . . . 7 (𝑘 ∈ ℕ → (( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) = ( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))))
145144oveq1d 7446 . . . . . 6 (𝑘 ∈ ℕ → ((( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) +op ( Iopop 𝑇)) = (( Iop +op (((𝐹𝑘) ∘ (𝐹𝑘)) −op (2 ·op (𝐹𝑘)))) +op ( Iopop 𝑇)))
1467, 8, 9opsqrlem5 32163 . . . . . . . 8 (𝑘 ∈ ℕ → (𝐹‘(𝑘 + 1)) = ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))
147146oveq2d 7447 . . . . . . 7 (𝑘 ∈ ℕ → ( Iopop (𝐹‘(𝑘 + 1))) = ( Iopop ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘)))))))
148147oveq2d 7447 . . . . . 6 (𝑘 ∈ ℕ → (2 ·op ( Iopop (𝐹‘(𝑘 + 1)))) = (2 ·op ( Iopop ((𝐹𝑘) +op ((1 / 2) ·op (𝑇op ((𝐹𝑘) ∘ (𝐹𝑘))))))))
149106, 145, 1483eqtr4d 2787 . . . . 5 (𝑘 ∈ ℕ → ((( Iopop (𝐹𝑘)) ∘ ( Iopop (𝐹𝑘))) +op ( Iopop 𝑇)) = (2 ·op ( Iopop (𝐹‘(𝑘 + 1)))))
15033, 149breqtrd 5169 . . . 4 (𝑘 ∈ ℕ → 0hopop (2 ·op ( Iopop (𝐹‘(𝑘 + 1)))))
151 peano2nn 12278 . . . . . . 7 (𝑘 ∈ ℕ → (𝑘 + 1) ∈ ℕ)
15214ffvelcdmi 7103 . . . . . . 7 ((𝑘 + 1) ∈ ℕ → (𝐹‘(𝑘 + 1)) ∈ HrmOp)
153151, 152syl 17 . . . . . 6 (𝑘 ∈ ℕ → (𝐹‘(𝑘 + 1)) ∈ HrmOp)
154 hmopd 32041 . . . . . 6 (( Iop ∈ HrmOp ∧ (𝐹‘(𝑘 + 1)) ∈ HrmOp) → ( Iopop (𝐹‘(𝑘 + 1))) ∈ HrmOp)
15513, 153, 154sylancr 587 . . . . 5 (𝑘 ∈ ℕ → ( Iopop (𝐹‘(𝑘 + 1))) ∈ HrmOp)
156 2re 12340 . . . . . 6 2 ∈ ℝ
157 2pos 12369 . . . . . 6 0 < 2
158 leopmul 32153 . . . . . 6 ((2 ∈ ℝ ∧ ( Iopop (𝐹‘(𝑘 + 1))) ∈ HrmOp ∧ 0 < 2) → ( 0hopop ( Iopop (𝐹‘(𝑘 + 1))) ↔ 0hopop (2 ·op ( Iopop (𝐹‘(𝑘 + 1))))))
159156, 157, 158mp3an13 1454 . . . . 5 (( Iopop (𝐹‘(𝑘 + 1))) ∈ HrmOp → ( 0hopop ( Iopop (𝐹‘(𝑘 + 1))) ↔ 0hopop (2 ·op ( Iopop (𝐹‘(𝑘 + 1))))))
160155, 159syl 17 . . . 4 (𝑘 ∈ ℕ → ( 0hopop ( Iopop (𝐹‘(𝑘 + 1))) ↔ 0hopop (2 ·op ( Iopop (𝐹‘(𝑘 + 1))))))
161150, 160mpbird 257 . . 3 (𝑘 ∈ ℕ → 0hopop ( Iopop (𝐹‘(𝑘 + 1))))
162 leop3 32144 . . . 4 (((𝐹‘(𝑘 + 1)) ∈ HrmOp ∧ Iop ∈ HrmOp) → ((𝐹‘(𝑘 + 1)) ≤op Iop ↔ 0hopop ( Iopop (𝐹‘(𝑘 + 1)))))
163153, 13, 162sylancl 586 . . 3 (𝑘 ∈ ℕ → ((𝐹‘(𝑘 + 1)) ≤op Iop ↔ 0hopop ( Iopop (𝐹‘(𝑘 + 1)))))
164161, 163mpbird 257 . 2 (𝑘 ∈ ℕ → (𝐹‘(𝑘 + 1)) ≤op Iop )
1652, 4, 6, 12, 164nn1suc 12288 1 (𝑁 ∈ ℕ → (𝐹𝑁) ≤op Iop )
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1540  wcel 2108  {csn 4626   class class class wbr 5143   × cxp 5683  ccom 5689  wf 6557  cfv 6561  (class class class)co 7431  cmpo 7433  cc 11153  cr 11154  0cc0 11155  1c1 11156   + caddc 11158   · cmul 11160   < clt 11295   / cdiv 11920  cn 12266  2c2 12321  seqcseq 14042  chba 30938   +op chos 30957   ·op chot 30958  op chod 30959   0hop ch0o 30962   Iop chio 30963  LinOpclo 30966  HrmOpcho 30969  op cleo 30977
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-rep 5279  ax-sep 5296  ax-nul 5306  ax-pow 5365  ax-pr 5432  ax-un 7755  ax-inf2 9681  ax-cc 10475  ax-cnex 11211  ax-resscn 11212  ax-1cn 11213  ax-icn 11214  ax-addcl 11215  ax-addrcl 11216  ax-mulcl 11217  ax-mulrcl 11218  ax-mulcom 11219  ax-addass 11220  ax-mulass 11221  ax-distr 11222  ax-i2m1 11223  ax-1ne0 11224  ax-1rid 11225  ax-rnegex 11226  ax-rrecex 11227  ax-cnre 11228  ax-pre-lttri 11229  ax-pre-lttrn 11230  ax-pre-ltadd 11231  ax-pre-mulgt0 11232  ax-pre-sup 11233  ax-addf 11234  ax-mulf 11235  ax-hilex 31018  ax-hfvadd 31019  ax-hvcom 31020  ax-hvass 31021  ax-hv0cl 31022  ax-hvaddid 31023  ax-hfvmul 31024  ax-hvmulid 31025  ax-hvmulass 31026  ax-hvdistr1 31027  ax-hvdistr2 31028  ax-hvmul0 31029  ax-hfi 31098  ax-his1 31101  ax-his2 31102  ax-his3 31103  ax-his4 31104  ax-hcompl 31221
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3380  df-reu 3381  df-rab 3437  df-v 3482  df-sbc 3789  df-csb 3900  df-dif 3954  df-un 3956  df-in 3958  df-ss 3968  df-pss 3971  df-nul 4334  df-if 4526  df-pw 4602  df-sn 4627  df-pr 4629  df-tp 4631  df-op 4633  df-uni 4908  df-int 4947  df-iun 4993  df-iin 4994  df-br 5144  df-opab 5206  df-mpt 5226  df-tr 5260  df-id 5578  df-eprel 5584  df-po 5592  df-so 5593  df-fr 5637  df-se 5638  df-we 5639  df-xp 5691  df-rel 5692  df-cnv 5693  df-co 5694  df-dm 5695  df-rn 5696  df-res 5697  df-ima 5698  df-pred 6321  df-ord 6387  df-on 6388  df-lim 6389  df-suc 6390  df-iota 6514  df-fun 6563  df-fn 6564  df-f 6565  df-f1 6566  df-fo 6567  df-f1o 6568  df-fv 6569  df-isom 6570  df-riota 7388  df-ov 7434  df-oprab 7435  df-mpo 7436  df-of 7697  df-om 7888  df-1st 8014  df-2nd 8015  df-supp 8186  df-frecs 8306  df-wrecs 8337  df-recs 8411  df-rdg 8450  df-1o 8506  df-2o 8507  df-oadd 8510  df-omul 8511  df-er 8745  df-map 8868  df-pm 8869  df-ixp 8938  df-en 8986  df-dom 8987  df-sdom 8988  df-fin 8989  df-fsupp 9402  df-fi 9451  df-sup 9482  df-inf 9483  df-oi 9550  df-card 9979  df-acn 9982  df-pnf 11297  df-mnf 11298  df-xr 11299  df-ltxr 11300  df-le 11301  df-sub 11494  df-neg 11495  df-div 11921  df-nn 12267  df-2 12329  df-3 12330  df-4 12331  df-5 12332  df-6 12333  df-7 12334  df-8 12335  df-9 12336  df-n0 12527  df-z 12614  df-dec 12734  df-uz 12879  df-q 12991  df-rp 13035  df-xneg 13154  df-xadd 13155  df-xmul 13156  df-ioo 13391  df-ico 13393  df-icc 13394  df-fz 13548  df-fzo 13695  df-fl 13832  df-seq 14043  df-exp 14103  df-hash 14370  df-cj 15138  df-re 15139  df-im 15140  df-sqrt 15274  df-abs 15275  df-clim 15524  df-rlim 15525  df-sum 15723  df-struct 17184  df-sets 17201  df-slot 17219  df-ndx 17231  df-base 17248  df-ress 17275  df-plusg 17310  df-mulr 17311  df-starv 17312  df-sca 17313  df-vsca 17314  df-ip 17315  df-tset 17316  df-ple 17317  df-ds 17319  df-unif 17320  df-hom 17321  df-cco 17322  df-rest 17467  df-topn 17468  df-0g 17486  df-gsum 17487  df-topgen 17488  df-pt 17489  df-prds 17492  df-xrs 17547  df-qtop 17552  df-imas 17553  df-xps 17555  df-mre 17629  df-mrc 17630  df-acs 17632  df-mgm 18653  df-sgrp 18732  df-mnd 18748  df-submnd 18797  df-mulg 19086  df-cntz 19335  df-cmn 19800  df-psmet 21356  df-xmet 21357  df-met 21358  df-bl 21359  df-mopn 21360  df-fbas 21361  df-fg 21362  df-cnfld 21365  df-top 22900  df-topon 22917  df-topsp 22939  df-bases 22953  df-cld 23027  df-ntr 23028  df-cls 23029  df-nei 23106  df-cn 23235  df-cnp 23236  df-lm 23237  df-haus 23323  df-tx 23570  df-hmeo 23763  df-fil 23854  df-fm 23946  df-flim 23947  df-flf 23948  df-xms 24330  df-ms 24331  df-tms 24332  df-cfil 25289  df-cau 25290  df-cmet 25291  df-grpo 30512  df-gid 30513  df-ginv 30514  df-gdiv 30515  df-ablo 30564  df-vc 30578  df-nv 30611  df-va 30614  df-ba 30615  df-sm 30616  df-0v 30617  df-vs 30618  df-nmcv 30619  df-ims 30620  df-dip 30720  df-ssp 30741  df-ph 30832  df-cbn 30882  df-hnorm 30987  df-hba 30988  df-hvsub 30990  df-hlim 30991  df-hcau 30992  df-sh 31226  df-ch 31240  df-oc 31271  df-ch0 31272  df-shs 31327  df-pjh 31414  df-hosum 31749  df-homul 31750  df-hodif 31751  df-h0op 31767  df-iop 31768  df-lnop 31860  df-hmop 31863  df-leop 31871
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator