Create d02.hs