Skip to content

Commit 7751747

Browse files
committed
Stub code for SUO-KIF to MeTTa
1 parent 2f3d516 commit 7751747

File tree

1 file changed

+9
-0
lines changed

1 file changed

+9
-0
lines changed

metta/sumo/orientation-test.metta

+9
Original file line numberDiff line numberDiff line change
@@ -22,6 +22,15 @@
2222
(orientation A B Right)
2323
(orientation C B Left)
2424

25+
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
26+
;; MeTTa code to convert SUO-KIF into MeTTa ;;
27+
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
28+
29+
;; Space containing the result of the SUO-KIF to MeTTa translation
30+
!(bind! &metta (new-space))
31+
32+
!(match &self $x $x)
33+
2534
;; (query (orientation A C Right))
2635

2736
;; We want to produce NEXT

0 commit comments

Comments
 (0)