Я новичок в Прологе и по-королевски растерялся! Я продолжаю получать предупреждение "singleton переменная для [WMAPDY]". Я где-то читал, что иногда это предупреждение бесполезно. Я также читал, что программа не будет компилировать все пункты из-за предупреждения?

Программа, которую я пытаюсь сделать, - это крипто-арифметическая головоломка, которая должна «решить» AM + PM = DAY.

Если кто-то может помочь с этой ошибкой, а также важно, чтобы предупреждение о единственной переменной всегда было важно, я был бы очень признателен!

Скотт

solve([A,M,P,D,Y]):- 
select(A,[0,1,2,3,4,5,6,7,8,9],WA), % W means Without
not(A=0),
select(M,WA,WMA),
select(P,WMA,WMAP),
not(P=0),
select(D,WMAP,WMAPD),
not(D=0),
select(Y,WMAPD,WMAPDY),
DAY is 100*D+10*A+Y,
AM  is 10*A+M,
PM  is 10*P+M,
DAY is AM+PM.