Step
*
1
of Lemma
sb-equipollent
1. a1 : ℕ2 List
2. a2 : ℕ2 List
3. sbdecode(a1) = sbdecode(a2) ∈ {p:ℕ+ × ℕ+| let m,n = p in gcd(m;n) = 1 ∈ ℤ} 
⊢ a1 = a2 ∈ (ℕ2 List)
BY
{ xxx((ApFunToHypEquands `p' ⌜let m,n = p in sbcode(m;n)⌝ ⌜ℕ2 List⌝ (-1)⋅ THENA Auto)
      THEN RWO "sbcode-decode" (-1)
      THEN Auto)xxx }
Latex:
Latex:
1.  a1  :  \mBbbN{}2  List
2.  a2  :  \mBbbN{}2  List
3.  sbdecode(a1)  =  sbdecode(a2)
\mvdash{}  a1  =  a2
By
Latex:
xxx((ApFunToHypEquands  `p'  \mkleeneopen{}let  m,n  =  p  in  sbcode(m;n)\mkleeneclose{}  \mkleeneopen{}\mBbbN{}2  List\mkleeneclose{}  (-1)\mcdot{}  THENA  Auto)
        THEN  RWO  "sbcode-decode"  (-1)
        THEN  Auto)xxx
Home
Index