1{-# LANGUAGE FlexibleContexts #-}
2
3f :: Log.Stack => a -> a
4f = id
5