X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=mTaskSimulation.dcl;h=16ceee4e22acf12948e3408bba2851a697afdddc;hb=8449be73c124cdccd37500c0d67d9404b94fc9c8;hp=525498f7d30447084af70c05901586863d5fdefe;hpb=0d7dc6966d2f428cd7543708e220aa4315d64978;p=mTask.git

diff --git a/mTaskSimulation.dcl b/mTaskSimulation.dcl
index 525498f..16ceee4 100644
--- a/mTaskSimulation.dcl
+++ b/mTaskSimulation.dcl
@@ -1,11 +1,12 @@
 definition module mTaskSimulation
 
+import iTasks.API.Core.Types
 import mTask
 
-:: Display a = Display a
+//:: Display a = Display a
 
-derive class iTask Display
-instance zero State`
+//derive class iTask Display
+//instance zero State`
 
 eval :: (Main (Eval t p)) -> [String] | toString t
 :: State` =