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 
    6 module Primitives where
    7 
    8 rad2deg :: Double -> Double
    9 -- never enteredrad2deg r = r * 180 / pi
   10 
   11 deg2rad :: Double -> Double
   12 -- entered 2 timesdeg2rad d = d * pi / 180
   13 
   14 addi :: Int -> Int -> Int
   15 -- never enteredaddi = (+)
   16 
   17 addf :: Double -> Double -> Double
   18 -- never enteredaddf = (+)
   19 
   20 acosD :: Double -> Double
   21 -- never enteredacosD x = acos x * 180 / pi
   22 
   23 asinD :: Double -> Double
   24 -- never enteredasinD x = asin x * 180 / pi