Fin-0.2.1.0: Data/Ap.hs

module Data.Ap where

newtype Ap f x a = Ap { ap :: f a (x a) }