# HG changeset patch # User haftmann # Date 1179567200 -7200 # Node ID fd7cd1edc18df4347773443946cf257018a74fba # Parent e67f05cc0ac544acedb3d8228a167bad55d54bfc added Executable_Real diff -r e67f05cc0ac5 -r fd7cd1edc18d doc-src/IsarAdvanced/Codegen/Thy/Codegen.thy --- a/doc-src/IsarAdvanced/Codegen/Thy/Codegen.thy Sat May 19 11:33:19 2007 +0200 +++ b/doc-src/IsarAdvanced/Codegen/Thy/Codegen.thy Sat May 19 11:33:20 2007 +0200 @@ -471,6 +471,8 @@ for finite sets using lists. \item[@{text "ExecutableRat"}] \label{exec_rat} implements rational numbers as triples @{text "(sign, enumerator, denominator)"}. + \item[@{text "Executable_Real"}] implements a subset of real numbers, + namly those representable by rational numbers. \item[@{text "EfficientNat"}] \label{eff_nat} implements natural numbers by integers, which in general will result in higher efficency; pattern matching with @{const "0\nat"} / @{const "Suc"} diff -r e67f05cc0ac5 -r fd7cd1edc18d doc-src/IsarAdvanced/Codegen/Thy/document/Codegen.tex --- a/doc-src/IsarAdvanced/Codegen/Thy/document/Codegen.tex Sat May 19 11:33:19 2007 +0200 +++ b/doc-src/IsarAdvanced/Codegen/Thy/document/Codegen.tex Sat May 19 11:33:20 2007 +0200 @@ -592,6 +592,8 @@ for finite sets using lists. \item[\isa{ExecutableRat}] \label{exec_rat} implements rational numbers as triples \isa{{\isacharparenleft}sign{\isacharcomma}\ enumerator{\isacharcomma}\ denominator{\isacharparenright}}. + \item[\isa{Executable{\isacharunderscore}Real}] implements a subset of real numbers, + namly those representable by rational numbers. \item[\isa{EfficientNat}] \label{eff_nat} implements natural numbers by integers, which in general will result in higher efficency; pattern matching with \isa{{\isadigit{0}}} / \isa{Suc} diff -r e67f05cc0ac5 -r fd7cd1edc18d src/HOL/ex/ExecutableContent.thy --- a/src/HOL/ex/ExecutableContent.thy Sat May 19 11:33:19 2007 +0200 +++ b/src/HOL/ex/ExecutableContent.thy Sat May 19 11:33:20 2007 +0200 @@ -14,7 +14,7 @@ Binomial Commutative_Ring "~~/src/HOL/ex/Commutative_Ring_Complete" -(* Executable_Real *) + Executable_Real GCD List_Prefix Nat_Infinity