1-- Copyright (c) 2000 Galois Connections, Inc.
2-- All rights reserved.  This software is distributed as
3-- free software under the license in the file "LICENSE",
4-- which is included in the distribution.
5
6module Primitives where
7
8rad2deg :: Double -> Double
9rad2deg r = r * 180 / pi
10
11deg2rad :: Double -> Double
12deg2rad d = d * pi / 180
13
14addi :: Int -> Int -> Int
15addi = (+)
16
17addf :: Double -> Double -> Double
18addf = (+)
19
20acosD :: Double -> Double
21acosD x = acos x * 180 / pi
22
23asinD :: Double -> Double
24asinD x = asin x * 180 / pi
25