diff options
Diffstat (limited to 'assignment-7/DateExtensions.dcl')
| -rw-r--r-- | assignment-7/DateExtensions.dcl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/assignment-7/DateExtensions.dcl b/assignment-7/DateExtensions.dcl new file mode 100644 index 0000000..c7eacec --- /dev/null +++ b/assignment-7/DateExtensions.dcl @@ -0,0 +1,15 @@ +definition module DateExtensions + +import iTasks.Extensions.DateTime + +:: Day = Sunday | Monday | Tuesday | Wednesday | Thursday | Friday | Saturday + +derive class iTask Day +instance toString Day + +nextHour :: DateTime -> DateTime +nextDay :: (Date -> Date) + +dayOfWeek :: Date -> Day + +previous :: Day Date -> Date |