diff options
| -rw-r--r-- | lib/ur/top.urs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/ur/top.urs b/lib/ur/top.urs index 907b28b2..8273db0c 100644 --- a/lib/ur/top.urs +++ b/lib/ur/top.urs @@ -35,7 +35,7 @@ con snd3 = K1 ==> K2 ==> K3 ==> fn t :: (K1 * K2 * K3) => t.2 con thd3 = K1 ==> K2 ==> K3 ==> fn t :: (K1 * K2 * K3) => t.3 (* Convert a record of n Units into a type-level record where -o each field has the same value (which describes a uniformly + each field has the same value (which describes a uniformly typed record) *) con mapU = K ==> fn f :: K => map (fn _ :: Unit => f) |