git.iko.soy/rowtype-yoga/purescript-native
on cd4c708 help sign in
15 lines 304 B history raw
1module Main where
3import Prelude
4import Control.Monad.Eff
5import Control.Monad.Eff.Console
7replicateM_ :: forall m a. (Monad m) => Number -> m a -> m {}
8replicateM_ 0.0 _ = pure {}
9replicateM_ n act = do
10 act
11 replicateM_ (n - 1.0) act
13main = do
14 replicateM_ 10.0 (log "Hello World!")
15 log "Done"