{ [A:Type]. [eq:EqDecider(A)]. [B:A  Type]. [f:x:A fp-> B[x]].
  [P:A  ]. [x:A].
    uiff(x  dom(fpf-restrict(f;P));{(x  dom(f))  ((P x))}) }

{ Proof }



Definitions occuring in Statement :  fpf-restrict: fpf-restrict(f;P),  fpf-dom: x  dom(f),  fpf: a:A fp-> B[a],  assert: b,  bool: ,  uiff: uiff(P;Q),  uall: [x:A]. B[x],  guard: {T},  so_apply: x[s],  and: P  Q,  apply: f a,  function: x:A  B[x],  universe: Type,  deq: EqDecider(T)
Definitions :  cand: A c B,  fpf-join: f  g,  eqof: eqof(d),  subtype: S  T,  union: left + right,  or: P  Q,  eq_knd: a = b,  l_member: (x  l),  fpf-single: x : v,  rev_implies: P  Q,  fpf-restrict: fpf-restrict(f;P),  strong-subtype: strong-subtype(A;B),  le: A  B,  ge: i  j ,  not: A,  less_than: a < b,  set: {x:A| B[x]} ,  list: type List,  subtype_rel: A r B,  top: Top,  fpf-dom: x  dom(f),  iff: P  Q,  implies: P  Q,  prop: ,  pair: <a, b>,  void: Void,  false: False,  true: True,  decide: case b of inl(x) => s[x] | inr(y) => t[y],  ifthenelse: if b then t else f fi ,  assert: b,  guard: {T},  uimplies: b supposing a,  product: x:A  B[x],  and: P  Q,  uiff: uiff(P;Q),  bool: ,  lambda: x.A[x],  all: x:A. B[x],  isect: x:A. B[x],  uall: [x:A]. B[x],  fpf: a:A fp-> B[a],  so_lambda: x.t[x],  so_apply: x[s],  apply: f a,  member: t  T,  equal: s = t,  universe: Type,  function: x:A  B[x],  deq: EqDecider(T),  Repeat: Error :Repeat,  MaAuto: Error :MaAuto,  Complete: Error :Complete,  Try: Error :Try,  CollapseTHEN: Error :CollapseTHEN,  tactic: Error :tactic,  fpf-domain: fpf-domain(f),  filter: filter(P;l),  domain_fpf_restrict: domain_fpf_restrict{domain_fpf_restrict_compseq_tag_def:o}(P; f),  Auto: Error :Auto,  CollapseTHENM: Error :CollapseTHENM,  Unfold: Error :Unfold,  CollapseTHENA: Error :CollapseTHENA
Lemmas :  fpf-domain_wf,  member_filter,  iff_functionality_wrt_iff,  member-fpf-domain,  and_functionality_wrt_iff,  filter_wf,  fpf-dom_wf,  assert_witness,  guard_wf,  assert_wf,  fpf-trivial-subtype-top,  subtype_rel_wf,  fpf_wf,  top_wf,  member_wf,  fpf-restrict_wf2,  uiff_wf,  bool_wf,  deq_wf,  false_wf,  ifthenelse_wf,  true_wf,  rev_implies_wf,  iff_wf,  uiff_inversion,  l_member_wf,  member-fpf-dom

\mforall{}[A:Type].  \mforall{}[eq:EqDecider(A)].  \mforall{}[B:A  {}\mrightarrow{}  Type].  \mforall{}[f:x:A  fp->  B[x]].  \mforall{}[P:A  {}\mrightarrow{}  \mBbbB{}].  \mforall{}[x:A].
    uiff(\muparrow{}x  \mmember{}  dom(fpf-restrict(f;P));\{(\muparrow{}x  \mmember{}  dom(f))  \mwedge{}  (\muparrow{}(P  x))\})


Date html generated: 2011_08_10-AM-08_09_45
Last ObjectModification: 2011_06_18-AM-08_25_57

Home Index