Золотое сечение — Prolog?

Всем доброго времени суток. Нужно написать программу на Prolog, которая находит пять точек на руке человека. В качестве исходных данных даны длина первой фаланги и длина второй фаланги. Набросала кое-что, естественно, с ошибками. Подскажите, как быть?

main:-
predicates:
f(byte,word).
clauses:
f(1,10).
f(2,14).
f(N,F):-N1=N-1,f(N1,F1),N2=N1-1,f(N2,F2),F=F1+F2.
goal:
f(5,point).