Адаптировать для visual prolog 7.5

Формулировка задачи:

Здравствуйте! Под конец магистратуры меня решили обременить прологом. Вроде нашел кучу полезных программ, но выяснилось, что не все так просто. Одни прогр -это турбо пролог, другие вижуал, но 5.2. Тщетно пытался понять, как и что можно перевести, но увы. Я туповат в этом. По идее мне всего-то нужно подогнать три небольшие программы для лабораторных. Главное, чтобы было похоже на работу с онтологией. Может быть Вы мне поможете в этом. дано

                    Листинг программы
                
 
                        
                          
                    
predicates
likes(symbol,symbol)
clauses
likes(ellen,tennis). 
likes(john,football). 
likes(tom,baseball). 
likes(eric,swimming). 
likes(mark,tennis) . 
likes(bill,Activity):-likes (tom, Activity) .
goal
likes(bill, baseball).

Как не пытаюсь, выдает ошибки типа clauses likes/2 are not together

Решение задачи: «Адаптировать для visual prolog 7.5»

textual
                            Листинг программы 
                        
 
                        
                          
                    
class predicates
  count: (unsigned32) procedure(i).
 
clauses
  count(N) :-
    console::write('\r',N),
    NewN = N+1,
    count(NewN).
  run() :-
    console::nl,
    count(0).