Step * of Lemma qexp-qmul

[a,b:ℚ]. ∀[n:ℕ].  (a b ↑ (a ↑ b ↑ n) ∈ ℚ)
BY
xxx(xxxInductionOnNatxxx
      THEN (RWW "exp_zero_q" THENA Auto)
      THEN Auto
      THEN ((RWO "exp_unroll_q" 0⋅ THENM HypSubst' (-1) THENM QNorm 0) THENA Auto))xxx }


Latex:


Latex:
\mforall{}[a,b:\mBbbQ{}].  \mforall{}[n:\mBbbN{}].    (a  *  b  \muparrow{}  n  =  (a  \muparrow{}  n  *  b  \muparrow{}  n))


By


Latex:
xxx(xxxInductionOnNatxxx
        THEN  (RWW  "exp\_zero\_q"  0  THENA  Auto)
        THEN  Auto
        THEN  ((RWO  "exp\_unroll\_q"  0\mcdot{}  THENM  HypSubst'  (-1)  0  THENM  QNorm  0)  THENA  Auto))xxx




Home Index