Step * 2 1 1 of Lemma decidable__equal_bag


1. [T] Type
2. ∀x,y:T.  Dec(x y ∈ T)@i
3. xs bag(T)@i
4. ys bag(T)@i
5. eq EqDecider(T)
6. ∀[as,bs:bag(T)].  uiff(↑bag-eq(eq;as;bs);as bs ∈ bag(T))
⊢ Dec(xs ys ∈ bag(T))
BY
(RWO "-1<THEN Auto) }


Latex:


Latex:

1.  [T]  :  Type
2.  \mforall{}x,y:T.    Dec(x  =  y)@i
3.  xs  :  bag(T)@i
4.  ys  :  bag(T)@i
5.  eq  :  EqDecider(T)
6.  \mforall{}[as,bs:bag(T)].    uiff(\muparrow{}bag-eq(eq;as;bs);as  =  bs)
\mvdash{}  Dec(xs  =  ys)


By


Latex:
(RWO  "-1<"  0  THEN  Auto)




Home Index