Nuprl Definition : binary-treeco
binary-treeco() ==  corec(X.lbl:Atom × if lbl =a "Leaf" then ℤ if lbl =a "Node" then left:X × X else Void fi )
Definitions occuring in Statement : 
corec: corec(T.F[T]), 
ifthenelse: if b then t else f fi , 
eq_atom: x =a y, 
product: x:A × B[x], 
int: ℤ, 
token: "$token", 
atom: Atom, 
void: Void
FDL editor aliases : 
binary-treeco
binary-treeco()  ==
    corec(X.lbl:Atom  \mtimes{}  if  lbl  =a  "Leaf"  then  \mBbbZ{}
                                          if  lbl  =a  "Node"  then  left:X  \mtimes{}  X
                                          else  Void
                                          fi  )
Date html generated:
2015_07_17-AM-07_51_27
Last ObjectModification:
2014_05_06-AM-10_17_01
Home
Index