uncurry-gen(n) ==
  Y (rec,m,g.if (m = n) then g else rec (m + 1) (x.(g x (x m))) fi )



Definitions occuring in Statement :  eq_int: (i = j) ifthenelse: if b then t else f fi  ycomb: Y apply: f a lambda: x.A[x] add: n + m natural_number: $n
Definitions :  ycomb: Y ifthenelse: if b then t else f fi  eq_int: (i = j) add: n + m natural_number: $n lambda: x.A[x] apply: f a
FDL editor aliases :  uncurry-gen

uncurry-gen(n)  ==    Y  (\mlambda{}rec,m,g.if  (m  =\msubz{}  n)  then  g  else  rec  (m  +  1)  (\mlambda{}x.(g  x  (x  m)))  fi  )


Date html generated: 2011_08_17-PM-06_01_43
Last ObjectModification: 2011_05_26-PM-12_41_04

Home Index