Фильтрация аппликативного списка

Цель работы: Научиться создавать функцию предикат для проверки условия фильтрации данных, рекурсивно обрабатывать структуры списка.

Задание

1. Реализовать функцию предикат проверки элемента списка и части списка согласно заданного по варианту предиката ошибки из таблицы 3.1 (который задает правило, что считать ошибочной структурой в радиограмме (мусором), а что – полезными данными). В качестве исходного списка брать индивидуальную радиограмму по варианту (см. табл. 3.2).

2. Реализовать фильтрацию данных (радиограммы) рекурсивным способом, используя функции из пункта 1.

Вариант 15

Предикат ошибки: если-число больше 1326.

Радиограмма № 3: ((((1128) (1106) (1011) (994) (387) (363) (337) (319)) ((1216) (995) (1011)

1343 (935) (147) (89) (82) (89)) ((852) (808) (702) (744) (695) (673) (560) (61 1359 3)))

(((633) (729) (527) (681)) ((1326) (1245) (1202) (1117) (136) (83) (76 1373 ) (83)) ((33) (18)

(18) (18)) ((709) (552) (566) (524) (429) (428) (274) (4 1351 28)) ((840) (833) (718) (761)

(444) (501) (472) (413)) ((607) (657) (541) ( 1408 589) (650) (824) (708) (696))) (((1112)

(952) (943) (880) (1048) (1017) (83 1354 3) (961) (66) (36) (36) (36)) ((574) (529) (497) (469)

(557) (574) (531) (4 1374 98) (983) (797) (783) (761) (974) (973) (944) (857) (255) (192) (150)

(192) 1341 )).