diff options
author | Son Ho | 2023-05-23 14:47:26 +0200 |
---|---|---|
committer | Son HO | 2023-06-04 21:54:38 +0200 |
commit | df03890491fc9c549376d26262b0be3707c00f59 (patch) | |
tree | c23c65b6b47449e5d7e5eec258370a550922e7ca /tests/hol4/betree/betreeMain_OpaqueScript.sml | |
parent | f3d115399e86b6484f29e22589ddd058089cdd3b (diff) |
Add the generated HOL4 files
Diffstat (limited to '')
-rw-r--r-- | tests/hol4/betree/betreeMain_OpaqueScript.sml | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/tests/hol4/betree/betreeMain_OpaqueScript.sml b/tests/hol4/betree/betreeMain_OpaqueScript.sml new file mode 100644 index 00000000..a6f0cf15 --- /dev/null +++ b/tests/hol4/betree/betreeMain_OpaqueScript.sml @@ -0,0 +1,26 @@ +(** THIS FILE WAS AUTOMATICALLY GENERATED BY AENEAS *) +(** [betree_main]: opaque function definitions *) +open primitivesLib divDefLib +open betreeMain_TypesTheory + +val _ = new_theory "betreeMain_Opaque" + + +val _ = new_constant ("betree_utils_load_internal_node_fwd", + “:u64 -> state -> (state # (u64 # betree_message_t) betree_list_t) + result”) + +val _ = new_constant ("betree_utils_store_internal_node_fwd", + “:u64 -> (u64 # betree_message_t) betree_list_t -> state -> (state # unit) + result”) + +val _ = new_constant ("betree_utils_load_leaf_node_fwd", + “:u64 -> state -> (state # (u64 # u64) betree_list_t) result”) + +val _ = new_constant ("betree_utils_store_leaf_node_fwd", + “:u64 -> (u64 # u64) betree_list_t -> state -> (state # unit) result”) + +val _ = new_constant ("core_option_option_unwrap_fwd", + “:'t option -> state -> (state # 't) result”) + +val _ = export_theory () |