---

Step * 2 2 of Lemma mkW_wf


1. Pos : Type
2. Mv : Pos ⟶ Type
3. a : Pos
4. f : Mv[a] ⟶ WfdSpread(Pos;a.Mv[a])
5. Spread(Pos;a.Mv[a]) ≡ a:Pos × (Mv[a] ⟶ Spread(Pos;a.Mv[a]))
6. p : ℕ ⟶ MoveChoice(Pos;a.Mv[a])
7. y : Unit
8. (p 0 a) = (inr y ) ∈ (Mv[a]?)
⊢ ↓∃n:ℕ. (↑isr(if (n =z 0) then inl <a, f> else inr y  fi ))
BY
{ (D 0 THEN With ⌜1⌝ (D 0)⋅ THEN Reduce 0 THEN Try (AutoSplit) THEN Auto)⋅ }

---

Latex:

---

Latex:

1.  Pos  :  Type
2.  Mv  :  Pos  {}\mrightarrow{}  Type
3.  a  :  Pos
4.  f  :  Mv[a]  {}\mrightarrow{}  WfdSpread(Pos;a.Mv[a])
5.  Spread(Pos;a.Mv[a])  \mequiv{}  a:Pos  \mtimes{}  (Mv[a]  {}\mrightarrow{}  Spread(Pos;a.Mv[a]))
6.  p  :  \mBbbN{}  {}\mrightarrow{}  MoveChoice(Pos;a.Mv[a])
7.  y  :  Unit
8.  (p  0  a)  =  (inr  y  )
\mvdash{}  \mdownarrow{}\mexists{}n:\mBbbN{}.  (\muparrow{}isr(if  (n  =\msubz{}  0)  then  inl  <a,  f>  else  inr  y    fi  ))


By

---

Latex:
(D  0  THEN  With  \mkleeneopen{}1\mkleeneclose{}  (D  0)\mcdot{}  THEN  Reduce  0  THEN  Try  (AutoSplit)  THEN  Auto)\mcdot{}

---

Home Index