xref: /csrg-svn/lib/libplot/f77plot/dot.c (revision 22633)
1*22633Sdist /*
2*22633Sdist  * Copyright (c) 1980 Regents of the University of California.
3*22633Sdist  * All rights reserved.  The Berkeley software License Agreement
4*22633Sdist  * specifies the terms and conditions for redistribution.
5*22633Sdist  */
6*22633Sdist 
717631Sjak #ifndef lint
8*22633Sdist static char sccsid[] = "@(#)dot.c	5.1 (Berkeley) 06/07/85";
9*22633Sdist #endif not lint
10*22633Sdist 
1117631Sjak dot_(xi, yi, dx, n, pat)
1217631Sjak int *xi, *yi, *dx, *n, *pat;
1317631Sjak {
1417631Sjak 	dot( *xi, *yi, *dx, *n, pat);
1517631Sjak }
16