defineFunction :: String -> ([Double] -> Double) -> Function
defineFunction n f = Function n (DefinedFunction f)
defineFunction :: String -> ([Double] -> Double) -> Function
defineFunction n f = Function n (DefinedFunction f)
defineFunction n f = Function n (DefinedFunction f)