new file:   proj04.hs