diff options
| author | Marcos Magueta <maguetamarcos@gmail.com> | 2026-09-03 16:55:45 -0300 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2026-09-03 16:55:45 -0300 |
| commit | 441f2f3359d6f59e4f26f1d5751926d26b1c7cf9 (patch) | |
| tree | bfe2c858da6bd010ea656b6c9045af96ff7e4946 /lib/protocols/Relation.mli | |
| parent | 836e1ab528379ac5e0e9151cf369628dcf1034a3 (diff) | |
| download | RNT-441f2f3359d6f59e4f26f1d5751926d26b1c7cf9.tar.gz RNT-441f2f3359d6f59e4f26f1d5751926d26b1c7cf9.zip | |
Substantial relation kernel object
Diffstat (limited to 'lib/protocols/Relation.mli')
| -rw-r--r-- | lib/protocols/Relation.mli | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/lib/protocols/Relation.mli b/lib/protocols/Relation.mli new file mode 100644 index 0000000..4aeb562 --- /dev/null +++ b/lib/protocols/Relation.mli @@ -0,0 +1,22 @@ +type t + +class type implementation = object + method heading : (Concepts.Hash.hash, Concepts.Condition.condition) result + method predicate : (Concepts.Hash.hash option, Concepts.Condition.condition) result + method local_constraints : (Concepts.Hash.hash option, Concepts.Condition.condition) result + method tuples : (Concepts.Hash.hash, Concepts.Condition.condition) result + method contains : Concepts.Blob.t -> (bool, Concepts.Condition.condition) result +end + +val make : #implementation -> Handle.protocol +val from : Handle.t -> t Handle.interface option +val heading : t Handle.interface -> (Concepts.Hash.hash, Concepts.Condition.condition) result + +val predicate : + t Handle.interface -> (Concepts.Hash.hash option, Concepts.Condition.condition) result + +val local_constraints : + t Handle.interface -> (Concepts.Hash.hash option, Concepts.Condition.condition) result + +val tuples : t Handle.interface -> (Concepts.Hash.hash, Concepts.Condition.condition) result +val contains : t Handle.interface -> Concepts.Blob.t -> (bool, Concepts.Condition.condition) result |