How to Use Naive Bayes on SWI-Prolog

Help me, because little bit confused