---

Step * 2 of Lemma urec-lfp

.....upcase..... 
1. f : Type ⟶ Type
2. continuous'-monotone{i:l}(T.f T)
3. n : ℤ
4. 0 < n
5. (f^n - 1 Void) ⊆r (⋂r:{r:Type| (f r) ⊆r r} . r)
⊢ (f^n Void) ⊆r (⋂r:{r:Type| (f r) ⊆r r} . r)
BY
{ ((RWO "fun_exp_unroll_1" 0 THENA Auto)
   THEN Reduce 0
   THEN (D 0 THEN Auto)
   THEN (Assert (f (f^n - 1 Void)) ⊆r (f r) BY
               (DVarSets THEN Auto))
   THEN Auto) }

---

Latex:

---

Latex:
.....upcase..... 
1.  f  :  Type  {}\mrightarrow{}  Type
2.  continuous'-monotone\{i:l\}(T.f  T)
3.  n  :  \mBbbZ{}
4.  0  <  n
5.  (f\^{}n  -  1  Void)  \msubseteq{}r  (\mcap{}r:\{r:Type|  (f  r)  \msubseteq{}r  r\}  .  r)
\mvdash{}  (f\^{}n  Void)  \msubseteq{}r  (\mcap{}r:\{r:Type|  (f  r)  \msubseteq{}r  r\}  .  r)


By

---

Latex:
((RWO  "fun\_exp\_unroll\_1"  0  THENA  Auto)
  THEN  Reduce  0
  THEN  (D  0  THEN  Auto)
  THEN  (Assert  (f  (f\^{}n  -  1  Void))  \msubseteq{}r  (f  r)  BY
                          (DVarSets  THEN  Auto))
  THEN  Auto)

---

Home Index