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