---

expbase?(x) ==
  case(x)
  leaf(val) => tt
  pair(fst,snd) => rec1,rec2.ff
  fun(arg) => rec1.ff

---

Definitions :  expression_ind: expression_ind,  btrue: tt,  bfalse: ff
FDL editor aliases :  expbase?

---

expbase?(x)  ==    case(x)leaf(val)  =>  ttpair(fst,snd)  =>  rec1,rec2.fffun(arg)  =>  rec1.ff


Date html generated: 2010_08_27-PM-08_21_39
Last ObjectModification: 2010_06_22-PM-01_00_14

Home Index