date and time created 85/01/02 20:29:36 by jak

SCCS-vsn: lib/libplot/f77plot/arc.c 1.1

diff --git a/usr/src/lib/libplot/f77plot/arc.c b/usr/src/lib/libplot/f77plot/arc.c
new file mode 100644 (file)
index 0000000..eb57526
--- /dev/null
+++ b/usr/src/lib/libplot/f77plot/arc.c
@@ -0,0 +1,8 @@
+#ifndef lint
+static char sccsid[] = "@(#)arc.c      1.1 (Berkeley) %G%";
+#endif
+arc_(x,y,x0,y0,x1,y1)
+int *x, *y, *x0, *y0, *x1, *y1;
+{
+       arc(*x, *y, *x0, *y0, *x1, *y1);
+}