cleaning up examples
This commit is contained in:
parent
333534a8d1
commit
9db2cb800d
10 changed files with 45 additions and 80 deletions
16
example/comparable.msph
Normal file
16
example/comparable.msph
Normal file
|
@ -0,0 +1,16 @@
|
|||
nominal lt
|
||||
nominal eq
|
||||
nominal gt
|
||||
|
||||
type ord = lt | eq | gt
|
||||
|
||||
type comparable[t] = {
|
||||
member cmp : t -> ord
|
||||
}
|
||||
|
||||
|
||||
type integer = {
|
||||
member cmp : integer -> ord
|
||||
}
|
||||
|
||||
assert integer <: comparable[integer]
|
Loading…
Add table
Add a link
Reference in a new issue