1 | static L<Map<S, Lisp>> matchCondition_all(Lisp condition, Map<S, Lisp> m) {
|
2 | L<Lisp> facts = lispTruth(); |
3 | |
4 | O evaluator = getLispEvaluator(condition.head); |
5 | if (evaluator != null) |
6 | ret (L) (isTrue(callF(evaluator, lispReplaceVars(condition, m))) |
7 | ? ll(m) : ll()); |
8 | |
9 | L<Map<S, Lisp>> candidates = new L; |
10 | for (Lisp fact : facts) {
|
11 | Map<S, Lisp> m2 = cloneMap(m); |
12 | if (lispMatchIC_xyzVars_sub(condition, fact, m2)) |
13 | candidates.add(m2); |
14 | } |
15 | ret candidates; |
16 | } |
Began life as a copy of #1008125
download show line numbers debug dex old transpilations
Travelled to 13 computer(s): aoiabmzegqzx, bhatertpkbcr, cbybwowwnfue, cfunsshuasjs, gwrvuhgaqvyk, ishqpsrjomds, lpdgvwnxivlt, mqqgnosmbjvj, pyentgdyhuwx, pzhvpgtvlbxg, tslmcundralx, tvejysmllsmz, vouqrxazstgt
No comments. add comment
| Snippet ID: | #1008129 |
| Snippet name: | matchCondition_all |
| Eternal ID of this version: | #1008129/3 |
| Text MD5: | da9b5ed85e5133620a232c9a621ef8e4 |
| Author: | stefan |
| Category: | javax / a.i. |
| Type: | JavaX fragment (include) |
| Public (visible to everyone): | Yes |
| Archived (hidden from active list): | No |
| Created/modified: | 2017-04-25 16:26:16 |
| Source code size: | 499 bytes / 16 lines |
| Pitched / IR pitched: | No / No |
| Views / Downloads: | 770 / 763 |
| Version history: | 2 change(s) |
| Referenced in: | [show references] |