Nuprl Definition : C_DVALUEpco

C_DVALUEpco() ==
  corec(X.lbl:Atom × if lbl =a "Null" then Unit
                     if lbl =a "Int" then ℤ
                     if lbl =a "Pointer" then C_LVALUE()?
                     if lbl =a "Array" then lower:ℤ × upper:ℤ × ({lower..upper-} ─→ X)
                     if lbl =a "Struct" then lbls:Atom List × ({a:Atom| (a ∈ lbls)}  ─→ X)
                     else Void
                     fi )



Definitions occuring in Statement :  C_LVALUE: C_LVALUE() l_member: (x ∈ l) list: List corec: corec(T.F[T]) int_seg: {i..j-} ifthenelse: if then else fi  eq_atom: =a y unit: Unit set: {x:A| B[x]}  function: x:A ─→ B[x] product: x:A × B[x] union: left right int: token: "$token" atom: Atom void: Void
FDL editor aliases :  C_DVALUEpco
C\_DVALUEpco()  ==
    corec(X.lbl:Atom  \mtimes{}  if  lbl  =a  "Null"  then  Unit
                                          if  lbl  =a  "Int"  then  \mBbbZ{}
                                          if  lbl  =a  "Pointer"  then  C\_LVALUE()?
                                          if  lbl  =a  "Array"  then  lower:\mBbbZ{}  \mtimes{}  upper:\mBbbZ{}  \mtimes{}  (\{lower..upper\msupminus{}\}  {}\mrightarrow{}  X)
                                          if  lbl  =a  "Struct"  then  lbls:Atom  List  \mtimes{}  (\{a:Atom|  (a  \mmember{}  lbls)\}    {}\mrightarrow{}  X)
                                          else  Void
                                          fi  )



Date html generated: 2015_07_17-AM-07_43_55
Last ObjectModification: 2014_06_08-PM-03_19_40

Home Index