Create ch6.hs