Step
*
of Lemma
nameset-equipollent
∀L:Cname List. nameset(L) ~ ℕ||remove-repeats(CnameDeq;L)||
BY
{ (Auto
   THEN (InstLemma `equipollent-length` [⌜Cname⌝;⌜remove-repeats(CnameDeq;L)⌝]⋅ THENA Auto)
   THEN RWO  "-1<" 0
   THEN Auto
   THEN BLemma `equipollent_weakening_ext-eq` 
   THEN Auto) }
1
1. L : Cname List@i
2. {x:Cname| (x ∈ remove-repeats(CnameDeq;L))}  ~ ℕ||remove-repeats(CnameDeq;L)||
⊢ nameset(L) ≡ {x:Cname| (x ∈ remove-repeats(CnameDeq;L))} 
Latex:
Latex:
\mforall{}L:Cname  List.  nameset(L)  \msim{}  \mBbbN{}||remove-repeats(CnameDeq;L)||
By
Latex:
(Auto
  THEN  (InstLemma  `equipollent-length`  [\mkleeneopen{}Cname\mkleeneclose{};\mkleeneopen{}remove-repeats(CnameDeq;L)\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  RWO    "-1<"  0
  THEN  Auto
  THEN  BLemma  `equipollent\_weakening\_ext-eq` 
  THEN  Auto)
Home
Index