{-# OPTIONS -Wall -Werror #-}

module Main where

import Data.Time

main :: IO ()
main = do
	zone <- getCurrentTimeZone
	putStrLn (timeZoneOffsetString zone)