%%   知識情報処理実習 r8の練習問題 解答例

% 1.
attendants([],[]).
attendants([(Name,Age)|L],[Name|S]) :- attendants(L,S).

test8_1 :- attendants([(ann,80),(bob,40),(jim,20),(liz,16),(tom,65)],NL) は