module Main where

main :: IO ()
main = print_sigma

xs = [17, 16, 17]

mean_xs = (sum xs) / (length xs)

print_sigma = print $ sqrt $ (1 /6) *