integerNegate.hs 142 Bytes
Newer Older
Sylvain Henry's avatar
Sylvain Henry committed
1 2 3 4 5 6 7 8
{-# OPTIONS_GHC -O2 #-}

module Test where

import GHC.Num.Integer

neg_neg :: Integer -> Integer
neg_neg x = integerNegate (integerNegate x)