*** empty log message ***

1984-11-29 14:22:02 +00:00
parent 0c0c3b7892
commit ae1e81adb1
36 changed files with 1740 additions and 0 deletions
--- a/lang/basic/lib/sgn.c
+++ b/lang/basic/lib/sgn.c
@@ -0,0 +1,9 @@
+/* $Header $ */
+
+_sgn(v)
+double v;
+{
+	if( v>0) return(1);
+	if( v<0) return(-1);
+	return(0);
+}