diff options
| -rw-r--r-- | src/main.rs | 2 | ||||
| -rw-r--r-- | src/parser.rs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/main.rs b/src/main.rs index 491f6d6..ca9b9bb 100644 --- a/src/main.rs +++ b/src/main.rs @@ -33,7 +33,7 @@ let element check_cases : Nat = case injected of [ z. myz => myz .y .n | f. myf let signature Graph = theory { Node :: Set, - Edge :: (s : Node) (t : Node) -> Set + Edge :: (s : set-of(Node)) (t : set-of(Node)) -> Set } let instance natPoset :: Graph = { diff --git a/src/parser.rs b/src/parser.rs index 6810927..0a7f063 100644 --- a/src/parser.rs +++ b/src/parser.rs @@ -278,7 +278,7 @@ let set Maybe = variant [ let src = r#" let signature Graph = theory { Node :: Set, - Edge :: (s : Node) (t : Node) -> Set + Edge :: (s : set-of(Node)) (t : set-of(Node)) -> Set } let instance natPoset :: Graph = { |