1 2 3 4 5
{-# LANGUAGE PartialTypeSignatures, NamedWildCards #-} module ShowNamed where showTwo :: Show _a => _a -> String showTwo x = show x