How to have channel event handling code depend on component state

[jmatsushita]

This might be a better fit for SO, but I'm hoping you could help with how I could create events which depend on the state of a component. For instance in the linked example :

https://github.com/paf31/purescript-sdom/blob/master/examples/async/src/Main.purs#L62

how could I make the interval value depend on State?

Thanks a lot for your time and the thought provoking work on comonadic and incremental UI! Can't wait to dig more into your work.