diff options
Diffstat (limited to 'transfer/lib/bool.tra')
| -rw-r--r-- | transfer/lib/bool.tra | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/transfer/lib/bool.tra b/transfer/lib/bool.tra new file mode 100644 index 000000000..2639422b7 --- /dev/null +++ b/transfer/lib/bool.tra @@ -0,0 +1,6 @@ +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 + |