12 testData = [ format (W3CDateTime 2010 Nothing Nothing Nothing Nothing Nothing Nothing)
16 , format (W3CDateTime 2010 (Just 12) Nothing Nothing Nothing Nothing Nothing)
20 , format (W3CDateTime 2010 (Just 12) (Just 31) Nothing Nothing Nothing Nothing)
24 , format (W3CDateTime 2010 (Just 12) (Just 31) (Just 1) (Just 23) Nothing (Just utc))
28 , format (W3CDateTime 2010 (Just 12) (Just 31) (Just 1) (Just 23) (Just 45) (Just (hoursToTimeZone 9)))
30 "2010-12-31T01:23:45+09:00"
32 , format (W3CDateTime 2010 (Just 12) (Just 31) (Just 1) (Just 23) (Just 45.666666) (Just (hoursToTimeZone 9)))
34 "2010-12-31T01:23:45.666666+09:00"