Consider using the time-lens package.<br><br> import Data.Time.Lens <br> import Data.Lens.Common<br><br>List comprehension style:<br><br> [modL seconds (+ fromIntegral n) t | n <- [0..]]<br> [modL minutes (+ n) t | n <- [0..]]<br>
<br>(you need fromIntegral for seconds, because it is of fractional type in Data.Time).<br><br>iterate style, as suggested by Karl:<br><br> iterate (seconds ^+= 1) t<br> iterate (minutes ^+= 1) t<br><br><div class="gmail_quote">
On Fri, Sep 14, 2012 at 7:29 AM, Magicloud Magiclouds <span dir="ltr"><<a href="mailto:magicloud.magiclouds@gmail.com" target="_blank">magicloud.magiclouds@gmail.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Hi,<br>
Simple usage, I could make an instance of Enum to UTCTime, so<br>
[utcTime..] could work. But that is so stiff. How if sometimes I want<br>
to step by 1 min, sometimes I want to step by 1 sec?<br>
So I think some way like [ t | addUTCTime last 60 ] could be nice.<br>
But I cannot figure it out....<br>
Any idea?<br>
<span class="HOEnZb"><font color="#888888">--<br>
竹密岂妨流水过<br>
山高哪阻野云飞<br>
<br>
And for G+, please use magiclouds#<a href="http://gmail.com" target="_blank">gmail.com</a>.<br>
<br>
_______________________________________________<br>
Haskell-Cafe mailing list<br>
<a href="mailto:Haskell-Cafe@haskell.org">Haskell-Cafe@haskell.org</a><br>
<a href="http://www.haskell.org/mailman/listinfo/haskell-cafe" target="_blank">http://www.haskell.org/mailman/listinfo/haskell-cafe</a><br>
</font></span></blockquote></div><br>