st_const?(x) ==
  case(x)
  var(name)=>ff
  const(ty)=>tt
  domainrange =>rec1,rec2.ff
  fst  snd =>rec1,rec2.ff
  left + right =>rec1,rec2.ff
  kind list =>rec1.ff
  Class(kind) =>rec1.ff



Definitions occuring in Statement :  simple_type_ind: simple_type_ind bfalse: ff btrue: tt
Definitions :  simple_type_ind: simple_type_ind btrue: tt bfalse: ff
FDL editor aliases :  st_const?

st\_const?(x)  ==
    case(x)
    var(name)=>ff
    const(ty)=>tt
    domain{}\mrightarrow{}range  =>rec1,rec2.ff
    fst  \mtimes{}  snd  =>rec1,rec2.ff
    left  +  right  =>rec1,rec2.ff
    kind  list  =>rec1.ff
    Class(kind)  =>rec1.ff


Date html generated: 2011_08_17-PM-04_44_32
Last ObjectModification: 2011_02_06-PM-04_09_45

Home Index