Пролог, как Показать несколько выходов в записи ()

go :-   match(Mn,Fn),
        write('--Matching Result--'),
        nl,
        write(Mn),
        write(' match with '),
        write(Fn),
        match(Mn1,Fn1).


person(may,female,25,blue).
person(rose,female,20,blue).
person(hock,male,30,blue).
person(ali,male,24,blue).
match(Mn,Fn):-person(Fn,'female',Fage,Fatt),
person(Mn,'male',Mage,Matt),
Mage>=Fage,
Fatt=Matt.

Привет, это мой код ... Но только может показать 1 вывод ... но есть 3 пара сопоставления в матче (x, y). Как показать им все в моем иди функции.

Спасибо

5
задан Marnix 8 September 2011 в 14:12
поделиться