{-# htermination minimum :: [Float] -> Float #-}