---

Step * 1 1 2 2 2 1 of Lemma PiDataVal-induction


1. [P] : PiDataVal() ─→ ℙ
2. ∀id:Id. P[pDVloc(id)]@i
3. ∀id:Id. ∀name:Name.  P[pDVloc_tag(id;name)]@i
4. ∀from:Id. ∀preList:pi_prefix() List.  P[pDVguards(from;preList)]@i
5. ∀val:Name. ∀index:ℕ.  P[pDVmsg(val;index)]@i
6. P[pDVfire()]@i
7. P[pDVcontinue()]@i
8. ∀rndv1:ℕ × Id × ℕ × Name. P[pDVselex(rndv1)]@i
9. ∀rndv2:ℕ × Id × ℕ × Name. ∀counter:ℕ.  P[pDVrequest(rndv2;counter)]@i
10. x : Unit@i
⊢ P[inr inr inr inr (inl x)    ]
BY
{ (D -1 THEN Try (Fold `pDVfire` 0) THEN Auto) }

---

Latex:

---

Latex:

1.  [P]  :  PiDataVal()  {}\mrightarrow{}  \mBbbP{}
2.  \mforall{}id:Id.  P[pDVloc(id)]@i
3.  \mforall{}id:Id.  \mforall{}name:Name.    P[pDVloc\_tag(id;name)]@i
4.  \mforall{}from:Id.  \mforall{}preList:pi\_prefix()  List.    P[pDVguards(from;preList)]@i
5.  \mforall{}val:Name.  \mforall{}index:\mBbbN{}.    P[pDVmsg(val;index)]@i
6.  P[pDVfire()]@i
7.  P[pDVcontinue()]@i
8.  \mforall{}rndv1:\mBbbN{}  \mtimes{}  Id  \mtimes{}  \mBbbN{}  \mtimes{}  Name.  P[pDVselex(rndv1)]@i
9.  \mforall{}rndv2:\mBbbN{}  \mtimes{}  Id  \mtimes{}  \mBbbN{}  \mtimes{}  Name.  \mforall{}counter:\mBbbN{}.    P[pDVrequest(rndv2;counter)]@i
10.  x  :  Unit@i
\mvdash{}  P[inr  inr  inr  inr  (inl  x)        ]


By

---

Latex:
(D  -1  THEN  Try  (Fold  `pDVfire`  0)  THEN  Auto)

---

Home Index