module T8696A (a) where {-# NOINLINE a #-} a :: Int a = 3