如何与prolog中的给定事实相匹配的谓词转换数字与单词

Question

我想进行此示例：gradeinwords（Stud04，“数据库”，翻译）。 = [五，九]尝试了此代码以打印学生成绩 用文字的特定课程，我无法在事实和代码之间链接，因为我是prolog的新手，我无法弄清楚如何做到这一点或添加到代码，以便它运行良好 事实是学生（Stud04，“数据库”，59）。

代码 ：

totext(0, zero).
totext(1, one).
totext(2, two).
totext(3, three).
totext(4, four).
totext(5, five).
totext(6, six).
totext(7, seven).
totext(8, eight).
totext(9, nine).

gradeInWords(Student, Course, translate) :-
   translate([], []).

translate([Head|Tail], [TranslatedHead|TranslatedTail]) :-
   totext(Head, TranslatedHead),
   translate(Tail, TranslatedTail).