|
|
researchv10 Norman
#define SCX(A) (A - e1->xmin)*e1->scalex + e1->left;
#define SCY(A) (A - e1->ymin)*e1->scaley + e1->bottom;
#define unorm(y) (double)y
extern struct penvir {
double left, bottom;
double xmin, ymin;
double scalex, scaley;
double sidex, sidey;
double copyx, copyy;
double quantum;
double grade;
int pgap;
double pslant;
char ppink, pbrush;
} *e0, *e1, *e2, *esave;
extern int ohiy, ohix, oloy, oextra;
extern int internal;
char bcolor();
#define ESC 033
#define ERASE 014
#define PLOTOUT 037
#define PLOTIN 035
#define RADIAN 57.3
struct seg{
int x, y, X, Y;
char stat;
};
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.