Untitled

//get first word of the thing
function first_word with phrase do
  set first__word to ""
  set space_counter to 0
  
  for each letter in phrase do
    if letter == " " do
      change space_counter to space_counter+1
      return first__word
    end
    change first__word to join(first__word,letter)
  end
  if space_counter == 0 do
    return phrase
  end
end

//get the rest of the phrase after first word.
function ommit_first_word with phrase do
  set ommited_phrase to ""
  set space_counter to 0

     for each letter in phrase do
      if space_counter >0  do
        change ommited_phrase to join(ommited_phrase, letter)
      end
      if letter == " " do
        change space_counter to space_counter+1
      end
    end
  return ommited_phrase
end

//return new list with the keyword phrases matching
function keyword_list with list,keyword do
  set kw_list to []
  set word to ""
  
  for each phrase in list do
      change word to ""
    for each letter in phrase do
      if letter == " " do
        if word == keyword do
          change kw_list to push(kw_list,phrase)
        end
        change word to ""
      else if word == keyword do
          change kw_list to push(kw_list,phrase)
      end
      change word to join(word,letter)
    end
  end
  return kw_list
end

// TODO: Define the matching_socks function
function matching_socks with dirty_basket,clean_basket do
set matching_socks to []
set dirty_clean_basket to concat(dirty_basket,clean_basket)
set left_items_list to keyword_list(dirty_clean_basket,"left")
set right_items_list to keyword_list(dirty_clean_basket,"right")
set left_list_position_index to 0
set right_list_position_index to 0

  for each left_item in left_items_list do
      change left_list_position_index to left_list_position_index+1
      for each right_item in right_items_list do
          change right_list_position_index to right_list_position_index+1
          if ommit_first_word(left_item) == ommit_first_word(right_item) and ommit_first_word(ommit_first_word(left_item)) == "sock" do
            change matching_socks to push(matching_socks, ommit_first_word(join(left_item, "s")))
            log ommit_first_word(left_item) == ommit_first_word(right_item)
            log left_items_list
            log ommit_first_word(left_item)
            log right_items_list
            log ommit_first_word(right_item) 
            change left_items_list[left_list_position_index] to "" //pair taken
            change right_items_list[right_list_position_index] to "" //pair taken
            log left_items_list
            log right_items_list
          end
      end
    change right_list_position_index to 0
  end
  return matching_socks
end