Правосудие по-болвански

В стране Болвании Пиноккио взывал к справедливости. Судья слушал его с глубоким доброжелательством и величайшим участием, выглядел очень взволнованным и растроганным, и, когда Деревянный Человечек высказал, как его обманули, назвал прозвища грабителей и их особые приметы, судья протянул руку и позвонил в настольный колокольчик.

На звон моментально явились две собаки в полицейской форме.

Судья показал пальцем на Пиноккио и сказал им:

– У бедняги украли четыре золотые монеты. Стало быть, вяжите его и немедленно посадите в тюрьму.

Помогите восстановить справедливость. Нужно написать функцию, фильтрующую (оставляющую в списке) элементы переданного двумерного списка по указанным ключам.

В функцию justice(data, *args, **kwargs) передаются значения аргументов:

двумерный список;
произвольное число кортежей, в которых указаны: ключ фильтрации и индекс вложенного списка, к которому эту фильтрацию нужно применить;
произвольное число именованных аргументов, в которых записаны функции для фильтрации.
Если в кортежах встречаются функции, не определенные среди именованных параметров, то с данным элементом никаких действий производить не надо.

Функция возвращает двумерный список с отфильтрованными элементами.

Пример 1
Ввод Вывод
print(*justice(
[
['The', 'Judge', 'listened', 'to', 'Pinocchio', 'with', 'deep', 'benevolence', 'and', 'the', 'greatest', 'concern'],
['and', '23', 'looked', 'very', 'much', '345', 'moved', 'and', '15', 'moved'],
['and', 'when', 'the', 'Puppet', 'had', 'said', 'all'],
['the', 'judge', 'reached', 'out', 'his', 'hand', 'and', 'rang', 'the', 'table', 'bell.']
],
('even_len', 3),
('digits', 1),
('first_up', 0),
('abracodabra', 2),
first_up=lambda x: x[0].isupper(),
even_len=lambda x: len(x) % 2 == 0,
digits=lambda x: x.isdigit()
), sep='\n')
['The', 'Judge', 'Pinocchio']
['23', '345', '15']
['and', 'when', 'the', 'Puppet', 'had', 'said', 'all']
['hand', 'rang']
Пример 2
Ввод Вывод
print(*justice(
[
[2, 6, -13, 48],
[1, 1, 2, 3, 5, 8, 13, 21],
[-12, 5, -3, -2, 7, -7, -3, 8, 15, -17]
],
('negative', 2),
('odd_digits', 1),
('first_up', 0),
('large', 2),
large=lambda x: abs(x) > 3,
negative=lambda x: x < 0,
odd_digits=lambda x: x % 2
), sep='\n')
[2, 6, -13, 48]
[1, 1, 3, 5, 13, 21]
[-12, -7, -17]

0