Step * 1 1 2 2 of Lemma combinations_aux_rem_property


1. : ℕ+
2. : ℤ
3. 0 < n
4. ∀[b,m:ℕ].  (combinations_aux_rem(b rem k;n 1;m;k) (combinations_aux(b;n 1;m) rem k) ∈ ℤ)
5. : ℕ
6. : ℕ
7. ¬(n 0 ∈ ℤ)
8. 0 ∈ ℤ
⊢ combinations_aux_rem(0;n 1;0 1;k) (combinations_aux(0;n 1;0 1) rem k) ∈ ℤ
BY
(Assert ∀n:ℕ. ∀x:ℤ.  ((combinations_aux_rem(0;n;x;k) 0 ∈ ℤ) ∧ (combinations_aux(0;n;x) 0 ∈ ℤ)) BY
         (InductionOnNat
          THEN (RecUnfold `combinations_aux_rem` THEN RecUnfold `combinations_aux` 0)
          THEN Reduce 0
          THEN Auto
          THEN SplitOnConclITE
          THEN Auto
          THEN RepeatFor ((CallByValueReduce THEN Auto))))⋅ }

1
.....aux..... 
1. : ℕ+
2. : ℤ
3. 0 < n
4. ∀[b,m:ℕ].  (combinations_aux_rem(b rem k;n 1;m;k) (combinations_aux(b;n 1;m) rem k) ∈ ℤ)
5. : ℕ
6. : ℕ
7. ¬(n 0 ∈ ℤ)
8. 0 ∈ ℤ
9. n1 : ℤ
10. 0 < n1
11. ∀x:ℤ((combinations_aux_rem(0;n1 1;x;k) 0 ∈ ℤ) ∧ (combinations_aux(0;n1 1;x) 0 ∈ ℤ))
12. : ℤ
13. ¬(n1 0 ∈ ℤ)
⊢ combinations_aux_rem(0 rem k;n1 1;x 1;k) 0 ∈ ℤ

2
1. : ℕ+
2. : ℤ
3. 0 < n
4. ∀[b,m:ℕ].  (combinations_aux_rem(b rem k;n 1;m;k) (combinations_aux(b;n 1;m) rem k) ∈ ℤ)
5. : ℕ
6. : ℕ
7. ¬(n 0 ∈ ℤ)
8. 0 ∈ ℤ
9. ∀n:ℕ. ∀x:ℤ.  ((combinations_aux_rem(0;n;x;k) 0 ∈ ℤ) ∧ (combinations_aux(0;n;x) 0 ∈ ℤ))
⊢ combinations_aux_rem(0;n 1;0 1;k) (combinations_aux(0;n 1;0 1) rem k) ∈ ℤ


Latex:


Latex:

1.  k  :  \mBbbN{}\msupplus{}
2.  n  :  \mBbbZ{}
3.  0  <  n
4.  \mforall{}[b,m:\mBbbN{}].    (combinations\_aux\_rem(b  rem  k;n  -  1;m;k)  =  (combinations\_aux(b;n  -  1;m)  rem  k))
5.  b  :  \mBbbN{}
6.  m  :  \mBbbN{}
7.  \mneg{}(n  =  0)
8.  m  =  0
\mvdash{}  combinations\_aux\_rem(0;n  -  1;0  -  1;k)  =  (combinations\_aux(0;n  -  1;0  -  1)  rem  k)


By


Latex:
(Assert  \mforall{}n:\mBbbN{}.  \mforall{}x:\mBbbZ{}.    ((combinations\_aux\_rem(0;n;x;k)  =  0)  \mwedge{}  (combinations\_aux(0;n;x)  =  0))  BY
              (InductionOnNat
                THEN  (RecUnfold  `combinations\_aux\_rem`  0  THEN  RecUnfold  `combinations\_aux`  0)
                THEN  Reduce  0
                THEN  Auto
                THEN  SplitOnConclITE
                THEN  Auto
                THEN  RepeatFor  3  ((CallByValueReduce  0  THEN  Auto))))\mcdot{}




Home Index