diff --git a/http-trace.cabal b/http-trace.cabal
--- a/http-trace.cabal
+++ b/http-trace.cabal
@@ -1,5 +1,5 @@
 name:                http-trace
-version:             0.1.0.1
+version:             0.1.1.0
 synopsis:            Tracking http redirects 
 description:         Tracking http redirects for supplied url
 homepage:            https://github.com/sigrlami/http-trace#readme
diff --git a/src/Http/Trace.hs b/src/Http/Trace.hs
--- a/src/Http/Trace.hs
+++ b/src/Http/Trace.hs
@@ -2,7 +2,7 @@
 
 module Http.Trace
        ( traceRedirects
-       , traceRedirects'  
+       , traceRedirectsTLD  
        , isReachable
        ) where
 
@@ -67,10 +67,10 @@
 -- | Alternative to `traceRedrects` that returns top-level domain names
 --   without full url path. With compress functionality can show only
 --   distinct domains without repetition.                       
-traceRedirects' :: String       -- ^ Starting url
-                -> Bool         -- ^ Flag to remove duplicate domains
-                -> IO [String]  -- ^ List of available redirects
-traceRedirects' start compress = do
+traceRedirectsTLD :: String       -- ^ Starting url
+                  -> Bool         -- ^ Flag to remove duplicate domains
+                  -> IO [String]  -- ^ List of available redirects
+traceRedirectsTLD start compress = do
   rdrs <- traceRedirects start
   let rdrs' = map (\x -> fst $ head $ scan shortUrlRegex x) rdrs
   -- TODO: 1. apply shortUrlRegex
@@ -84,7 +84,9 @@
 
 -- | Checks if we redirects paths lead to destination url
 --                        
-isReachable :: String -> String -> IO Bool
+isReachable :: String  -- ^ Statring url
+            -> String  -- ^ Destination url
+            -> IO Bool -- ^ Flag whether url reached
 isReachable start dest =
   do
     redirects <- traceRedirects start