src/Doc/Tutorial/ToyList/ToyList_Test.thy
author wenzelm
Wed, 27 Mar 2019 14:47:49 +0100
changeset 69996 8f2d3a27aff0
parent 69597 ff784d5a5bfb
permissions -rw-r--r--
more informative Spec_Rules.Equational: support corecursion;

theory ToyList_Test
imports Main
begin

ML \<open>
  let val text =
    map (File.read o Path.append \<^master_dir>) [\<^path>\<open>ToyList1.txt\<close>, \<^path>\<open>ToyList2.txt\<close>]
    |> implode
  in Thy_Info.script_thy Position.start text \<^theory> end
\<close>

end