typedef UINT * COORD;
typedef struct tbl {
   UINT dimension;
   UINT extent;
   union st {
       UINT i;
       struct tbl * t;
       } * subtable;
   } * TABLE;
extern TABLE tab_new();
extern TABLE tab_put();
extern UINT   tab_get();
extern COORD tab_vect();