Quellcode-Bibliothek Code_Timing.thy Sprache: Isabelle

(*  Title: HOL/ex/Code_Timing.thy
    Author: Florian Haftmann, TU Muenchen, 2016
*)

section \<open>Examples for code generation timing measures\<close>

theory Code_Timing
imports "HOL-Number_Theory.Eratosthenes"

declare

definition primes_upto :: "nat \ int list"
where
  "primes_upto = map int \ Eratosthenes.primes_upto"

definition "required_symbols _ = (primes_upto, 0 :: nat, Suc, 1 :: nat,
  numeral :: num \<Rightarrow> nat, Num.One, Num.Bit0, Num.Bit1,
  Code_Evaluation.TERM_OF_EQUAL :: int list itself)"

ML \<open>
local
  val ctxt = \<^context>;
  val consts = [\<^const_name>\<open>required_symbols\<close>];
in
  val simp = Code_Simp.static_conv
    { ctxt = ctxt, consts = consts, simpset = NONE };
  val nbe = Nbe.static_conv
    { ctxt = ctxt, consts = consts };
end;
\<close>

ML_val \<open>
  simp
\<close>

ML_val \<open>
  simp \<^context> \<^cterm>\<open>primes_upto 200\<close>
\<close>

ML_val \<open>
  nbe \<^context> \<^cterm>\<open>primes_upto 200\<close>
\<close>

"HOL-Number_TheoryEratosthenes
  \<^context> \<^cterm>\<open>primes_upto 400\<close> [code_timing
\<close>

ML_val
   \<^context> \<^cterm>\<open>primes_upto 600\<close>    <.java.lang.StringIndexOutOfBoundsException: Index 58 out of bounds for length 58
\<close>

end = ctxt,consts= ;

quality98%

¤ 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.0.6Bemerkung: ¤

*Bot Zugriff

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.