diff options
| author | bringert <bringert@cs.chalmers.se> | 2005-11-30 17:40:32 +0000 |
|---|---|---|
| committer | bringert <bringert@cs.chalmers.se> | 2005-11-30 17:40:32 +0000 |
| commit | a68cd282cb83d8ace42baffe0b0d3a00f3455920 (patch) | |
| tree | c73296337b84652ac3fe5e1cb4ddece681402729 /transfer/lib/bool.tr | |
| parent | 94b99219b8a438c4f29f68a0c19ee86caa608904 (diff) | |
Transfer: reimplement operators with type classes.
Diffstat (limited to 'transfer/lib/bool.tr')
| -rw-r--r-- | transfer/lib/bool.tr | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/transfer/lib/bool.tr b/transfer/lib/bool.tr index b8c1c95a5..2639422b7 100644 --- a/transfer/lib/bool.tr +++ b/transfer/lib/bool.tr @@ -1,3 +1,5 @@ +import prelude + depif : (A:Type) -> (B:Type) -> (b:Bool) -> A -> B -> if Type b then A else B depif _ _ True x _ = x depif _ _ False _ y = y |