mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-25 16:05:27 +03:00
13 lines
226 B
Haskell
13 lines
226 B
Haskell
|
module Main where
|
||
|
|
|
||
|
|
import Prelude
|
||
|
|
|
||
|
|
import Urbit.TermSize (liveTermSize)
|
||
|
|
|
||
|
|
main :: IO ()
|
||
|
|
main = do
|
||
|
|
init <- liveTermSize (putStrLn . ("New Size: " <>) . show)
|
||
|
|
putStrLn ("Initial Size: " <> show init)
|
||
|
|
_ <- getLine
|
||
|
|
pure ()
|