Mostly completed tutorial6.hs

Didn't manage last exercise.