{-# LANGUAGE RebindableSyntax #-}

import Copilot.Arduino

main :: IO ()
main = arduino $ do
	led =: blinking
	delay =: MilliSeconds (constant 100)