/* elementary operations on complex numbers */
-int c_error;
+static int c_error;
static complex c_1 = {1., 0.};
complex c_sum(a,b)
return r;
}
-complex c_powu(x, n)
+static complex c_powu(x, n)
complex x;
long n;
{
return r;
}
-complex c_powi(x, n)
+static complex c_powi(x, n)
complex x;
long n;
{
}
-void
+static void
complex_buf_repr(buf, v)
char *buf;
complexobject *v;
return mkvalue("(dd)", div, mod);
}
-double powu(x, n)
+static double powu(x, n)
double x;
long n;
{
return r;
}
-double powi(x, n)
+static double powi(x, n)
double x;
long n;
{