Mercurial > urweb

diff lib/ur/top.ur @ 2211:ef766ef6e242

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge.
author Ziv Scully <ziv@mit.edu>
date Sat, 13 Sep 2014 19:16:07 -0400
parents a3435112b83e
children 4cd36865e0b5
line wrap: on
line diff
--- a/lib/ur/top.ur	Sat May 31 22:23:25 2014 -0400
+++ b/lib/ur/top.ur	Sat Sep 13 19:16:07 2014 -0400
@@ -405,3 +405,8 @@
             "application/x-www-form-urlencoded" => postFields' (postData pb)
           | _ => error <xml>Tried to get POST fields, but MIME type is not "application/x-www-form-urlencoded"</xml>
     end
+
+fun max [t] ( _ : ord t) (x : t) (y : t) : t =
+    if x > y then x else y
+fun min [t] ( _ : ord t) (x : t) (y : t) : t =
+    if x < y then x else y