path: root/testsuite/tests/driver/T16608/T16608_1.hs

module Main
  ( main
  ) where

import MyInteger (MyInteger (MyInteger), toMyInteger)

main :: IO ()
main = do
  let (MyInteger i) = toMyInteger (41 :: Integer)
  print i