diff options
| author | bringert <bringert@cs.chalmers.se> | 2005-11-30 13:20:04 +0000 |
|---|---|---|
| committer | bringert <bringert@cs.chalmers.se> | 2005-11-30 13:20:04 +0000 |
| commit | eaf65c4e6aec33c3e4855124189d0cfc54e23279 (patch) | |
| tree | 760341f6be12731b7cc22c3885d520c0c6f1f19d /transfer/examples | |
| parent | b6ee9834322867aeff2e38934acc77eaba8c8f76 (diff) | |
Transfer: Ord extends Eq.
Diffstat (limited to 'transfer/examples')
| -rw-r--r-- | transfer/examples/overload.tr | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/transfer/examples/overload.tr b/transfer/examples/overload.tr index ef610e76b..dafefa203 100644 --- a/transfer/examples/overload.tr +++ b/transfer/examples/overload.tr @@ -90,7 +90,8 @@ data Ordering : Type where GT : Ordering Ord : Type -> Type -Ord A = sig { compare : A -> A -> Ordering } +Ord A = sig eq : A -> A -> Bool + compare : A -> A -> Ordering compare : (A : Type) -> Ord A -> A -> A -> Ordering compare _ d = d.compare |