Started Haskell Bob
Extract boolen into methods