Create pe4.ml

the recursion which can skip unnecessary iterations is not working yet