/* plottst.c : test the Unix plot commands
 *
 * by Joel Swank 4/19/88
 */

main(argc,argv)
int argc;
char *argv[];
{
	openpl();
	space(0,0,4096,4096);
	erase();
	move(100,100);
	label("Test label");
	line(200,300,300,400);
	circle(500,500,50);
	circle(500,500,200);
	point(1000,1000);
	arc(1000,1000,1100,1000,1000,1100);
	cont(600,700);
	point(50,50);
	point(50,52);
	point(50,54);
	linemod("dotted");
	line(250,350,350,450);
	closepl();
}