module Main (main) where

import GarnetRs.Wrapped

main :: IO ()
main = do
    hello "Haskell"
    helloStruct T{a = True, b = 42}
    helloStruct T{a = False, b = maxBound}
    helloShape $ Circle 3.14
    helloShape $ Rectangle 10.0 5.0
    putStrLn . ("3 + 4 = " <>) . show =<< add 3 4