---

Step * of Lemma mk_applies_ite

∀[G,b,x,y:Top]. ∀[m:ℕ].
  (mk_applies(if b then x else y fi ;G;m) ~ if b then mk_applies(x;G;m) else mk_applies(y;G;m) fi )
BY
{ (Auto
   THEN NatInd (-1)
   THEN Try (Complete ((RepUR ``mk_applies`` 0 THEN Auto)))
   THEN RepUR ``mk_applies`` 0
   THEN (RWO "primrec-unroll" 0 THENA Auto)
   THEN AutoSplit
   THEN Fold `mk_applies` 0
   THEN RWO "-1" 0
   THEN RepUR ``ifthenelse`` 0
   THEN RW LiftAllC 0
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[G,b,x,y:Top].  \mforall{}[m:\mBbbN{}].
    (mk\_applies(if  b  then  x  else  y  fi  ;G;m)  \msim{}  if  b  then  mk\_applies(x;G;m)  else  mk\_applies(y;G;m)  fi  )


By

---

Latex:
(Auto
  THEN  NatInd  (-1)
  THEN  Try  (Complete  ((RepUR  ``mk\_applies``  0  THEN  Auto)))
  THEN  RepUR  ``mk\_applies``  0
  THEN  (RWO  "primrec-unroll"  0  THENA  Auto)
  THEN  AutoSplit
  THEN  Fold  `mk\_applies`  0
  THEN  RWO  "-1"  0
  THEN  RepUR  ``ifthenelse``  0
  THEN  RW  LiftAllC  0
  THEN  Auto)

---

Home Index