#お、最新環境うまくいった。
#import Data.Time.Calendar.WeekDate
#fromWeekDate 2012 52 1 -- 52週目の月曜
#2012-12-24
#fromWeekDate 2012 52 7
#2012-12-30
#fromWeekDate 2012 53 1
#2012-12-24
#おーい…
#Invalid week and day values will be clipped to the correct range らしいので fromWeekDateValid :: Integer -> Int -> Int -> Maybe Day の方がいいかもしれません
#修正ユリウス日でまじめにおいかけるとか...