ack/lang/basic/lib/sqt.c

15 lines
290 B
C
Raw Normal View History

1984-11-29 14:22:02 +00:00
/*
* (c) copyright 1988 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
1984-11-29 14:22:02 +00:00
*
* Author: Ceriel J.H. Jacobs
1984-11-29 14:22:02 +00:00
*/
1994-06-24 11:31:16 +00:00
/* $Id$ */
1984-11-29 14:22:02 +00:00
1988-07-25 11:40:57 +00:00
#define __NO_DEFS
#include <math.h>
1984-11-29 14:22:02 +00:00
double _sqt(double x) { return sqrt(x); }
1984-11-29 14:22:02 +00:00