Nuprl Lemma : vs-double-bag-add

[K:Rng]. ∀[vs:VectorSpace(K)]. ∀[T:Type]. ∀[A:T ⟶ Type]. ∀[f:x:T ⟶ bag(A[x])]. ∀[h:x:T ⟶ A[x] ⟶ Point(vs)].
[b:bag(T)].
  {h[x;y] y ∈ f[x]} x ∈ b} = Σ{h[fst(p);snd(p)] p ∈ ⋃x∈b.bag-map(λy.<x, y>;f[x])} ∈ Point(vs))


Proof




Definitions occuring in Statement :  vs-bag-add: Σ{f[b] b ∈ bs} vector-space: VectorSpace(K) vs-point: Point(vs) uall: [x:A]. B[x] so_apply: x[s1;s2] so_apply: x[s] pi1: fst(t) pi2: snd(t) lambda: λx.A[x] function: x:A ⟶ B[x] pair: <a, b> universe: Type equal: t ∈ T rng: Rng bag-combine: x∈bs.f[x] bag-map: bag-map(f;bs) bag: bag(T)
Definitions unfolded in proof :  uall: [x:A]. B[x] member: t ∈ T vs-bag-add: Σ{f[b] b ∈ bs} rng: Rng uimplies: supposing a and: P ∧ Q cand: c∧ B monoid_p: IsMonoid(T;op;id) assoc: Assoc(T;op) infix_ap: y ident: Ident(T;op;id) squash: T prop: all: x:A. B[x] true: True subtype_rel: A ⊆B guard: {T} iff: ⇐⇒ Q rev_implies:  Q implies:  Q comm: Comm(T;op) so_apply: x[s]
Lemmas referenced :  bag-double-summation1 vs-point_wf vs-add_wf vs-0_wf vs-mon_assoc vs-mon_ident equal_wf squash_wf true_wf istype-universe vs-add-comm-nu subtype_rel_self iff_weakening_equal bag_wf
Rules used in proof :  sqequalSubstitution sqequalTransitivity computationStep sqequalReflexivity isect_memberFormation_alt introduction cut sqequalRule extract_by_obid sqequalHypSubstitution isectElimination thin setElimination rename because_Cache hypothesis hypothesisEquality lambdaEquality_alt inhabitedIsType universeIsType independent_isectElimination independent_pairFormation isect_memberEquality_alt axiomEquality isectIsTypeImplies productElimination applyEquality imageElimination equalityTransitivity equalitySymmetry instantiate universeEquality dependent_functionElimination natural_numberEquality imageMemberEquality baseClosed independent_functionElimination independent_pairEquality functionIsType

Latex:
\mforall{}[K:Rng].  \mforall{}[vs:VectorSpace(K)].  \mforall{}[T:Type].  \mforall{}[A:T  {}\mrightarrow{}  Type].  \mforall{}[f:x:T  {}\mrightarrow{}  bag(A[x])].  \mforall{}[h:x:T
                                                                                                                                                                            {}\mrightarrow{}  A[x]
                                                                                                                                                                            {}\mrightarrow{}  Point(vs)].
\mforall{}[b:bag(T)].
    (\mSigma{}\{\mSigma{}\{h[x;y]  |  y  \mmember{}  f[x]\}  |  x  \mmember{}  b\}  =  \mSigma{}\{h[fst(p);snd(p)]  |  p  \mmember{}  \mcup{}x\mmember{}b.bag-map(\mlambda{}y.<x,  y>f[x])\})



Date html generated: 2019_10_31-AM-06_25_55
Last ObjectModification: 2019_08_09-PM-01_29_08

Theory : linear!algebra


Home Index