Document infix:<-> and infix:<+> for Date

Author: zoffixznet

doc/Type/Date.pod6

@@ -312,4 +312,29 @@ my $instant = DateTime.new(
 sleep-until $instant;
 qqx{mplayer wake-me-up.mp3};
 
+=head2 sub infix:<->
+
+    sub infix:<-> (Date:D, Int:D --> Date:D)
+    sub infix:<-> (Date:D, Date:D --> Int:D)
+
+Takes a date to subtract from and either an L«C<Int>|/type/Int», representing
+the number of days to subtract, or another L«C<Date>|/type/Date» object.
+Returns a new L«C<Date>|/type/Date» object or the number of days between the
+two dates, respectively.
+
+    say Date.new('2016-12-25') - Date.new('2016-12-24') # 1
+    say Date.new('2015-12-25') - Date.new('2016-11-21') # -332
+    say Date.new('2016-11-21') - 332                    # 2015-12-25
+
+=head2 sub infix:<+>
+
+    sub infix:<+> (Date:D, Int:D --> Date:D)
+    sub infix:<+> (Int:D, Date:D --> Date:D)
+
+Takes an L«C<Int>|/type/Int» and adds that many days to the given
+L«C<Date>|/type/Date» object.
+
+    say Date.new('2015-12-25') + 332 # 2016-11-21
+    say 1 + Date.new('2015-12-25')   # 2015-12-26
+
 =end pod