---

cdvreccomb?(x) ==
  case(x)
  Base(args)=> ff
  pair(fst,snd) => rec1,rec2.ff
  (X)'=> rec1.ff
  fun(arg:argtype):typ=> rec1.ff
  fun(arg:argtype, self'):typ=> rec1.tt

---

Definitions :  classderiv_ind: classderiv_ind,  bfalse: ff,  btrue: tt
FDL editor aliases :  cdvreccomb?

---

cdvreccomb?(x)  ==
    case(x)
    Base(args)=>  ff
    pair(fst,snd)  =>  rec1,rec2.ff
    (X)'=>  rec1.ff
    fun(arg:argtype):typ=>  rec1.ff
    fun(arg:argtype,  self'):typ=>  rec1.tt


Date html generated: 2010_08_27-PM-08_09_40
Last ObjectModification: 2010_06_18-PM-04_36_15

Home Index