🚀 go-pugleaf

In article <aet.714816424@munagin> aet@mullian.ee.mu.OZ.AU (bert thompson) writes:

>
>has anyone implemented any functions in Gofer to do any of the following on Floats:
>
>sqrt exp log sin atan erf

>many thanks!
>
>	bert.


I have implemented some of these functions.
I have tested on a sun4.
I started with Gofer version 2.23 and created version 2.23.1 with
modifications to the following files:

.     builtin.c
      added primitive functions and appropriate definitions and table entries
      called a mymath.h to define maths functions

.     main.c
      changed version number

.     Makefile
      to include the maths library

The prelude has also beed appended with the appropriate definitions.
Supported extras are:

.     sin
      cos
      tan
      asn
      acs
      atn

.     erf
      erfc

.     exp
      log

.     sqrt
      cbrt


These functions seem to work, but no proper testing has been
carried out.

Ahh... where do we get it from.....

Using anonymous ftp from ftp.dcs.glasgow.ac.uk
the file
  pub/haskell/gofer/msmith/gofer2.23.1/src.tar.Z
has the new source


If you don't already have the vanilla source for 2.23, it is in
  pub/haskell/gofer/msmith/gofer2.23/src.tar.Z



(For those at Glasgow dcs, the files are in
    ~msmith/pub/gofer2.23/src and ~msmith/pub/gofer2.23.1
)


--Matthew Smith
(msmith@dcs.glasgow.ac.uk)