XEphem/libip/sqr.c

10 lines
77 B
C

#include <math.h>
#include "ip.h"
double
sqr (double x)
{
return (x*x);
}