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