---

Step * 3 1 of Lemma fps-set-to-one-one


1. r : CRng
2. y : Atom
3. n : ℕ
4. b : bag(Atom)
5. ¬n < #(b)
6. ¬0 < (#y in b)
7. b = {} ∈ bag(Atom)
⊢ if bag-null(b + bag-rep(n - #(b);y)) then 1 else 0 fi 
= (if (n =z 0) then λb.if bag-null(b) then 1 else 0 fi  else λb.0 fi  b)
∈ |r|
BY
{ TACTIC:(FLemma `equal-empty-bag` [-1] THEN Auto) }

1
1. r : CRng
2. y : Atom
3. n : ℕ
4. b : bag(Atom)
5. ¬n < #(b)
6. ¬0 < (#y in b)
7. b = {} ∈ bag(Atom)
8. b ~ {}
⊢ if bag-null(b + bag-rep(n - #(b);y)) then 1 else 0 fi 
= (if (n =z 0) then λb.if bag-null(b) then 1 else 0 fi  else λb.0 fi  b)
∈ |r|

---

Latex:

---

Latex:

1.  r  :  CRng
2.  y  :  Atom
3.  n  :  \mBbbN{}
4.  b  :  bag(Atom)
5.  \mneg{}n  <  \#(b)
6.  \mneg{}0  <  (\#y  in  b)
7.  b  =  \{\}
\mvdash{}  if  bag-null(b  +  bag-rep(n  -  \#(b);y))  then  1  else  0  fi 
=  (if  (n  =\msubz{}  0)  then  \mlambda{}b.if  bag-null(b)  then  1  else  0  fi    else  \mlambda{}b.0  fi    b)


By

---

Latex:
TACTIC:(FLemma  `equal-empty-bag`  [-1]  THEN  Auto)

---

Home Index