diff options
| author | Marcos Magueta <maguetamarcos@gmail.com> | 2026-09-24 21:51:14 -0300 |
|---|---|---|
| committer | Marcos Magueta <maguetamarcos@gmail.com> | 2026-09-24 21:51:14 -0300 |
| commit | f8b4929f9cf0e21386f0265c8c27527cdada7d78 (patch) | |
| tree | 78668dbf80c9ed2e8e9ab9162839df703e39478e /lib/concepts/Mode.ml | |
| parent | b69e62775b6e390b15105ce5af76961f3a38ce14 (diff) | |
| download | RNT-f8b4929f9cf0e21386f0265c8c27527cdada7d78.tar.gz RNT-f8b4929f9cf0e21386f0265c8c27527cdada7d78.zip | |
generates_when constraint utilityconstraints
Diffstat (limited to 'lib/concepts/Mode.ml')
| -rw-r--r-- | lib/concepts/Mode.ml | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/concepts/Mode.ml b/lib/concepts/Mode.ml index b7aa814..5ac895e 100644 --- a/lib/concepts/Mode.ml +++ b/lib/concepts/Mode.ml @@ -7,6 +7,10 @@ type t = mode list let attributes_of_list = BatSet.String.of_list let attributes_of_map map = BatMap.String.keys map |> BatSet.String.of_enum let decides_when bound = {bound= attributes_of_list bound; affords= Decides} + +let generates_when bound cardinality = + {bound= attributes_of_list bound; affords= Generates cardinality} + let enumerable cardinality = {bound= BatSet.String.empty; affords= Generates cardinality} let of_list modes = modes |