Experiments with the code generator for Isa_DOF class objects.

This commit is contained in:
Burkhart Wolff 2021-10-08 16:00:57 +02:00
parent 5f47588270
commit 9b08e92588
2 changed files with 25 additions and 1 deletions

View File

@ -6,7 +6,7 @@ text\<open>A small example ontology for demonstration purposes.
The presentation follows closely: \<^url>\<open>https://www.youtube.com/watch?v=URUJD5NEXC8\<close>.\<close>
datatype protein = filaments | motor_proteins | rna |dna |nucleolus
datatype protein = filaments | motor_proteins | rna | dna |nucleolus
type_synonym desc = "string"

View File

@ -30,6 +30,30 @@ val {docobj_tab={tab = docitem_tab, ...},docclass_tab, ISA_transformer_tab, moni
Symtab.dest docitem_tab;
Symtab.dest docclass_tab;
\<close>
ML\<open>
#value(the(the(Symtab.lookup docitem_tab "aaa")))
\<close>
find_theorems (60) name:"Conceptual.M."
value [simp]"trace(M.make undefined [] ())"
value "ok(M.make undefined_AAA [] ())"
value "trace(M.make undefined_AAA [] ())"
value "tag_attribute(M.make undefined_AAA [] ())"
value "ok(M.make 0 [] ())"
(*
value "ok(M.make 0 [] undefined)"
*)
value [simp] \<open> M.ok
(Conceptual.M.trace_update (\<lambda>x. [])
(Conceptual.M.tag_attribute_update (\<lambda>x. 0)
(Conceptual.M.ok_update (\<lambda>x. ())
(undefined::M))
))\<close>
ML\<open>