ack/lang/a68s/liba68s/ln.c

extern	double _log();

double LN(statlink, x)
  int *statlink; double x;
  {return(_log(x));}
Adapted to our installation 1989-02-08 09:38:15 +00:00			`extern double _log();`
Initial revision 1988-10-04 13:41:01 +00:00
			`double LN(statlink, x)`
			`int *statlink; double x;`
Adapted to our installation 1989-02-08 09:38:15 +00:00			`{return(_log(x));}`