---

Step * 1 1 2 1 1 2 of Lemma urec-level_wf

.....set predicate..... 
1. F : Type ⟶ Type
2. ∀T:Type. ((T ⊆r Base) ⇒ (F[T] ⊆r Base))
3. f : ⋂T:{T:Type| T ⊆r Base} . (x:F[T] ⟶ decomp{i:l}(T.F[T];T;x))
4. n : ℤ
5. 0 < n
6. ∀x:F^n - 1 Void. (urec-level(f;x) ∈ ℕ)
7. z : F (F^n - 1 Void)
8. ∀m:ℕ. ((F^m Void) ⊆r Base)
9. con : ⋂T:{T:Type| T ⊆r Base} . ((T List) ⟶ F[T])
10. v1 : {L:(F^n - 1 Void) List| (con L) = z ∈ Base} 
11. ¬(v1 = [] ∈ ((F^n - 1 Void) List))
12. (f z) = <con, v1> ∈ (con:⋂T:{T:Type| T ⊆r Base} . ((T List) ⟶ F[T]) × {L:(F^n - 1 Void) List| (con L) = z ∈ Base} )
⊢ ¬(map(λt.urec-level(f;t);v1) = [] ∈ (ℤ List))
BY
{ ((D 0 THENA Auto) THEN (RepeatFor 2 (DVar `v1') THENA Auto)) }

1
1. F : Type ⟶ Type
2. ∀T:Type. ((T ⊆r Base) ⇒ (F[T] ⊆r Base))
3. f : ⋂T:{T:Type| T ⊆r Base} . (x:F[T] ⟶ decomp{i:l}(T.F[T];T;x))
4. n : ℤ
5. 0 < n
6. ∀x:F^n - 1 Void. (urec-level(f;x) ∈ ℕ)
7. z : F (F^n - 1 Void)
8. ∀m:ℕ. ((F^m Void) ⊆r Base)
9. con : ⋂T:{T:Type| T ⊆r Base} . ((T List) ⟶ F[T])
10. (con []) = z ∈ Base
11. ¬([] = [] ∈ ((F^n - 1 Void) List))
12. (f z) = <con, []> ∈ (con:⋂T:{T:Type| T ⊆r Base} . ((T List) ⟶ F[T]) × {L:(F^n - 1 Void) List| (con L) = z ∈ Base} )
13. map(λt.urec-level(f;t);[]) = [] ∈ (ℤ List)
⊢ False

2
1. F : Type ⟶ Type
2. ∀T:Type. ((T ⊆r Base) ⇒ (F[T] ⊆r Base))
3. f : ⋂T:{T:Type| T ⊆r Base} . (x:F[T] ⟶ decomp{i:l}(T.F[T];T;x))
4. n : ℤ
5. 0 < n
6. ∀x:F^n - 1 Void. (urec-level(f;x) ∈ ℕ)
7. z : F (F^n - 1 Void)
8. ∀m:ℕ. ((F^m Void) ⊆r Base)
9. con : ⋂T:{T:Type| T ⊆r Base} . ((T List) ⟶ F[T])
10. u : F^n - 1 Void
11. v : (F^n - 1 Void) List
12. (con [u / v]) = z ∈ Base
13. ¬([u / v] = [] ∈ ((F^n - 1 Void) List))
14. (f z)
= <con, [u / v]>
∈ (con:⋂T:{T:Type| T ⊆r Base} . ((T List) ⟶ F[T]) × {L:(F^n - 1 Void) List| (con L) = z ∈ Base} )
15. map(λt.urec-level(f;t);[u / v]) = [] ∈ (ℤ List)
⊢ False

---

Latex:

---

Latex:
.....set  predicate..... 
1.  F  :  Type  {}\mrightarrow{}  Type
2.  \mforall{}T:Type.  ((T  \msubseteq{}r  Base)  {}\mRightarrow{}  (F[T]  \msubseteq{}r  Base))
3.  f  :  \mcap{}T:\{T:Type|  T  \msubseteq{}r  Base\}  .  (x:F[T]  {}\mrightarrow{}  decomp\{i:l\}(T.F[T];T;x))
4.  n  :  \mBbbZ{}
5.  0  <  n
6.  \mforall{}x:F\^{}n  -  1  Void.  (urec-level(f;x)  \mmember{}  \mBbbN{})
7.  z  :  F  (F\^{}n  -  1  Void)
8.  \mforall{}m:\mBbbN{}.  ((F\^{}m  Void)  \msubseteq{}r  Base)
9.  con  :  \mcap{}T:\{T:Type|  T  \msubseteq{}r  Base\}  .  ((T  List)  {}\mrightarrow{}  F[T])
10.  v1  :  \{L:(F\^{}n  -  1  Void)  List|  (con  L)  =  z\} 
11.  \mneg{}(v1  =  [])
12.  (f  z)  =  <con,  v1>
\mvdash{}  \mneg{}(map(\mlambda{}t.urec-level(f;t);v1)  =  [])


By

---

Latex:
((D  0  THENA  Auto)  THEN  (RepeatFor  2  (DVar  `v1')  THENA  Auto))

---

Home Index