formatted pester.hs a bit