以下是一个示例解决方案，其中包含一个用于比较事实中的值的Prolog谓词的代码示例：

% 定义一个事实
fact(temperature, 25).

% 比较事实中的值的谓词
compare_facts(Fact, Value, Operator) :-
    fact(Fact, FactValue),  % 获取事实的值
    compare(Operator, FactValue, Value).  % 使用compare谓词进行比较

% 示例查询
?- compare_facts(temperature, 20, >).

在上面的示例中，我们定义了一个名为“fact”的事实，表示某个事实的名称和相应的值。然后，我们定义了一个名为“compare_facts”的谓词，该谓词接受三个参数：事实的名称，要比较的值，以及比较运算符。

在谓词中，我们首先使用fact/2查询事实的值。然后，我们使用compare/3谓词将事实的值和要比较的值进行比较，使用传递给谓词的比较运算符。

最后，我们可以通过查询compare_facts(temperature, 20, >)来测试这个谓词。这将返回true，因为事实“temperature”的值为25，大于20。

请注意，这只是一个示例解决方案，具体的实现可能会根据实际需求进行调整。