#ifndef lintstatic char SccsId[] = " @(#)arc.c	4.1	(ULTRIX)	7/2/90";#endif not(lint)/* * Modification History * * 	April-11-1989, Pradeep Chetal *	Added changes from 4.3Tahoe BSD for lots of new drivers *//* * Copyright (c) 1980, 1986 Regents of the University of California. * All rights reserved.  The Berkeley software License Agreement * specifies the terms and conditions for redistribution. */#ifndef lintstatic char sccsid[] = "@(#)arc.c	6.1 (Berkeley) 8/29/86";#endif not lint#include "grnplot.h"arc(x,y,x0,y0,x1,y1){	extern double atan2();	if (!ingrnfile) erase();	endvector();	printf("ARC\n");	outxy(x,y);	outxy(x0,y0);	outxy(x1,y1);	printf("*\n%d %d\n0\n",linestyle,(int) (atan2(x1-x,y1-y)-atan2(x0-x,y0-y)));	curx =x;	cury =y;}