| 16 |
|
*/ |
| 17 |
|
|
| 18 |
|
#include "standard.h" |
| 19 |
+ |
|
| 20 |
+ |
#include "paths.h" |
| 21 |
+ |
#include "resolu.h" |
| 22 |
+ |
#include "rterror.h" |
| 23 |
|
#include "calcomp.h" |
| 24 |
|
|
| 25 |
|
char XNAME[] = "X`SYS"; /* x function name */ |
| 71 |
|
void comprow(double s, POINT *row, int siz); |
| 72 |
|
void compnorms(POINT *r0, POINT *r1, POINT *r2, int siz); |
| 73 |
|
int norminterp(FVECT resmat[4], POINT *p0, POINT *p1, POINT *p2, POINT *p3); |
| 70 |
– |
void printhead(int ac, char **av); |
| 74 |
|
|
| 75 |
|
|
| 76 |
|
int |
| 138 |
|
} |
| 139 |
|
row0++; row1++; row2++; |
| 140 |
|
/* print header */ |
| 141 |
< |
printhead(argc, argv); |
| 141 |
> |
fputs("# ", stdout); |
| 142 |
> |
printargs(argc, argv, stdout); |
| 143 |
|
eclock = 0; |
| 144 |
|
/* initialize */ |
| 145 |
|
comprow(-1.0/m, row0, n); |
| 585 |
|
|
| 586 |
|
#undef u |
| 587 |
|
#undef v |
| 584 |
– |
} |
| 585 |
– |
|
| 586 |
– |
|
| 587 |
– |
void |
| 588 |
– |
eputs(msg) |
| 589 |
– |
char *msg; |
| 590 |
– |
{ |
| 591 |
– |
fputs(msg, stderr); |
| 592 |
– |
} |
| 593 |
– |
|
| 594 |
– |
|
| 595 |
– |
void |
| 596 |
– |
wputs(msg) |
| 597 |
– |
char *msg; |
| 598 |
– |
{ |
| 599 |
– |
eputs(msg); |
| 600 |
– |
} |
| 601 |
– |
|
| 602 |
– |
|
| 603 |
– |
void |
| 604 |
– |
quit(code) |
| 605 |
– |
int code; |
| 606 |
– |
{ |
| 607 |
– |
exit(code); |
| 608 |
– |
} |
| 609 |
– |
|
| 610 |
– |
|
| 611 |
– |
void |
| 612 |
– |
printhead( /* print command header */ |
| 613 |
– |
register int ac, |
| 614 |
– |
register char **av |
| 615 |
– |
) |
| 616 |
– |
{ |
| 617 |
– |
putchar('#'); |
| 618 |
– |
while (ac--) { |
| 619 |
– |
putchar(' '); |
| 620 |
– |
fputs(*av++, stdout); |
| 621 |
– |
} |
| 622 |
– |
putchar('\n'); |
| 588 |
|
} |
| 589 |
|
|
| 590 |
|
|
