Step * 2 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)
⊢ Dec(xs ys ∈ bag(T))
BY
(InstLemma `assert-bag-eq` [⌜T⌝;⌜eq⌝]⋅ THENA Auto) }

1
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))


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)
\mvdash{}  Dec(xs  =  ys)


By


Latex:
(InstLemma  `assert-bag-eq`  [\mkleeneopen{}T\mkleeneclose{};\mkleeneopen{}eq\mkleeneclose{}]\mcdot{}  THENA  Auto)




Home Index