|
@@ -43,6 +43,7 @@ rangePi printFun (Just low) (Just high) =
|
|
"Error: Please give a proper range."
|
|
"Error: Please give a proper range."
|
|
else
|
|
else
|
|
foldr (++) [] (map printFun (drop (fromIntegral low) . take (fromIntegral high) $ hexDigits))
|
|
foldr (++) [] (map printFun (drop (fromIntegral low) . take (fromIntegral high) $ hexDigits))
|
|
|
|
+ -- foldl (.) id (map (showString . printFun) (drop (fromIntegral low) . take (fromIntegral high) $ hexDigits)) "" -- Alternative implementation: not sure about speed
|
|
|
|
|
|
rangePi _ _ _ = printErr
|
|
rangePi _ _ _ = printErr
|
|
|
|
|