output([1], '\n'). output([2], '\n'). output([3,Points,Name,1], '\n') <- homework(Name, Points). output([4], '
Points Student
') <- homework(Name, Points). output([3,Points,Name,2], Points) <- homework(Name, Points). output([3,Points,Name,3], '') <- homework(Name, Points). output([3,Points,Name,4], Name) <- homework(Name, Points). output([3,Points,Name,5], '
\n'). homework('Ann', 5). homework('Bob', 10). homework('Chris', 10).