update

[msc-thesis1617.git] / pres.system.tex

diff --git a/pres.system.tex b/pres.system.tex
index f4c71ab..f45abbe 100644 (file)
--- a/pres.system.tex
+++ b/pres.system.tex
@@ -438,8 +438,11 @@ blink =               makeDevice "stm32" stm32 >>= connectDevice
 where
        stm32   = makeDevice "Stm32"
                (SerialDevice {devicePath="/dev/ttyUSB0", baudrate=B9600, ...}
-       blinkTask = sds \led=LED1 In sds \x=True In
-               {main = IF x (ledOff led) (ledOn led) :. x =. Not x }
+       blinkTask = sds \led=LED1 In sds \x=True In {main =
+                       ledOn LED1 :.  ledOn LED2 :.  ledOn LED3 :.
+                       IF x (ledOff led) (ledOn led) :.
+                       x =. Not x
+               }
        
        \end{lstlisting}
 \end{frame}