---

Step * 1 2 of Lemma normalization-callbyvalueall-spread2


1. G : Base
2. H : Base
3. F : Base
4. a : Base
5. has-valueall(a)@i
⊢ let u,v = a 
  in H[a;u;v] let y ⟵ v in G[a;u;v;y] ~ let u,v = a 
                                         in H[a;u;v] G[a;u;v;v]
BY
{ (SqReasoning
   THEN CallByValueReduceOn ⌜snd(a)⌝ 0⋅
   THEN Reduce 0
   THEN Auto
   THEN HypSubst' (-1) 5
   THEN RWO "has-valueall-pair" 5
   THEN Auto) }

---

Latex:

---

Latex:

1.  G  :  Base
2.  H  :  Base
3.  F  :  Base
4.  a  :  Base
5.  has-valueall(a)@i
\mvdash{}  let  u,v  =  a 
    in  H[a;u;v]  let  y  \mleftarrow{}{}  v  in  G[a;u;v;y]  \msim{}  let  u,v  =  a 
                                                                                  in  H[a;u;v]  G[a;u;v;v]


By

---

Latex:
(SqReasoning
  THEN  CallByValueReduceOn  \mkleeneopen{}snd(a)\mkleeneclose{}  0\mcdot{}
  THEN  Reduce  0
  THEN  Auto
  THEN  HypSubst'  (-1)  5
  THEN  RWO  "has-valueall-pair"  5
  THEN  Auto)

---

Home Index