diff --git a/Hangman.cabal b/Hangman.cabal
--- a/Hangman.cabal
+++ b/Hangman.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                Hangman
-version:             0.1.0.1
+version:             0.1.0.2
 synopsis:            The classic game of Hangman.
 description:         With a number of guesses you must figure out the hidden word!
 homepage:            https://github.com/lf94/Hangman
diff --git a/Hangman.hs b/Hangman.hs
--- a/Hangman.hs
+++ b/Hangman.hs
@@ -7,10 +7,10 @@
 data Letter = Hidden Char | Guessed Char
 
 -- | Represents a word made up of letters.
-type Word = [Letter]
+type AWord = [Letter]
 
 -- | The state of the Hangman game. 
-data HangmanState = HangmanState Word (Int,Int) [Char]
+data HangmanState = HangmanState AWord (Int,Int) [Char]
 
 -- | The start of the game.
 hangman :: String -> Int -> IO ()
@@ -48,7 +48,7 @@
   putStrLn $
     "Guessed:" ++ (show guessed)
 
-wordToString :: Word -> String
+wordToString :: AWord -> String
 wordToString = (fmap letterToChar)
 
 letterToChar :: Letter -> Char
@@ -63,7 +63,7 @@
 checkGuess c x = x
 
 -- | Determine if we've reached the end of the game.
-endGame :: Word -> (Int,Int) -> Bool
+endGame :: AWord -> (Int,Int) -> Bool
 endGame word (guess,guesses)
   | complete word = True
   | guess == guesses = True
@@ -71,7 +71,7 @@
 
 
 -- | Determine if the word is completely guessed.
-complete :: Word -> Bool
+complete :: AWord -> Bool
 complete = all isGuessed
 
 isGuessed :: Letter -> Bool