Step * of Lemma KozenSilva-corollary1

[x,y:Atom].
  ∀[d:ℕ ⟶ ℕ]. ∀[k:ℕ].
    (Moessner(ℤ-rng;x;y;1;λi.if (i =z 0) then else (i 1) fi ;k)
    = Π(i∈upto(k)).(((k i)*atom(x)+atom(y)))^(d i)
    ∈ PowerSeries(ℤ-rng)) 
  supposing ¬(x y ∈ Atom)
BY
(Auto
   THEN RWO "KozenSilva-corollary0" 0
   THEN Try ((GenConcl ⌜upto(k) b ∈ bag(ℕk)⌝⋅ THENA Auto))
   THEN Auto
   THEN RepeatFor ((EqCD THEN Auto))
   THEN RWO "rng_nat_op-int" 0
   THEN Auto) }

1
1. Atom
2. Atom
3. ¬(x y ∈ Atom)
4. : ℕ ⟶ ℕ
5. : ℕ
6. bag(ℕk)
7. upto(k) b ∈ bag(ℕk)
8. : ℕk
⊢ ((k i) 1) (k i) ∈ |ℤ-rng|


Latex:


Latex:
\mforall{}[x,y:Atom].
    \mforall{}[d:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}].  \mforall{}[k:\mBbbN{}].
        (Moessner(\mBbbZ{}-rng;x;y;1;\mlambda{}i.if  (i  =\msubz{}  0)  then  0  else  d  (i  -  1)  fi  ;k)
        =  \mPi{}(i\mmember{}upto(k)).(((k  -  i)*atom(x)+atom(y)))\^{}(d  i)) 
    supposing  \mneg{}(x  =  y)


By


Latex:
(Auto
  THEN  RWO  "KozenSilva-corollary0"  0
  THEN  Try  ((GenConcl  \mkleeneopen{}upto(k)  =  b\mkleeneclose{}\mcdot{}  THENA  Auto))
  THEN  Auto
  THEN  RepeatFor  4  ((EqCD  THEN  Auto))
  THEN  RWO  "rng\_nat\_op-int"  0
  THEN  Auto)




Home Index