Function surface

src/dungeon.c:1749–1788

}

const char *
surface(coordxy x, coordxy y)
{
    struct rm *lev = &levl[x][y];
    int levtyp = SURFACE_AT(x, y);

    if (u_at(x, y) && u.uswallow && is_animal(u.ustuck->data))
        /* 'husk' is iffy but maw is wrong for 't' class */
        return digests(u.ustuck->data) ? "maw"
               : enfolds(u.ustuck->data) ? "husk"
                 : "nonesuch"; /* can't happen (fingers crossed...) */
    else if (IS_AIR(levtyp))
        return Is_waterlevel(&u.uz) ? "air bubble"
                                    : (levtyp == CLOUD) ? "cloud" : "air";
    else if (is_pool(x, y))
        return (Underwater && !Is_waterlevel(&u.uz))
            ? "bottom" : hliquid("water");
    else if (is_ice(x, y))
        return "ice";
    else if (is_lava(x, y))
        return hliquid("lava");
    else if (lev->typ == DRAWBRIDGE_DOWN)
        return "bridge";
    else if (IS_ALTAR(levtyp))
        return "altar";
    else if (IS_GRAVE(levtyp))
        return "headstone";
    else if (IS_FOUNTAIN(levtyp))
        return "fountain";
    else if (On_stairs(x, y))
        return "stairs";
    else if (IS_WALL(levtyp) || levtyp == SDOOR)
        return "wall"; /* 'surface' during Passes_walls */
    else if (IS_DOOR(levtyp))
        return "doorway"; /* even for closed door */
    else if (IS_ROOM(levtyp) && !Is_earthlevel(&u.uz))
        return "floor";
    else
        return "ground";
}

/*
 * It is expected that the second argument of get_level is a depth value,