T9840a.hs 131 Bytes
Newer Older
1 2 3 4 5 6 7 8 9 10
{-# LANGUAGE TypeFamilies #-}

module T9840a where

import {-# SOURCE #-} T9840

type family G a where

bar :: X a -> X a
bar = id