2006-02-12から1日間の記事一覧
関数を使ってみる。あと、日付の整形を formatCalendarTime 関数に置換。 module Main where import Time import Locale today :: IO CalendarTime today = getClockTime >>= toCalendarTime main = do tm だいぶすっきり。
だいぶ伸びてきて邪魔になっていたので切ってきました。散髪中に最近お金をおろしていない事を思い出し、財布の中身が心配になって冷や冷やしていましたが、 5 千円札があって助かりました。
標準ライブラリの Time モジュールを使用すると日時の操作ができる。 module Main where import Time import Ix main = do c >= toCalendarTime) putStrLn $ show (ctYear c) ++ "-" ++ show ( (index(January, December) (ctMonth c)) + 1) ++ "-" ++ show …