blob: 753a7b9c0c9fd3ac9d9a8ae55fb742cb766c7f26 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
|
type t = {
name : Conventions.Name.t;
generator : Generator.t;
membership_criteria : Tuple.t -> bool;
cardinality : Conventions.Cardinality.t;
}
let make ~name ~generator ~membership_criteria ~cardinality =
{ name; generator; membership_criteria; cardinality }
|