Mercurial > urweb

diff lib/ur/top.ur @ 1649:9253765d7724

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Rename [Top.id] to avoid clash with [Basis.id]
author Adam Chlipala <adam@chlipala.net>
date Thu, 29 Dec 2011 14:12:03 -0500
parents 18d18a70821e
children 6bc2a8cb3a67
line wrap: on
line diff
--- a/lib/ur/top.ur	Thu Dec 29 10:04:09 2011 -0500
+++ b/lib/ur/top.ur	Thu Dec 29 14:12:03 2011 -0500
@@ -51,7 +51,7 @@
 
 fun not b = if b then False else True
 
-con id = K ==> fn t :: K => t
+con ident = K ==> fn t :: K => t
 con record (t :: {Type}) = $t
 con fst = K1 ==> K2 ==> fn t :: (K1 * K2) => t.1
 con snd = K1 ==> K2 ==> fn t :: (K1 * K2) => t.2