Nuprl Definition : int_termco

int_termco() ==
  corec(X.lbl:Atom × if lbl =a "Constant" then ℤ
                     if lbl =a "Var" then ℤ
                     if lbl =a "Add" then left:X × X
                     if lbl =a "Subtract" then left:X × X
                     if lbl =a "Multiply" then left:X × X
                     if lbl =a "Minus" then 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
Definitions occuring in definition :  corec: corec(T.F[T]),  atom: Atom,  int: ℤ,  product: x:A × B[x],  ifthenelse: if b then t else f fi ,  eq_atom: x =a y,  token: "$token",  void: Void
FDL editor aliases :  int_termco

Latex:
int\_termco()  ==
    corec(X.lbl:Atom  \mtimes{}  if  lbl  =a  "Constant"  then  \mBbbZ{}
                                          if  lbl  =a  "Var"  then  \mBbbZ{}
                                          if  lbl  =a  "Add"  then  left:X  \mtimes{}  X
                                          if  lbl  =a  "Subtract"  then  left:X  \mtimes{}  X
                                          if  lbl  =a  "Multiply"  then  left:X  \mtimes{}  X
                                          if  lbl  =a  "Minus"  then  X
                                          else  Void
                                          fi  )



Date html generated: 2016_05_14-AM-06_57_36
Last ObjectModification: 2015_09_22-PM-05_51_19

Theory : omega


Home Index