| 12 |
|
*/ |
| 13 |
|
|
| 14 |
|
#include <stdlib.h> |
| 15 |
– |
#include <stdio.h> |
| 15 |
|
#include <math.h> |
| 17 |
– |
#include <string.h> |
| 16 |
|
|
| 17 |
|
#include "calcomp.h" |
| 18 |
< |
#include "rtio.h" |
| 18 |
> |
#include "paths.h" |
| 19 |
|
#include "resolu.h" |
| 20 |
|
#include "rterror.h" |
| 21 |
|
#include "fvect.h" |
| 76 |
|
scompile(stmp, NULL, 0); |
| 77 |
|
sprintf(stmp, "%s(t)=%s;", RNAME, argv[6]); |
| 78 |
|
scompile(stmp, NULL, 0); |
| 79 |
< |
nseg = atoi(argv[7]); |
| 79 |
> |
nseg = eval(argv[7]) + .5; |
| 80 |
|
if (nseg <= 0) |
| 81 |
|
goto userror; |
| 82 |
|
|
| 83 |
|
fputs("# ", stdout); |
| 84 |
|
printargs(argc, argv, stdout); |
| 85 |
< |
eclock = 0; |
| 85 |
> |
doptimize(1); |
| 86 |
> |
eclock++; |
| 87 |
|
|
| 88 |
|
for (i = 0; i <= nseg; i++) { |
| 89 |
|
t = (double)i/nseg; |
