src/HOL/Codegenerator_Test/Candidates.thy
author wenzelm
Wed, 01 Sep 2010 18:18:47 +0200
changeset 38976 a4a465dc89d9
parent 37695 71e84a203c19
child 41884 335895ffbd94
permissions -rw-r--r--
Document.State.Assignment: eliminated promise in favour of plain values -- signalling is done via event bus in Session;


(* Author: Florian Haftmann, TU Muenchen *)

header {* A huge collection of equations to generate code from *}

theory Candidates
imports
  Complex_Main
  Library
  List_Prefix
  "~~/src/HOL/Number_Theory/Primes"
  "~~/src/HOL/ex/Records"
begin

inductive sublist :: "'a list \<Rightarrow> 'a list \<Rightarrow> bool" where
    empty: "sublist [] xs"
  | drop: "sublist ys xs \<Longrightarrow> sublist ys (x # xs)"
  | take: "sublist ys xs \<Longrightarrow> sublist (x # ys) (x # xs)"

code_pred sublist .

(*avoid popular infix*)
code_reserved SML upto

end