definition module Tasks.mTaskTask import Devices.mTaskDevice import mTask import iTasks derive class iTask MTaskTask, MTaskInterval, Main, ByteCode, Stmt, Expr, BC, BCState, RWST :: MTaskTask = { name :: String, ident :: Int, dateAdded :: DateTime } makeTask :: String Int -> Task MTaskTask sendTaskToDevice :: String (Main (ByteCode () Stmt)) (MTaskDevice, MTaskInterval) -> Task ()