monster->del_ench(ENCH_SUBMERGED);

            if (!monster->del_ench(ENCH_SUBMERGED))
                // Couldn't unsubmerge.
                return;

            && !monster_can_submerge(mons, grd(pos))
            && pos != you.pos())

            && !monster_can_submerge(mons, grd(pos)))

            {
                // If the monster can't stay submerged in the new terrain
                // and there aren't any adjacent squares where it can
                // stay submerged then move it.
                if (mgrd(you.pos()) != NON_MONSTER
                    && !mons_is_submerged( &menv[ mgrd(you.pos()) ] ))
                {
                    monster_teleport( &menv[ mgrd(you.pos()) ], true, false);
                }

            }

                mon->del_ench(ENCH_SUBMERGED);

                if(!mon->del_ench(ENCH_SUBMERGED))
                    // Couldn't unsubmerge.
                    mon->behaviour = BEH_LURK;

                    // Don't unsubmerge if the player is right on top,
                    // if the monster is too damaged or if the monster
                    // is afraid.
                    if (monster->pos() == you.pos()
                        || monster->hit_points <= monster->max_hit_points / 2

                    // Don't unsubmerge if the monster is too damaged or
                    // if the monster is afraid.
                    if (monster->hit_points <= monster->max_hit_points / 2

                    monster->del_ench(ENCH_SUBMERGED);

                    if (!monster->del_ench(ENCH_SUBMERGED))
                    {
                        // Couldn't unsubmerge.
                        monster->speed_increment -= non_move_energy;
                        continue;
                    }

        return (true);

        return (trap_type_at_xy(mons->x, mons->y) == NUM_TRAPS);

static bool _prepare_del_ench(monsters* mons, const mon_enchant &me)
{
    if (me.ench != ENCH_SUBMERGED)
        return true;
    if (mons->pos() != you.pos())
        return true;
    // Monster un-submerging while under player.  Try to move to an
    // adjacent square in which the monster could have been submerged
    // and have it unusbmerge from there.
    coord_def pos, target_square;
    int       okay_squares = 0;
    for (pos.x = you.x_pos - 1; pos.x <= you.x_pos + 1; pos.x++)
        for (pos.y = you.y_pos - 1; pos.y <= you.y_pos + 1; pos.y++)
        {
            if (pos == you.pos())
                continue;
            if (in_bounds(pos) && mgrd(pos) == NON_MONSTER
                && monster_can_submerge(mons, grd(pos)))
            {
                if (one_chance_in(++okay_squares))
                    target_square = pos;
            }
        }
    if (okay_squares > 0)
    {
        int mnum = mgrd(mons->pos());
        mgrd(mons->pos()) = NON_MONSTER;
        mgrd(target_square) = mnum;
        mons->x = target_square.x;
        mons->y = target_square.y;
        return true;
    }
    // No available adjacent squares from which the monster could also
    // have unsubmerged.  Can it just stay submerged where it is?
    if ( monster_can_submerge(mons, grd( mons->pos() )) )
        return false;

    // The terrain changed and the monster can't remain submerged.
    // Try to move to an adjacent square where it would be happy.
    for (pos.x = you.x_pos - 1; pos.x <= you.x_pos + 1; pos.x++)
        for (pos.y = you.y_pos - 1; pos.y <= you.y_pos + 1; pos.y++)
        {
            if (pos == you.pos())
                continue;
            if (in_bounds(pos) && mgrd(pos) == NON_MONSTER
                && monster_habitable_grid(mons, grd(pos))
                && trap_type_at_xy(pos.x, pos.y) == NUM_TRAPS)
            {
                if (one_chance_in(++okay_squares))
                    target_square = pos;
            }
        }
    if (okay_squares > 0)
    {
        int mnum = mgrd(mons->pos());
        mgrd(mons->pos()) = NON_MONSTER;
        mgrd(target_square) = mnum;
        mons->x = target_square.x;
        mons->y = target_square.y;
    }
    return ( true );
}

    if (!_prepare_del_ench(this, me))
        return false;

        if (behaviour == BEH_WANDER)
        {
            behaviour = BEH_SEEK;
            behaviour_event(this, ME_EVAL);
        }
        if (you.pos() == this->pos())
            mprf(MSGCH_ERROR, "%s is on the same square as you!",
                 name(DESC_CAP_A).c_str());

        if (behaviour == BEH_WANDER)
        {
            behaviour = BEH_SEEK;
            behaviour_event(this, ME_EVAL);
        }