Step * 1 2 of Lemma sub-bag_antisymmetry


1. Type
2. as bag(T)
3. bs bag(T)
4. c1 bag(T)
5. as (bs c1) ∈ bag(T)
6. cs bag(T)
7. bs (as cs) ∈ bag(T)
8. as (bs c1) ∈ bag(T)
9. #(as) (#(bs) #(c1)) ∈ ℤ
10. bs (as []) ∈ bag(T)
11. #(bs) (#(as) #(cs)) ∈ ℤ
⊢ as bs ∈ bag(T)
BY
(Fold `empty-bag` (-2) THEN RWO "bag-append-empty" (-2) THEN Auto) }


Latex:


Latex:

1.  T  :  Type
2.  as  :  bag(T)
3.  bs  :  bag(T)
4.  c1  :  bag(T)
5.  as  =  (bs  +  c1)
6.  cs  :  bag(T)
7.  bs  =  (as  +  cs)
8.  as  =  (bs  +  c1)
9.  \#(as)  =  (\#(bs)  +  \#(c1))
10.  bs  =  (as  +  [])
11.  \#(bs)  =  (\#(as)  +  \#(cs))
\mvdash{}  as  =  bs


By


Latex:
(Fold  `empty-bag`  (-2)  THEN  RWO  "bag-append-empty"  (-2)  THEN  Auto)




Home Index