diff --git a/Haslo.hs b/Haslo.hs
--- a/Haslo.hs
+++ b/Haslo.hs
@@ -37,4 +37,4 @@
 niceShow (Right xs) = mapM_ (putStrLn . show) xs
 niceShow (Left err) = putStrLn $ show err
 
-getVersionHaslo = "0.1.2"
+getVersionHaslo = "0.1.3"
diff --git a/HasloQC.hs b/HasloQC.hs
--- a/HasloQC.hs
+++ b/HasloQC.hs
@@ -39,7 +39,8 @@
 veryHeavyArgs = Args
   { replay     = Nothing
   , maxSuccess = 100000
-  , maxDiscard = 7000
+--  , maxDiscard = 7000
+  , maxDiscardRatio = 10
   , maxSize    = 100000
   , chatty     = True
 -- noShrinking flag?
@@ -48,7 +49,8 @@
 heavyArgs = Args
   { replay     = Nothing
   , maxSuccess = 10000
-  , maxDiscard = 7000
+  , maxDiscardRatio = 10
+--  , maxDiscard = 7000
   , maxSize    = 10000
   , chatty     = True
 -- noShrinking flag?
@@ -57,7 +59,8 @@
 myArgs = Args
   { replay     = Nothing
   , maxSuccess = 300
-  , maxDiscard = 2500
+  , maxDiscardRatio = 10
+--, maxDiscard = 2500
   , maxSize    = 300
   , chatty     = True
 -- noShrinking flag?
@@ -66,7 +69,8 @@
 patientArgs = Args
   { replay     = Nothing
   , maxSuccess = 300
-  , maxDiscard = 10000
+  , maxDiscardRatio = 10
+--, maxDiscard = 10000
   , maxSize    = 300
   , chatty     = True
 }
diff --git a/haslo.cabal b/haslo.cabal
--- a/haslo.cabal
+++ b/haslo.cabal
@@ -1,5 +1,5 @@
 Name:		haslo
-Version:	0.1.2
+Version:	0.1.3
 License:	BSD3
 License-file: license
 Author:		Bartosz Wojcik
@@ -29,7 +29,7 @@
                  Haslo.Calculator
 
 Executable hasloQC
-  Build-Depends:	old-time, QuickCheck, mtl, time, wtk
+  Build-Depends:	old-time, QuickCheck >= 2.5, mtl, time, wtk
   Other-Modules: Haslo.HasloQCTestL
   Main-Is: HasloQC.hs