Step
*
of Lemma
mem_functionality_wrt_permr
∀s:DSet. ∀a,b:|s|. ∀as,bs:|s| List.  ((a = b ∈ |s|) 
⇒ (as ≡(|s|) bs) 
⇒ a ∈b as = b ∈b bs)
BY
{ ((UnivCD THENA Auto) THEN Unfold `mem` 0) }
1
1. s : DSet
2. a : |s|
3. b : |s|
4. as : |s| List
5. bs : |s| List
6. a = b ∈ |s|
7. as ≡(|s|) bs
⊢ ∃b x(:|s|) ∈ as. x (=b) a = ∃b x(:|s|) ∈ bs. x (=b) b
Latex:
Latex:
\mforall{}s:DSet.  \mforall{}a,b:|s|.  \mforall{}as,bs:|s|  List.    ((a  =  b)  {}\mRightarrow{}  (as  \mequiv{}(|s|)  bs)  {}\mRightarrow{}  a  \mmember{}\msubb{}  as  =  b  \mmember{}\msubb{}  bs)
By
Latex:
((UnivCD  THENA  Auto)  THEN  Unfold  `mem`  0)
Home
Index