exercise 3.8: add type signatures

03-typesandentities/exercises/ex3.8.hs

@@ -0,0 +1,20 @@
+-- Exercise 3.8
+-- George C. Privon
+-- 2023-09-05
+
+-- Add type signatures to code definitions
+
+circleRadius :: Double
+circleRadius = 3.5
+
+cot :: Double -> Double
+cot x = 1 / tan x
+
+fe :: Double -> Double
+fe epsilon = epsilon * tan (epsilon * pi / 2)
+
+fo :: Double -> Double
+fo epsilon = -epsilon * cot (epsilon * pi / 2)
+
+g :: Double -> Double -> Double
+g nu epsilon = sqrt (nu**2 - epsilon**2)