| 18 |
|
|
| 19 |
|
#include "standard.h" |
| 20 |
|
|
| 21 |
< |
#define XNAME "X_" /* x function name */ |
| 22 |
< |
#define YNAME "Y_" /* y function name */ |
| 23 |
< |
#define ZNAME "Z_" /* z function name */ |
| 21 |
> |
#define XNAME "X`SYS`" /* x function name */ |
| 22 |
> |
#define YNAME "Y`SYS`" /* y function name */ |
| 23 |
> |
#define ZNAME "Z`SYS`" /* z function name */ |
| 24 |
|
|
| 25 |
|
#define ABS(x) ((x)>=0 ? (x) : -(x)) |
| 26 |
|
|
| 51 |
|
int i, j, m, n; |
| 52 |
|
char stmp[256]; |
| 53 |
|
|
| 54 |
< |
varset("PI", PI); |
| 55 |
< |
funset("hermite", 5, l_hermite); |
| 56 |
< |
funset("bezier", 5, l_bezier); |
| 57 |
< |
funset("bspline", 5, l_bspline); |
| 54 |
> |
varset("PI", ':', PI); |
| 55 |
> |
funset("hermite", 5, ':', l_hermite); |
| 56 |
> |
funset("bezier", 5, ':', l_bezier); |
| 57 |
> |
funset("bspline", 5, ':', l_bspline); |
| 58 |
|
|
| 59 |
|
if (argc < 8) |
| 60 |
|
goto userror; |
