liftmTask (intBlink iInterval) dev/*\label{lst:intro_liftmtask}*/
-|| (Hint "Interval (ms)" @>> updateSharedInformation [] iInterval)/*\label{lst:intro_editor}*/
>>* [OnAction (Action "Stop") (always (return ()))]
liftmTask (intBlink iInterval) dev/*\label{lst:intro_liftmtask}*/
-|| (Hint "Interval (ms)" @>> updateSharedInformation [] iInterval)/*\label{lst:intro_editor}*/
>>* [OnAction (Action "Stop") (always (return ()))]