Quelle exp_term.pvs Sprache: PVS

exp_term: THEORY
BEGIN

  IMPORTING reals@factorial

  a:   VAR real
  n0a: VAR nzreal
  n,m:   VAR nat
  i:   VAR int
  epsilon: VAR posreal
  f:   VAR [nat->real]

  exp_term(a)(n):real = IF n = 0 THEN 1 ELSE a^n/factorial(n) ENDIF

  exp_term_power: LEMMA a /= 0 IMPLIES
                                 abs(exp_term(a)(m*n)) <= abs(exp_term(a)(n))^m
  exp_term_decr:  LEMMA a /= 0 AND abs(a) < n+1 IMPLIES
                                 abs(exp_term(a)(n+1)) < abs(exp_term(a)(n))

  tends_to_0?(f):bool = FORALL epsilon: EXISTS n:
                                FORALL i: i >= n IMPLIES abs(f(i)) < epsilon

  exp_tends_to_0: LEMMA tends_to_0?(exp_term(n0a))

END exp_term

quality84%

¤ Dauer der Verarbeitung: 0.1 Sekunden (vorverarbeitet) ¤

Wurzel

Suchen

Beweissystem der NASA

Beweissystem Isabelle

NIST Cobol Testsuite

Cephes Mathematical Library

Wiener Entwicklungsmethode

Haftungshinweis

Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.

Bemerkung:

Die farbliche Syntaxdarstellung ist noch experimentell.