Doomsday rule: Difference between revisions

Content deleted Content added

Inline

@@ Line 557: / Line 557: @@
 instance Show Date where
   show Date {year = y, month = m, day = d} =
-    printf "%2d/%d/%4d" m d y
+    printf "%4d-%02d-%02d" y m d
 leap :: Int -> Bool
@@ Line 596: / Line 596: @@
 main = putStr $ unlines $ map dateAndDay dates</lang>
 {{out}}
-<pre> 1/6/1800: Monday
+<pre>1800-01-06: Monday
-/29/1875: Monday
+-03-29: Monday
-/7/1915: Tuesday
+-12-07: Tuesday
-/23/1970: Wednesday
+-12-23: Wednesday
-/14/2043: Thursday
+-05-14: Thursday
-/12/2077: Friday
+-02-12: Friday
-/2/2101: Saturday</pre>
+-04-02: Saturday</pre>
 =={{header|Java}}==