Parametricity

Consider this example, based on a set X and the type T(X) = [X → X] of functions from X to itself. The higher-order function twice_X : T(X) → T(X) given by twice_X(f) = f ∘ f, is intuitively independent of the set X. The family of all such functions twice_X, parametrized by sets X, is called a "parametrically polymorphic function". We simply write twice for the entire family of these functions and write its type as ${\displaystyle \forall }$X. T(X) → T(X). The individual functions twice_X are called the components or instances of the polymorphic function. Notice that all the component functions twice_X act "the same way" because they are given by the same rule. Other families of functions obtained by picking one arbitrary function from each T(X) → T(X) would not have such uniformity. They are called "ad hoc polymorphic functions". Parametricity is the abstract property enjoyed by the uniformly acting families such as twice, which distinguishes them from ad hoc families. With an adequate formalization of parametricity, it is possible to prove that the parametrically polymorphic functions of type ${\displaystyle \forall }$X. T(X) → T(X) are one-to-one with natural numbers. The function corresponding to the natural number n is given by the rule f ${\displaystyle \mapsto }$ fⁿ, i.e., the polymorphic Church numeral for n. In contrast, the collection of all ad hoc families would be too large to be a set.

The parametricity theorem was originally stated by John C. Reynolds, who called it the abstraction theorem.[1] In his paper "Theorems for free!",[2] Philip Wadler described an application of parametricity to derive theorems about parametrically polymorphic functions based on their types.

Parametricity is the basis for many program transformations implemented in compilers for the Haskell programming language. These transformations were traditionally thought to be correct in Haskell because of Haskell's non-strict semantics. Despite being a lazy programming language, Haskell does support certain primitive operations—such as the operator seq—that enable so-called "selective strictness", allowing the programmer to force the evaluation of certain expressions. In their paper "Free theorems in the presence of seq",[3] Patricia Johann and Janis Voigtlaender showed that because of the presence of these operations, the general parametricity theorem does not hold for Haskell programs; thus, these transformations are unsound in general.

• Parametric polymorphism
• Non-strict programming language

• Wadler: Parametricity