diff lib/ur/datetime.urs @ 1973:155bd0bc4d28

Day of week functions.
author Patrick Hurst <phurst@mit.edu>
date Thu, 05 Dec 2013 11:36:54 -0500
parents 56c68443cb9d
children a10368c65e7f
line wrap: on
line diff
--- a/lib/ur/datetime.urs	Thu Dec 05 11:36:46 2013 -0500
+++ b/lib/ur/datetime.urs	Thu Dec 05 11:36:54 2013 -0500
@@ -6,6 +6,11 @@
                   Second : int
                 }
 
+datatype day_of_week = Sunday | Monday | Tuesday | Wednesday | Thursday |
+         Friday | Saturday
+
+val show : show day_of_week
+
 val toTime : datetime -> time
 val fromTime : time -> datetime
 val datetimef : string -> datetime -> string