added Sentence.hs