cleaned up Hask.Prism