| 8 |
|
* 6/4/86 |
| 9 |
|
*/ |
| 10 |
|
|
| 11 |
< |
#define MAXDIM 8 /* maximum dimensions for data array */ |
| 11 |
> |
#define MAXDDIM 8 /* maximum dimensions for data array */ |
| 12 |
|
|
| 13 |
|
#define DATATYPE float /* single precision to save space */ |
| 14 |
+ |
#define DATATY 'f' /* format for DATATYPE */ |
| 15 |
|
|
| 15 |
– |
#define DSCANF "%f" /* scan format for DATATYPE */ |
| 16 |
– |
|
| 16 |
|
typedef struct datarray { |
| 17 |
|
char *name; /* name of our data */ |
| 18 |
|
int nd; /* number of dimensions */ |
| 19 |
|
struct { |
| 20 |
|
double org, siz; /* coordinate domain */ |
| 21 |
|
int ne; /* number of elements */ |
| 22 |
< |
} dim[MAXDIM]; /* dimension specifications */ |
| 22 |
> |
double *p; /* point locations */ |
| 23 |
> |
} dim[MAXDDIM]; /* dimension specifications */ |
| 24 |
|
DATATYPE *arr; /* the data */ |
| 25 |
|
struct datarray *next; /* next array in list */ |
| 26 |
|
} DATARRAY; /* a data array */ |
