summaryrefslogtreecommitdiff
path: root/lib/ur/incl.urs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/ur/incl.urs')
-rw-r--r--lib/ur/incl.urs20
1 files changed, 0 insertions, 20 deletions
diff --git a/lib/ur/incl.urs b/lib/ur/incl.urs
deleted file mode 100644
index 24db0a8a..00000000
--- a/lib/ur/incl.urs
+++ /dev/null
@@ -1,20 +0,0 @@
-con incl :: K --> {K} -> {K} -> Type
-
-val incl : K --> r1 :: {K} -> r2 :: {K} -> [r1 ~ r2] => incl r1 (r1 ++ r2)
-val proj : r1 ::: {Type} -> r2 ::: {Type} -> incl r1 r2 -> $r2 -> $r1
-
-val inv1 : K --> nm :: Name -> t :: K -> r :: {K} -> r' :: {K}
- -> [[nm] ~ r] =>
- f :: (Name -> K -> {K} -> Type)
- -> incl ([nm = t] ++ r) r'
- -> (nm :: Name -> t :: K -> r :: {K} -> [[nm] ~ r] => f nm t ([nm = t] ++ r))
- -> f nm t r'
-val inv2 : K --> nm :: Name -> t :: K -> r :: {K} -> r' :: {K}
- -> [[nm] ~ r] =>
- incl ([nm = t] ++ r) r' -> incl r r'
-
-val fold : K --> tf :: ({K} -> Type) -> r ::: {K}
- -> (nm :: Name -> v :: K -> r' :: {K}
- -> [[nm] ~ r'] => incl ([nm = v] ++ r') r -> tf r' -> tf ([nm = v] ++ r'))
- -> tf []
- -> folder r -> tf r