База фактов на Visual Prolog

В файле хранится база фактов о людях в виде предиката: person(<фамилия>,<имя>,<пол>,<дата рождения>). Сформировать и сохранить в другом файле список семей: семья (фамилия, имя_мужа, имя_жены, список_детей). Будем считать, что в список детей попадают люди возрастом менее 18 лет. Работа на Visual Prolog 5.2