dirlet
Tmp_at(-1, dirlet(dx, dy)); /* open call */
Tmp_at(-2, dirlet(dx, dy));
static char dirlet(int, int);