Prolog 语法错误:应为运算符

Prolog 语法错误:应为运算符,prolog,Prolog,我的Prolog程序有问题。它似乎有错误,但我不知道它是什么。有人能告诉我如何解决它吗??? 错误从“症状”行开始 这是我的代码: go:- write('insert patient name'),nl, read(Patient),nl,Patient=Patient, hypothesis(Patient,Disease), write(Patient),('probably has'),write(Disease),nl. go:- write('sorry

我的Prolog程序有问题。它似乎有错误,但我不知道它是什么。有人能告诉我如何解决它吗??? 错误从“症状”行开始 这是我的代码:

go:-
   write('insert patient name'),nl,
   read(Patient),nl,Patient=Patient,
   hypothesis(Patient,Disease),
   write(Patient),('probably has'),write(Disease),nl.
go:-
   write('sorry,the disease'),nl,write('cannot be diagnosed'),nl.

symptom(Patient,abdominal pain):-
   write('does'),write(Patient),
   write('have abdominal pain y/n'),read(Reply),
   Reply=y,nl.
symptom(Patient,fever):-
   write('does'),write(Patient),write('have a fever (y/)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,blood or mucus in stool):-
   write('does'),write(Patient)write('have blood or mucus in stool(y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,nausea and vomiting):-
   write('does'),write(Patient)write('have nausea and vomiting (y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,diarrhea):-
   write('does'),write(Patient)write('have diarrhea (y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,leg cramp):-
   write('does'),write(Patient)write('leg cramp(y/n)?'),
   read(Reply),
   Reply=y,nl.    
symptom(Patient,abdominal cramp):-
   write('does'),write(Patient)write('have abdominal cramp(y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,cold skin):-
   write('does'),write(Patient)write('have cold skin (y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,weak pulse):-
   write('does'),write(Patient)write('have weak pulse(y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,voice change):-
   write('does'),write(Patient)write('have voice change(y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,sea sickness):-
   write('does'),write(Patient)write('have sea-sickness(y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,upset stomach):-
   write('does'),write(Patient)write('have upset stomach(y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,feeling green around the gill):-
   write('does'),write(Patient)write('have feeling green around the gill(y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,weakness):-
   write('does'),write(Patient)write('have weakness(y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,flu like symptom):-
   write('does'),write(Patient)write('have flu-like symptom(y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,fatigue):-
   write('does'),write(Patient)write('have fatigue(y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,intestinal pain):-
   write('does'),write(Patient)write('have intestinal pain(y/n)?'),
   read(Reply),
   Reply=y,nl.
symptom(Patient,straining at stool):-
   write('does'),write(Patient)write('have straining at stool(y/n)?'),
   read(Reply),
   Reply=y,nl.

hypothesis(Patient,chorela):-
   symptom(Patient,diarrhea),
   symptom(Patient,vomiting),
   symptom(Patient,leg cramp),
   symptom(Patient,cold skin),
   symptom(Patient,weak pulse),
   symptom(Patient,voice change).
hypothesis(Patient,gastroenteritis):-
   symptom(Patient,vomiting),
   symptom(Patient,nausea),
   symptom(Patient,diarrhea),
   symptom(Patient,sea sickness),
   symptom(Patient,upset stomach),
   symptom(Patient,feeling green around the gill),
   symptom(Patient,abdominal pain),
   symptom(Patient,weakness),
   symptom(Patient,flu like symptom),
   symptom(Patient,fatigue),
   symptom(Patient,blood or mucus in stool).
hypotesis(Patient,shigellosis):-
   symptom(Patient,diarrihea),
   symptom(Patient,fever),
   symptom(Patient,nausea),
   symptom(Patient,vominting),
   symptom(Patient,abdominal pain),
   symptom(Patient,intestinal pain),
   symptom(Patient,straining at stool),
   symptom(Patient,blood or mucus in stool).

定义症状/2的第一行在explict第二个参数中有一个空格。也许您的意思是存在一个原子“腹痛”,但正如所写的,解析器将看到两个原子,腹痛和腹痛,并且不知道您的意思


添加:相同的“嵌入空白”错误出现在症状/2的大多数子句的标题中,以及调用症状的假设/2的子句正文中。还请注意,在您的最后一个子句中,该谓词的“假设”拼写错误。

您是否可以与我们分享编译器报告的错误行和列?我不太喜欢猜。