Step
*
1
1
of Lemma
p-mul-int-cancelation-1
1. p : {2...}
2. k : ℕ
3. a : p-adics(p)
4. b : p-adics(p)
5. p^k(p) * a = p^k(p) * b ∈ p-adics(p)
6. ∀n:ℕ+. ((p^k * (a n)) ≡ (p^k * (b n)) mod p^n)
7. n : ℕ+
8. (p^k * (a (n + k))) ≡ (p^k * (b (n + k))) mod p^(n + k)
⊢ (a n) ≡ (b n) mod p^n
BY
{ ((InstLemma `p-adic-property` [⌜p⌝;⌜a⌝;⌜n⌝;⌜n + k⌝]⋅ THENA Auto)
   THEN ((RWO "-1<" 0 THENA Auto) THEN Thin (-1))
   THEN (InstLemma `p-adic-property` [⌜p⌝;⌜b⌝;⌜n⌝;⌜n + k⌝]⋅ THENA Auto)
   THEN (RWO "-1<" 0 THENA Auto)
   THEN Thin (-1)) }
1
1. p : {2...}
2. k : ℕ
3. a : p-adics(p)
4. b : p-adics(p)
5. p^k(p) * a = p^k(p) * b ∈ p-adics(p)
6. ∀n:ℕ+. ((p^k * (a n)) ≡ (p^k * (b n)) mod p^n)
7. n : ℕ+
8. (p^k * (a (n + k))) ≡ (p^k * (b (n + k))) mod p^(n + k)
⊢ (a (n + k)) ≡ (b (n + k)) mod p^n
Latex:
Latex:
1.  p  :  \{2...\}
2.  k  :  \mBbbN{}
3.  a  :  p-adics(p)
4.  b  :  p-adics(p)
5.  p\^{}k(p)  *  a  =  p\^{}k(p)  *  b
6.  \mforall{}n:\mBbbN{}\msupplus{}.  ((p\^{}k  *  (a  n))  \mequiv{}  (p\^{}k  *  (b  n))  mod  p\^{}n)
7.  n  :  \mBbbN{}\msupplus{}
8.  (p\^{}k  *  (a  (n  +  k)))  \mequiv{}  (p\^{}k  *  (b  (n  +  k)))  mod  p\^{}(n  +  k)
\mvdash{}  (a  n)  \mequiv{}  (b  n)  mod  p\^{}n
By
Latex:
((InstLemma  `p-adic-property`  [\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}n\mkleeneclose{};\mkleeneopen{}n  +  k\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  ((RWO  "-1<"  0  THENA  Auto)  THEN  Thin  (-1))
  THEN  (InstLemma  `p-adic-property`  [\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}n\mkleeneclose{};\mkleeneopen{}n  +  k\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  (RWO  "-1<"  0  THENA  Auto)
  THEN  Thin  (-1))
Home
Index