Create pe3.hs

did with john