- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我定义了具体化的变体 clpfd约束 (#<)/2
, (#=<)/2
, (#>=)/2
和 (#>)/2
:
:- use_module(library(clpfd)).
ltA(X,Y,Truth) :- X #< Y #<==> B, bool01_truth(B,Truth).
ltB(X,Y, true) :- X #< Y.
ltB(X,Y,false) :- X #>= Y.
lteA(X,Y,Truth) :- X #=< Y #<==> B, bool01_truth(B,Truth).
lteB(X,Y, true) :- X #=< Y.
lteB(X,Y,false) :- X #> Y.
gteA(X,Y,Truth) :- X #>= Y #<==> B, bool01_truth(B,Truth).
gteB(X,Y, true) :- X #>= Y.
gteB(X,Y,false) :- X #< Y.
gtA(X,Y,Truth) :- X #> Y #<==> B, bool01_truth(B,Truth).
gtB(X,Y, true) :- X #> Y.
gtB(X,Y,false) :- X #=< Y.
当然,ltA/3
和 ltB/3
是逻辑上等价的, lteA/3
和 lteB/3
, gteA/3
和 gteB/3
, 和 gtA/3
和 gtB/3
.
但是,我使用这些谓词得到的答案在大小和可读性方面有所不同。我使用 SWI-Prolog 7.1.37 运行了以下查询:
好消息,首先!
?- lteA(X,Y,Truth).
Truth = false, Y#=<X+ -1 ;
Truth = true, Y#>=X.
?- lteB(X,Y,Truth).
Truth = true, Y#>=X ;
Truth = false, Y#=<X+ -1.
?- gteA(X,Y,Truth).
Truth = false, X#=<Y+ -1 ;
Truth = true, X#>=Y.
?- gteB(X,Y,Truth).
Truth = true, X#>=Y ;
Truth = false, X#=<Y+ -1.
好的!但是另外两个呢?
?- ltA(X,Y,Truth).
Truth = false, X+1#=_G968, Y#=<_G968+ -1 ;
Truth = true, X+1#=_G912, Y#>=_G912.
?- ltB(X,Y,Truth).
Truth = true, X#=<Y+ -1 ;
Truth = false, X#>=Y.
?- gtA(X,Y,Truth).
Truth = false, X#=<_G1301+ -1, Y+1#=_G1301 ;
Truth = true, X#>=_G1243, Y+1#=_G1243.
?- gtB(X,Y,Truth).
Truth = true, Y#=<X+ -1 ;
Truth = false, Y#>=X.
不完全是!
如何使用 ltA/3
获得简洁的答案和 gtA/3
---就像lteA/3
一样和 gteA/3
?
最佳答案
这与CLP(FD)的基本思想相悖答案。由于 CLP(FD) 通常不进行高斯消元并且类似的事情。它不像计算机代数系统 (CAS)。
在 CLP(FD) 中,您基本上通过输入来对问题建模不等式,并且允许系统对此不做任何事情只要你不调用不等式labeling .
一些 CLP(FD) 实现已经检查了一些一致性输入不等式和/或已经进行简化时的度数和传播。但这不是强制性的。
在您的示例中,您有 E #= X,其中 E 是一个表达式,并且X 是一个变量。不能保证会发生在进入模型时,X 的一部分被 E 代替。
通常这不会在 CLP(FD) 中完成,因为它会吹up 输入的模型。你可以直接测试这个不简化:
Welcome to SWI-Prolog (Multi-threaded, 64 bits, Version 7.3.4)
Copyright (c) 1990-2015 University of Amsterdam, VU Amsterdam
?- use_module(library(clpfd)).
true.
?- A#=X+1, Y#=<A+ -1.
Y#=<A+ -1,
X+1#=A.
同样的事情也发生在 Jekejeke Prolog 中。中电( FD )的Jekejeke Prolog 是开源的 here .精化本身已计划但尚未实现:
Jekejeke Prolog, Runtime Library 1.0.7
(c) 1985-2015, XLOG Technologies GmbH, Switzerland
?- use_module(library(finite/clpfd)).
% 11 consults and 0 unloads in 513 ms.
Yes
?- A#=X+1, Y#=<A+ -1.
A #= 1+X,
-1+A #>= Y
典型的方程式 E #= X 只会在以下情况下导致替换E也是一个变量或常量。这也许可以解释为什么你的示例看起来因情况而异。
在这里你看到 SWI-Prolog 简化了 A #= X。我刚刚修改了上面的例子稍微让E是一个变量:
?- A#=X, Y#=<A+ -1.
A = X,
Y#=<X+ -1.
在这里你看到 Jekejeke Prolog 正在做它(Todo 错误修复:我我想我需要稍微重新排序规则,这样它给出 A = X 而不是这里的 X = A):
?- A#=X, Y#=<A+ -1.
X = A,
-1+A #>= Y
E #= X 的情况,其中 E 是常数,而 this值被传播称为前向检查。这是CLP(FD) 必须能够满足的最低要求,否则贴标签是行不通的。
但是已经是 E #= X 的情况,其中 E 是变量 a传播不是强制性的。但是上面的测试表明许多 CLP(FD) 都这样做。传播变量导致联合查找算法等。
再见
关于prolog - clpfd 中具体化的剩余约束,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/30069099/
给出以下代码示例: example(Ls) :- Ls = [X,Y], Ls ins 1..2, Cost #= max((X #= 1)*3 + (Y #= 1)*5,
是否可以对整数进行约束,使其不能是(完美)平方数? 我有: square(Square):- N#>0, Square #= N*N. 如何定义 notsquare(Notsquare):- ...
我定义了具体化的变体 clpfd约束 (#=)/2和 (#>)/2 : :- use_module(library(clpfd)). ltA(X,Y,Truth) :- X # B, bool01_
CLPFD 系统的主要目标不是有效地处理二次方程,但是,是否有更好的方法来制定如下问题? 似乎问题归结为如下等式。 SWI 与 library(clpfd)给: ?- 时间( ((L+7)^2#=L^
假设我想像这样表示整数:integer:Sign:[FirstDigit,SecondDigit,...] 。例如,42 将表示为 integer:positive:[4,2] . 我需要一个谓词来根
我尝试用 clpfd 解决“Escape from Zurg”问题。 https://web.engr.oregonstate.edu/~erwig/papers/Zurg_JFP04.pdf玩具从左
我写了一些谓词,它们采用列表的长度并附加了一些约束(这是要使用的正确词汇表吗?): clp_length([], 0). clp_length([_Head|Rest], Length) :- L
我想弄清楚 clpfd 中的边界传播是什么,但似乎无法在任何地方找到一个好的解释。 我正在修改 Prolog 和 clpfd 并遇到了这个问题,但查看讲义对我来说没有意义。谁能解释一下边界传播的实际含
我和一个 friend 正在编写一个应该解决 CLP 问题的程序。我们想使用最小化来优化解决方案,但它不起作用,因为它一直说我们从 sum(P,#=,S) 得到的数字介于两个数字之间(例如 5..7)
我可以用这种方式指定变量的域: MyVar in 1..10 或 MyVar in {1,10,15} 但我有一个变量,我想这样指定: Activity_1__room in {room_1, roo
我是约束编程的 prolog 新手。我有一个 CLPFD 没有像我期望的那样减少域的问题。这可能真的很简单。 [A,B] ins 1..5,A*B#=5. 我希望它将 A 和 B 的域减少到 1\/
我做了两个实现来解决 Shikaku 难题。一个使用顶部、左侧、宽度和高度 (TLWH) 作为每个矩形的参数,另一个使用顶部、左侧、底部、右侧 (TLBR)。 出于某种原因,使用 TLBR 的速度要快
我正在开发一个 (SWI-)Prolog 程序,该程序使用 CLP(FD) 约束来寻找特定问题的解决方案。为此,我碰巧需要两个列表的“未定位”重叠。那是: 列表 La长度为 A 列表 Lb长度为 B
例如,假设我有这个程序(仅在 swi-prolog 中测试过): :- use_module(library(clpfd)). :- use_module(library(lists)). % Sor
我最近在 Google Play 应用商店发现了一个小游戏,叫做 Cryptogram .有几十个类似的应用程序。这个想法是将数字与颜色相匹配,以使所有方程式听起来都正确。 我能够很快地通过手工解决问
我正在尝试写类似“如果你之前得到球,你就得到了球,并且从那以后没有给它”: :- use_module(library(clpfd)). time(T1, has_ball) :- time(
我想最大化两个变量之间的差异: :- use_module(library(clpfd)). maximize(X) :- X = [A,B], X ins 1..5, % I
好的,所以我有一个叫做 CuFrog 的谜题,它包括在每个位置填充一个数字的 3x3x3 立方体,但从一个位置跳到另一个位置时跳过一个位置。例如,考虑一个展平的立方体,第 1 侧 (1,1) 右侧的有
我有一个即将到来的逻辑考试,并且一直在学习我类(class)中的一些过去的论文。我遇到了一个关于物化的问题,并将其发布在下面; 用具体化来表示变量 B 的性质 取值为 1 或 8。 在阅读了一些资源并
我得到了一个使用我选择的约束求解器解决斑马拼图的练习,我使用 Prolog clpfd library 进行了尝试。 . 我知道在 Prolog 中还有其他更惯用的方法来解决这个问题,但这个问题专门针
我是一名优秀的程序员,十分优秀!