{-# LANGUAGE UnicodeSyntax #-}
module Main (main) where

dumy :: Double -> Double -> Double
dumy a b
  = let aČ = a  a
        bČ = b  b
      in sqrt $ aČ + bČ