lcd parallel hept works

lcd_hept/prog.ept

@@ -13,14 +13,18 @@ let
     downt = not upt;
 
     () = lcd_string((msg, line) when upt);
-    () = lcd_string((".", line) when downt);
+    () = lcd_string(("                ", line) when downt);
 tel
 
 node main() returns ()
-let 
-  () =  dinit();
-  () = lcd_init();
+var j : int;
+    start : bool; 
+let
+  j = 0 fby (j+1);
+  start = j < 2;
+  () = dinit() when start;
+  () = lcd_init() when start;
   () = update_lcd<<6, 4, "Hello", 0>>();
-  () = update_lcd<<10, 5, "Hi", 1>>();
+  () = update_lcd<<2, 1, "Hi", 1>>();
 tel