1{-# LANGUAGE UnicodeSyntax #-}
2
3dumy ∷ Double → Double → Double
4dumy a b =
5    let a² = a ★ a
6        b² = b ★ b
7    in sqrt $ a² + b²
8