{ [lhs:E#Lhs]. (lhsvars(lhs)  Atom List  (Atom List)) }

{ Proof }



Definitions occuring in Statement :  lhsvars: lhsvars(lhs) esharp-lhs: E#Lhs uall: [x:A]. B[x] member: t  T product: x:A  B[x] list: type List atom: Atom
Definitions :  list-diff: list-diff(eq;as;bs) atom-deq: AtomDeq l-union: as  bs spread: spread def lambda: x.A[x] pair: <a, b> nil: [] cons: [car / cdr] append: as @ bs so_lambda: x y.t[x; y] list_accum: list_accum(x,a.f[x; a];y;l) eclass: EClass(A[eo; e]) fpf: a:A fp-B[a] base: Base type-expr: Error :type-expr,  strong-subtype: strong-subtype(A;B) le: A  B ge: i  j  not: A less_than: a < b uimplies: b supposing a and: P  Q uiff: uiff(P;Q) subtype_rel: A r B uall: [x:A]. B[x] isect: x:A. B[x] axiom: Ax all: x:A. B[x] function: x:A  B[x] lhsvars: lhsvars(lhs) esharp-lhs: E#Lhs equal: s = t spreadn: spread3 member: t  T product: x:A  B[x] list: type List atom: Atom Auto: Error :Auto,  CollapseTHEN: Error :CollapseTHEN,  D: Error :D,  RepeatFor: Error :RepeatFor
Lemmas :  l-union_wf atom-deq_wf list-diff_wf esharp-lhs_wf list_accum_wf append_wf Error :type-expr_wf,  member_wf

\mforall{}[lhs:E\#Lhs].  (lhsvars(lhs)  \mmember{}  Atom  List  \mtimes{}  (Atom  List))


Date html generated: 2011_08_17-PM-05_11_39
Last ObjectModification: 2011_02_03-PM-05_47_17

Home Index