rooms = ['Library' 'Kitchen']
suspects = ['White' 'Green']
weapons = ['Rope' 'Lead_Pipe']
cards = [rooms suspects weapons]

take_turn = function current_room opponent_card 
	remove_card opponent_card
	make_guess current_room

remove_card = function opponent_card 
	for card_list in cards 
		removed = remove card from card_list 
			card == opponent_card

	if type removed == 'empty' 
		output 'Card not found.'

make_guess = function current_room
	if length suspects == 1	&& length rooms == 1 && length weapons == 1
		(output 'It was '
			+ suspects:0
			+ ' in the '
			+ rooms:0 
			+ ' with the '
			+ weapons:0
			+ '!')
	else
		(output 'I accuse '
			+ (random suspects)
			+ ' in the '
			+ current_room
			+ ' with the '
			+ (random weapons)
			+ '!')

(make_guess 'Library')