| 1 |
greg |
1.1 |
/* RCSid: $Id$ */ |
| 2 |
|
|
#include "meta.h" |
| 3 |
|
|
|
| 4 |
|
|
#include <math.h> |
| 5 |
|
|
|
| 6 |
|
|
|
| 7 |
|
|
#define MINDIVS 4 /* Minimum number of divisions for axis */ |
| 8 |
|
|
|
| 9 |
|
|
#define FTINY 1e-10 /* tiny float */ |
| 10 |
|
|
|
| 11 |
|
|
#define FHUGE 1e10 /* large float */ |
| 12 |
|
|
|
| 13 |
|
|
#define PI 3.14159265358979323846 |
| 14 |
|
|
|
| 15 |
|
|
#define XBEG 2048 /* starting x coordinate */ |
| 16 |
|
|
|
| 17 |
|
|
#define XSIZ 10240 /* x axis coordinate size */ |
| 18 |
|
|
|
| 19 |
|
|
#define YBEG 2048 /* starting y coordinate */ |
| 20 |
|
|
|
| 21 |
|
|
#define YSIZ 10240 /* y axis coordinate size */ |
| 22 |
|
|
|
| 23 |
|
|
#define XCONV(x) ((int)((x-xmin)*XSIZ/xsize+XBEG)) |
| 24 |
|
|
|
| 25 |
|
|
#define YCONV(y) ((int)((y-ymin)*YSIZ/ysize+YBEG)) |
| 26 |
|
|
|
| 27 |
|
|
#define TSIZ 200 /* tick size */ |
| 28 |
|
|
|
| 29 |
|
|
#define SYMRAD 100 /* default symbol radius */ |
| 30 |
|
|
|
| 31 |
|
|
#define XTICS 1 /* flags for making axes */ |
| 32 |
|
|
#define YTICS 2 |
| 33 |
|
|
#define XNUMS 4 |
| 34 |
|
|
#define YNUMS 8 |
| 35 |
|
|
#define XGRID 16 |
| 36 |
|
|
#define YGRID 32 |
| 37 |
|
|
#define ORIGIN 64 |
| 38 |
|
|
#define BOX 128 |
| 39 |
|
|
|
| 40 |
|
|
#define RADIANS 1 /* flags for polar coordinates */ |
| 41 |
|
|
#define DEGREES 2 |
| 42 |
|
|
|
| 43 |
|
|
#define NCUR 16 /* number of supported curve types */ |
| 44 |
|
|
|
| 45 |
|
|
|
| 46 |
|
|
|
| 47 |
|
|
extern short usecurve[]; /* booleans for curve usage */ |
| 48 |
|
|
|
| 49 |
|
|
extern int symrad; /* current symbol radius */ |
| 50 |
|
|
|
| 51 |
|
|
extern double xmin, xmax, /* extrema */ |
| 52 |
|
|
ymin, ymax; |
| 53 |
|
|
|
| 54 |
|
|
extern double xsize, ysize; /* coordinate dimensions */ |
| 55 |
|
|
|
| 56 |
|
|
extern double xmnset, xmxset, /* domain settings */ |
| 57 |
|
|
ymnset, ymxset; |
| 58 |
|
|
|
| 59 |
|
|
extern short logx, logy; /* flags for logarithmic axes */ |
| 60 |
|
|
|
| 61 |
|
|
extern short grid; /* flag for grid */ |
| 62 |
|
|
|
| 63 |
|
|
extern short polar; /* flag for polar coordiates */ |
| 64 |
|
|
|
| 65 |
|
|
extern int ncurves; /* number of curves in file */ |
| 66 |
|
|
|
| 67 |
|
|
extern char *snagquo(), *instr(); |
| 68 |
|
|
|
| 69 |
|
|
extern double atof(), floor(), ceil(), log(); |