// Create a new slime creature at 'target' and split 'thing''s HP and

// Create a new slime creature at 'target', and split 'thing''s hp and

// Actually merge two slime creature pooling their HP etc.
// intial_slime is the one that get's killed off by this process.

// Actually merge two slime creature, pooling their hp, etc.
// initial_slime is the one that gets killed off by this process.

// Slime creatures can split but not merge under these conditions

// Slime creatures can split but not merge under these conditions.

// Slime things cannot split or merge if they have any of these
// conditions.

// Slime creatures cannot split or merge under these conditions.

// See if there are any appropriate adjacent slime creatures for
// 'thing' to merge with, if so carry out the merge.

// See if there are any appropriate adjacent slime creatures for 'thing'
// to merge with.  If so, carry out the merge.

    if(!thing || _disabled_slime(thing) || _unoccupied_slime(thing))
        return false;

    if (!thing || _disabled_slime(thing) || _unoccupied_slime(thing))
        return (false);

    for(int i=0;i<8;i++)

    for (int i = 0; i < 8; ++i)

        coord_def target=origin + Compass[compass_idx[i]];
        monsters * other_thing = monster_at(target);

        coord_def target = origin + Compass[compass_idx[i]];
        monsters *other_thing = monster_at(target);

        // We found an adjacent monster, is it another slime creature

        // We found an adjacent monster.  Is it another slime creature

        if(other_thing
           && other_thing->mons_species() == MONS_SLIME_CREATURE
           && other_thing->attitude == thing->attitude
           && other_thing->is_summoned() == thing->is_summoned()
           && !mons_is_shapeshifter(other_thing)
           && !_disabled_slime(other_thing))

        if (other_thing
            && other_thing->mons_species() == MONS_SLIME_CREATURE
            && other_thing->attitude == thing->attitude
            && other_thing->is_summoned() == thing->is_summoned()
            && !mons_is_shapeshifter(other_thing)
            && !_disabled_slime(other_thing))

            // merge cap and the 'movement' would bring us closer to
            // our target.

            // merge cap and the 'movement' would bring us closer to our
            // target.

            if(new_blob_count <= max_slime_merge
               && grid_distance(thing->target, thing->pos()) >
                  grid_distance(thing->target, target))

            if (new_blob_count <= max_slime_merge
                && grid_distance(thing->target, thing->pos()) >
                   grid_distance(thing->target, target))

                return _do_merge(thing, other_thing);

                return (_do_merge(thing, other_thing));

    return false;

    return (false);

    if(!thing
       || !_unoccupied_slime(thing)
       || _disabled_slime(thing)
       || thing->number <= 1)
        return false;

    if (!thing
        || !_unoccupied_slime(thing)
        || _disabled_slime(thing)
        || thing->number <= 1)
    {
        return (false);
    }

    std::random_shuffle(compass_idx, compass_idx+8);

    std::random_shuffle(compass_idx, compass_idx + 8);

   for (int i = 0; i < 8; i++)
   {
       coord_def target=origin + Compass[compass_idx[i]];

    for (int i = 0; i < 8; ++i)
    {
        coord_def target = origin + Compass[compass_idx[i]];

       if(mons_class_can_pass(MONS_SLIME_CREATURE,
                              env.grid(target))
          && !actor_at(target))
       {
           // This can fail if placing a new monster fails. That
           // probably means we have too many monsters on the level
           // so just return in that case.
           return _do_split(thing, target);
       }
   }

        if (mons_class_can_pass(MONS_SLIME_CREATURE, env.grid(target))
            && !actor_at(target))
        {
            // This can fail if placing a new monster fails.  That
            // probably means we have too many monsters on the level,
            // so just return in that case.
            return (_do_split(thing, target));
        }
    }

   // No free squares
   return false;

   // No free squares.
   return (false);

bool slime_split_merge(monsters * thing)

bool slime_split_merge(monsters *thing)

    // No merging/splitting shapeshifters
    if(!thing
       || mons_is_shapeshifter(thing)
       || thing->mons_species() != MONS_SLIME_CREATURE)
        return false;

    // No merging/splitting shapeshifters.
    if (!thing
        || mons_is_shapeshifter(thing)
        || thing->mons_species() != MONS_SLIME_CREATURE)
    {
        return (false);
    }

        return true;

        return (true);

    return _slime_merge(thing);

    return (_slime_merge(thing));