GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-23 11:42:49 -06:00
Code Issues Packages Projects Releases Wiki Activity

Transfer: Ord extends Eq.

Browse Source
This commit is contained in:
bringert
2005-11-30 13:20:04 +00:00
parent b6ee983432
commit eaf65c4e6a
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
transfer/examples/overload.tr
View File

@@ -90,7 +90,8 @@ data Ordering : Type where
GT : Ordering GT : Ordering
Ord : Type -> Type 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 : (A : Type) -> Ord A -> A -> A -> Ordering
compare _ d = d.compare compare _ d = d.compare