From cba2fcb9b118cedb603b171ac7d7581c5adb844c Mon Sep 17 00:00:00 2001
From: bringert <bringert@cs.chalmers.se>
Date: Wed, 30 Nov 2005 16:00:06 +0000
Subject: Moved transfer libraries to transfer/lib

---
 transfer/lib/bool.tr | 4 ++++
 1 file changed, 4 insertions(+)
 create mode 100644 transfer/lib/bool.tr

(limited to 'transfer/lib/bool.tr')

diff --git a/transfer/lib/bool.tr b/transfer/lib/bool.tr
new file mode 100644
index 000000000..b8c1c95a5
--- /dev/null
+++ b/transfer/lib/bool.tr
@@ -0,0 +1,4 @@
+depif : (A:Type) -> (B:Type) -> (b:Bool) -> A -> B -> if Type b then A else B
+depif _ _ True x _ = x
+depif _ _ False _ y = y
+
-- 
cgit v1.2.3