name-case(n;i,k.A[i; k];j,x.B[j; x]) ==
  case n
  of inl(ik) => let i,k:LocKnd = ik in A[i; k]
   | inr(p) => let j,x = p in
                 B[j; x]



Definitions :  decide: case b of inl(x) => s[x] | inr(y) => t[y],  locknd-spread: let i,k:LocKnd = ik in P[i; k],  spread: spread def
FDL editor aliases :  name-case

name-case(n;i,k.A[i;  k];j,x.B[j;  x])  ==
    case  n  of  inl(ik)  =>  let  i,k:LocKnd  =  ik  in  A[i;  k]  |  inr(p)  =>  let  j,x  =  p  in  B[j;  x]


Date html generated: 2010_08_26-PM-11_42_44
Last ObjectModification: 2008_02_27-PM-09_35_34

Home Index