arduino-copilot-1.2.0: examples/blink/demo.hs

{-# LANGUAGE RebindableSyntax #-}

import Copilot.Arduino

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