1*13400Ssam #ifndef lint 2*13400Ssam static char sccsid[] = "@(#)dot.c 4.1 (Berkeley) 06/27/83"; 3*13400Ssam #endif 4*13400Ssam 5*13400Ssam #include <stdio.h> 6*13400Ssam dot(xi,yi,dx,n,pat) 7*13400Ssam int pat[]; 8*13400Ssam { 9*13400Ssam int i; 10*13400Ssam putc('d',stdout); 11*13400Ssam putsi(xi); 12*13400Ssam putsi(yi); 13*13400Ssam putsi(dx); 14*13400Ssam putsi(n); 15*13400Ssam for(i=0; i<n; i++)putsi(pat[i]); 16*13400Ssam } 17