{-# htermination (+) :: Int -> Int -> Int #-}