Add PHOAS in Coq and Haskell