View on GitHub
File Changes
                       -- protocolVersion
                       <*> ((,,) <$> genNatural 1 10 <*> genNatural 1 50 <*> genNatural 1 100)
  where
-
    low = 1
+
    low = 10000
    hi = 200000

                      
    -- A wrapper to enable the dependent generators for the max sizes