summaryrefslogtreecommitdiffhomepage
path: root/Types/Cost.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Types/Cost.hs')
-rw-r--r--Types/Cost.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/Types/Cost.hs b/Types/Cost.hs
index c742848..f880bfe 100644
--- a/Types/Cost.hs
+++ b/Types/Cost.hs
@@ -11,6 +11,9 @@ data Cost op
| CombinedCost (Cost op) (Cost op)
deriving (Show)
+unknownCost :: Cost op
+unknownCost = CPUCost (Seconds 0)
+
newtype Seconds = Seconds Integer
deriving (Num)