21 lines
612 B
Plaintext
21 lines
612 B
Plaintext
/* Test set operations in ReasonLIGO */
|
|
|
|
let add_op = (s: set(string)): set(string) => Set.add("foobar", s);
|
|
|
|
let remove_op = (s: set(string)): set(string) => Set.remove("foobar", s);
|
|
|
|
let remove_deep = (s: (set(string), nat)): (set(string), nat) =>
|
|
Set.remove("foobar", s[0]);
|
|
|
|
/*
|
|
let patch_op (s: string set) : string set =
|
|
begin patch s with set ["foobar"]; end with s
|
|
|
|
let patch_op_deep (s: string set * nat) : string set * nat =
|
|
begin patch s[0] with set ["foobar"]; end with s
|
|
*/
|
|
|
|
let mem_op = (s: set(string)): bool => Set.mem("foobar", s);
|
|
|
|
let size_op = (s: set(string)): nat => Set.size(s);
|