Moving parsing functions to Create.hs