sqrIntegral :: (Monad m, HasTime t s, Fractional t) => Wire s () m a t
sqrIntegral = integral 0 . time
sqrIntegral :: (Monad m, HasTime t s, Fractional t) => Wire s () m a t
sqrIntegral = integral 0 . time
sqrIntegral = integral 0 . time