/* Copyright (c) 1979 Regents of the University of California */static char sccsid[] = "@(#)SQRT.c 1.3 6/10/81";#include <math.h>doubleSQRT(value)	double	value;{	if (value < 0) {		ERROR("Negative argument of %e to sqrt\n", value);		return;	}	return sqrt(value);}