Step * 2 2 of Lemma sparse-signed-rep-lemma1


1. : ℤ
2. : ℤ
3. : ℤ
4. (m ÷ 4) ∈ ℤ
5. (m rem 4) ∈ ℤ
6. ((4 q) r) ∈ ℤ
7. ¬(r 3 ∈ ℤ)
8. ¬(r (-3) ∈ ℤ)
⊢ ∃p:ℤ × {-2..3-[let k,b 
                   in (m ((4 k) b) ∈ ℤ) ∧ ((|b| 2 ∈ ℤ (↑isEven(k)))]
BY
((Assert |r| < BY
          (InstLemma `rem_bounds_absval` [⌜4⌝;⌜m⌝]⋅ THEN Auto))
   THEN (Assert r ∈ {-2..3-BY
               ((RWO "absval_ifthenelse" (-1) THENA Auto) THEN SplitOnHypITE -1  THEN Auto'))
   THEN (Decide ⌜↑isEven(q)⌝⋅ THENA Auto)) }

1
1. : ℤ
2. : ℤ
3. : ℤ
4. (m ÷ 4) ∈ ℤ
5. (m rem 4) ∈ ℤ
6. ((4 q) r) ∈ ℤ
7. ¬(r 3 ∈ ℤ)
8. ¬(r (-3) ∈ ℤ)
9. |r| < 4
10. r ∈ {-2..3-}
11. ↑isEven(q)
⊢ ∃p:ℤ × {-2..3-[let k,b 
                   in (m ((4 k) b) ∈ ℤ) ∧ ((|b| 2 ∈ ℤ (↑isEven(k)))]

2
1. : ℤ
2. : ℤ
3. : ℤ
4. (m ÷ 4) ∈ ℤ
5. (m rem 4) ∈ ℤ
6. ((4 q) r) ∈ ℤ
7. ¬(r 3 ∈ ℤ)
8. ¬(r (-3) ∈ ℤ)
9. |r| < 4
10. r ∈ {-2..3-}
11. ¬↑isEven(q)
⊢ ∃p:ℤ × {-2..3-[let k,b 
                   in (m ((4 k) b) ∈ ℤ) ∧ ((|b| 2 ∈ ℤ (↑isEven(k)))]


Latex:


Latex:

1.  m  :  \mBbbZ{}
2.  q  :  \mBbbZ{}
3.  r  :  \mBbbZ{}
4.  q  =  (m  \mdiv{}  4)
5.  r  =  (m  rem  4)
6.  m  =  ((4  *  q)  +  r)
7.  \mneg{}(r  =  3)
8.  \mneg{}(r  =  (-3))
\mvdash{}  \mexists{}p:\mBbbZ{}  \mtimes{}  \{-2..3\msupminus{}\}  [let  k,b  =  p 
                                      in  (m  =  ((4  *  k)  +  b))  \mwedge{}  ((|b|  =  2)  {}\mRightarrow{}  (\muparrow{}isEven(k)))]


By


Latex:
((Assert  |r|  <  4  BY
                (InstLemma  `rem\_bounds\_absval`  [\mkleeneopen{}4\mkleeneclose{};\mkleeneopen{}m\mkleeneclose{}]\mcdot{}  THEN  Auto))
  THEN  (Assert  r  \mmember{}  \{-2..3\msupminus{}\}  BY
                          ((RWO  "absval\_ifthenelse"  (-1)  THENA  Auto)  THEN  SplitOnHypITE  -1    THEN  Auto'))
  THEN  (Decide  \mkleeneopen{}\muparrow{}isEven(q)\mkleeneclose{}\mcdot{}  THENA  Auto))




Home Index