arduino-copilot-1.5.2: Examples/Blink/Demo.hs

{-# LANGUAGE RebindableSyntax #-}

module Examples.Blink.Demo where

import Copilot.Arduino

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