Step
*
of Lemma
spread-spread
∀[t:Top × Top]. ∀[P,Q:Top].  (let x,y = let a,b = t in P[a;b] in Q[x;y] ~ let a,b = t in let x,y = P[a;b] in Q[x;y])
BY
{ RepeatFor 3 ((D 0 THENA Auto))
THEN D 1
THEN Reduce 0
THEN Auto }
Latex:
Latex:
\mforall{}[t:Top  \mtimes{}  Top].  \mforall{}[P,Q:Top].
    (let  x,y  =  let  a,b  =  t 
                          in  P[a;b] 
      in  Q[x;y]  \msim{}  let  a,b  =  t 
                              in  let  x,y  =  P[a;b] 
                                    in  Q[x;y])
By
Latex:
RepeatFor  3  ((D  0  THENA  Auto))
THEN  D  1
THEN  Reduce  0
THEN  Auto
Home
Index