迭代prolog中的所有数据库

Question

我是prolog的新手。我正在尝试从学生数据库中找到topper我需要帮助迭代所有数据集才能找到一个topper 我的代码是

    student(name(kiran,kumar,b14122),[30,40,60]).
    student(name(nimit,kalal,b14115),[10,30,40]).
    student(name(ramesh,babu,b14222),[40,20,30]).

     %student(name(fname(),lname(),roll_no(),markslist(p(),c(),m())
     sum([],0).
     sum([X|List],Sum) :-
         sum(List,Sum1),plus(Sum1,X,Sum).
     total(Roll_no,T) :- 
         student(name(Fname,Lname,Roll_no),Markslist),sum(Markslist,T).
     topper(Fname,Lname,Totalmarks,Markslist) :-

感谢您的每一次帮助