Функция редактирования базы данных - Prolog

Формулировка задачи:

Добрый день. Имеется программа, которая работает с базой данных(просмотр всех записей, редактирование и добавление новой записи). Сделал все, кроме редактирования записи. Помогите пожалуйста, в prolog новичек.

domains
    s=string
    i=integer
predicates
    menu
    m(char)
database
    ball(s,i)
clauses
menu:-
    clearwindow,
    write("1 - Izmenit ocenky "),nl,
    write("2 - Dobavit zapis "),nl,
    write("3 - prosmotr bazi "),nl,
    write("0 - Vikhod "),nl,
    readchar(C),
    m(C).
m('1'):-
    
m('2'):-
    clearwindow,
    write("Vvedite familiy"),nl,
    readln(N),
    write("Vvedite ocenky"),nl,
    readint(B),
    assert(ball(N,B)),
    readchar(_),
    menu.
m('3'):-
    clearwindow,
    consult("student.ddb"),
    ball(N, B),
    write("Ocenka: ",N,B),nl,fail,
    readchar(_),
    menu.
            
m('0'):-
    save("student.ddb").
m(_):-
    menu.

Решение задачи: «Функция редактирования базы данных»

Листинг программы

    clearwindow,
    write("Vvedite familiy"),nl,
    readln(N),
    retract(ball(N, B)),
    write("Ocenka: ",N,B),nl,
    write("Vvedite ocenky"),nl,
    readint(B),
    assert(ball(N,B)),
    readchar(_),
    menu.

Объяснение кода листинга программы

Очистка окна (clearwindow).
Вывод сообщения Введите фамилию.
Чтение фамилии (readln(N)).
Удаление утверждения о балле (retract(ball(N, B))).
Вывод сообщения Оценка: N B.
Ввод оценки (readint(B)).
Создание нового утверждения о балле (assert(ball(N,B))).
Чтение символа (readchar(_)).
Переход в главное меню (menu).