Prolog - 检查用户输入

Question

大家好，

我想知道是否有一种简单的方法来检查用户在 SWI-Prolog 中输入的内容。我所做的如下：

:- read(Term),
   Term = 'A' -> doSomeStuff, !;
   (Term = 'B' -> doOtherStuff, !;
   (Term = 'C' -> doSomething)).

我的目标是当用户输入字符 A 时执行某个操作，当输入是 B 时执行另一个操作，依此类推......但我的代码似乎不起作用。有人能告诉我我做错了什么吗？

Answer 1

您的子句中应该有一个标题，例如

do :- read(Term),
    (Term = 'A' -> doA, !;
    (Term = 'B' -> doB, !;
    (Term = 'C' -> doC))).

doA :- writeln('DoA').
doB :- writeln('DoB').
doC :- writeln('DoC').

，Then，调用 ?- do.，然后输入 'A'。 <输入>。

使用简单常量会更容易：

do2 :- read(Term),
    (Term = a -> doA, !;
    (Term = b -> doB, !;
    (Term = c -> doC))).

然后，调用 ?- do2.，并输入 a。 <输入>。

Answer 2

如果您在提示符处输入 'A'.，它就会起作用。