| STATUS | TEST NAME | TEST CONDITION | ACTUAL RESULT | EXPECTED RESULT | |--------|-----------|----------------|---------------|-----------------| | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04](https://logicmoo.org/public/mettareports/_100274.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04) | (assertEqualToResult (< 4 (+ 2 (* 3 5)))) | (True) | (True) | | PASS | [DEPENDENT-TYPES.MINERCURRIEDDTL.11](https://logicmoo.org/public/mettareports/_1004190.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTL.11) | (assertEqualToResult (add-atom &kb (: surprisingness (-> (minsup $ptrn) (-> (supportOf $ptrn $cnt) (surp $ptrn (isurp? ($ptrn $cnt)))))))) | () | (()) | | PASS | [MATCH.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONMATCHTEST.01](https://logicmoo.org/public/mettareports/_100422.metta.html#MATCH.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONMATCHTEST.01) | (assertEqualToResult (match &self (, (≞ $p $ptv) (≞ $q $qtv) (≞ $r $rtv) (≞ ($p $a) $patv) (≞ ($q $a) $qatv) (∉ $a $ev) (≞ (→ $q $r) $qrtv)) (deduction (≞ $p $ptv) (≞ $q $qtv) (≞... | ((≞ (→ P R) (ded_formula (STV 1 0.1) (STV 1 0.5) (STV 1 0.1) (ETV (insert 42 ) (idi_formula (Bl ... | ((≞ (→ P R) (ded_formula (STV 1 0.1) (STV 1 0.5) (STV 1 0.1) (ETV (insert 42 ) (idi_formula (Bl True) (Bl False) (STV 1 0))) (STV 1 0.5))) (≞ (→ Q R) (ded_formula (STV 1 0.5) (STV 1 0.5) (STV 1 0.1) (ETV (insert 42 ) (idi_formula (Bl False) (Bl False) (STV 1 0))) (STV 1 0.5)))) | | PASS | [ITERATIVE-CHAINING.IFC-XP.06](https://logicmoo.org/public/mettareports/_100638.metta.html#ITERATIVE-CHAINING.IFC-XP.06) | (assertEqualToResult ((lambda0 "f"))) | ("f") | ("f") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02](https://logicmoo.org/public/mettareports/_100674.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02) | (assertEqualToResult (match &self ($p is-a Color) $p)) | () | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07](https://logicmoo.org/public/mettareports/_10068.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07) | (assertEqualToResult (get-type (= SocratesIsHuman PlatoIsHuman))) | (Type) | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.14](https://logicmoo.org/public/mettareports/_100938.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.14) | (assertEqualToResult (match &self ($Rel A $X) ($Rel A $X))) | ((Rel-P A B) (Rel-Q A C)) | ((Rel-P A B) (Rel-Q A C)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://logicmoo.org/public/mettareports/_100998.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.04](https://logicmoo.org/public/mettareports/_101276.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.04) | (assertEqualToResult (range 1 1)) | () | (()) | | PASS | [COMPARISONS.ADD-ATOM-NAIVE-FIB.01](https://logicmoo.org/public/mettareports/_101288.metta.html#COMPARISONS.ADD-ATOM-NAIVE-FIB.01) | (assertEqualToResult (other-new-space)) | () | (()) | | PASS | [NEUROSPACE.TEST-ASSIST.01](https://logicmoo.org/public/mettareports/_101578.metta.html#NEUROSPACE.TEST-ASSIST.01) | (assertEqualToResult (extend-py! llm_gate)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02](https://logicmoo.org/public/mettareports/_101606.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02) | (assertEqual (TV (FA))) | ((stv 0.4 0.8)) | ((stv 0.4 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23](https://logicmoo.org/public/mettareports/_101964.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23) | (assertEqual (fmap-i (curry-a - 7) (Right 3))) | ((Right 4)) | ((Right 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02](https://logicmoo.org/public/mettareports/_102026.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02) | (assertEqualToResult (nop (change-state! (status (Goal lunch-order)) active))) | () | (()) | | PASS | [PREV.TESTS4.03](https://logicmoo.org/public/mettareports/_102072.metta.html#PREV.TESTS4.03) | (assertEqualToResult (AddBeliefEvent ((sky --> ([(blue) ])) (1.0 0.9)))) | () | () | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_102190.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04](https://logicmoo.org/public/mettareports/_102244.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04) | (assertEqual (deduce (Evaluation (mortal Plato)))) | (T) | (T) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_102366.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_102372.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12](https://logicmoo.org/public/mettareports/_102384.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12) | (assertEqual (get-type (Cons 5 (Cons 6 Nil)))) | ((List Number)) | ((List Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15](https://logicmoo.org/public/mettareports/_102502.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15) | (assertEqual (f 2)) | (103 103 103 103) | (103) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.18](https://logicmoo.org/public/mettareports/_102550.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.18) | (assertEqual (case (match &self ($rel B $x) ($rel $x)) (((Rel-P $y) (P $y)) ((Rel-Q $y) (Q $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.12](https://logicmoo.org/public/mettareports/_102628.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.12) | (assertEqualToResult (prodWith . (Cons f (Cons g Nil)) (Cons f (Cons g Nil)))) | ((Cons (. f f) (Cons (. f g) (Cons (. g f) (Cons (. g g) Nil))))) | ((Cons (. f f) (Cons (. f g) (Cons (. g f) (Cons (. g g) Nil))))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03](https://logicmoo.org/public/mettareports/_102636.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (active) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.04](https://logicmoo.org/public/mettareports/_102730.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.04) | (assertEqual (case (+ 1 5) ((5 Error) (6 OK) (6 Error)))) | (OK) | (OK) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05](https://logicmoo.org/public/mettareports/_102988.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05) | (assertEqual (collapse (shape))) | (((shape))) | (((shape))) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_103384.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.09](https://logicmoo.org/public/mettareports/_104328.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.09) | (assertEqual (:? (HumansAreMortal SocratesIsHuman))) | () | ((Mortal Socrates)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05](https://logicmoo.org/public/mettareports/_104616.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05) | (assertEqual (get-type (curry-a + 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05](https://logicmoo.org/public/mettareports/_104630.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05) | (assertEqual (get-type (curry-a + 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06](https://logicmoo.org/public/mettareports/_10468.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06) | (assertEqual (get-type ((curry-a + 2) 3))) | (Number) | (Number) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://logicmoo.org/public/mettareports/_104694.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04](https://logicmoo.org/public/mettareports/_104786.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04) | (assertEqual (get-type (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04](https://logicmoo.org/public/mettareports/_104788.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04) | (assertEqual (get-type (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02](https://logicmoo.org/public/mettareports/_104998.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02) | (assertEqualToResult (- 8 (/ 4 6.4))) | (7.375) | (7.375) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.06](https://logicmoo.org/public/mettareports/_105110.metta.html#METTA-MORPH-TESTS.MATCH-VOID.06) | (assertEqualToResult (case (match &belief_events $1 $1) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://logicmoo.org/public/mettareports/_105400.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &belief_events $1 $1) ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://logicmoo.org/public/mettareports/_105622.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22](https://logicmoo.org/public/mettareports/_105654.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22) | (assertEqual (let* (($r1 (Add Z Z)) ($r2 (Add $r1 (S Z))) ($r3 (Add $r2 (S Z)))) (match &self (= (eq (S (S Z)) $r3) $tv) $tv))) | (T) | (T) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_106186.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.16](https://logicmoo.org/public/mettareports/_106476.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.16) | (assertEqualToResult (let (: $prf (→ $x $y)) (kb_dtl) (fc_dtl (: $prf (→ $x $y)) kb_dtl rb_dtl (fromNumber 2)))) | ((: ab (→ A B)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C) (: bc (→ B C)... | ((: ab (→ A B)) (: bc (→ B C)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://logicmoo.org/public/mettareports/_106692.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06](https://logicmoo.org/public/mettareports/_10682.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06) | (assertEqual (get-type Either)) | (Type) | (Type) | | PASS | [RESOLVE.R.07](https://logicmoo.org/public/mettareports/_106864.metta.html#RESOLVE.R.07) | (assertEqualToResult (match &self ($x content) $x)) | () | () | | FAIL | [CONTAINERS-ARE-SPACES.04-MATCH-LIST-LIKE-SPACE.02](https://logicmoo.org/public/mettareports/_107282.metta.html#CONTAINERS-ARE-SPACES.04-MATCH-LIST-LIKE-SPACE.02) | (assertEqual (match (kb) ($rel A_List $x) ($rel $x))) | () | ((SS-P_List B_List) (SS-Q_List C_List)) | | PASS | [HOL.NATSTANDALONETEST.02](https://logicmoo.org/public/mettareports/_107772.metta.html#HOL.NATSTANDALONETEST.02) | (assertEqualToResult (add-atom &kb (: Sym (-> (=== $x $y) (=== $y $x))))) | () | (()) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.02](https://logicmoo.org/public/mettareports/_108324.metta.html#TRUTHVALUE.TRUTHVALUETEST.02) | (assertEqual (count->confidence 10)) | (0.9090909090909091) | (0.9090909090909091) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03](https://logicmoo.org/public/mettareports/_108376.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03) | (assertEqual (insert 2 (insert 1 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13](https://logicmoo.org/public/mettareports/_10854.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.07](https://logicmoo.org/public/mettareports/_109342.metta.html#FORMULA.DEDUCTIONFORMULATEST.07) | (assertEqualToResult (smallest-intersection-probability 0.9 0.6)) | (0.5555555555555556 0.5555555555555556 0.5555555555555556 0.5555555555555556 0.5555555555555556 0.55... | (0.5555555555555556) | | PASS | [COMMON.ORDEREDSETTEST.02](https://logicmoo.org/public/mettareports/_109398.metta.html#COMMON.ORDEREDSETTEST.02) | (assertEqual (elem 1 (insert 1 ∅))) | (True) | (True) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/_109398.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | ((= (= $_107028 $_107028) T)) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/_109410.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | ((= (= $_107040 $_107040) T)) | (T) | | PASS | [BASIC.STATE-TYPES.20](https://logicmoo.org/public/mettareports/_109698.metta.html#BASIC.STATE-TYPES.20) | (assertEqualToResult ("(get-type (get-state (new-state (Right 7))))=" (get-type (get-state (new-state (Right 7)))))) | (("(get-type (get-state (new-state (Right 7))))=" Either)) | (("(get-type (get-state (new-state (Right 7))))=" Either)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05](https://logicmoo.org/public/mettareports/_109794.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05) | (assertEqualToResult (get-type (+ -))) | (Number) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02](https://logicmoo.org/public/mettareports/_109808.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02) | (assertEqual (collapse (match &self (= (shape) $x) $x))) | () | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05](https://logicmoo.org/public/mettareports/_109808.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05) | (assertEqualToResult (get-type (+ -))) | (Number) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09](https://logicmoo.org/public/mettareports/_110470.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09) | (assertEqual (g 2)) | (102) | (102) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05](https://logicmoo.org/public/mettareports/_110750.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05) | (assertEqualToResult (get-type (+ -))) | (Number) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05](https://logicmoo.org/public/mettareports/_110764.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05) | (assertEqualToResult (get-type (+ -))) | (Number) | () | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.08](https://logicmoo.org/public/mettareports/_110894.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.08) | (assertEqualToResult (add-atom &kb (: AS (≼ Aug Sep)))) | (True) | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10](https://logicmoo.org/public/mettareports/_11122.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10) | (assertEqual (get-state (get-token))) | ((C D)) | ((C D)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10](https://logicmoo.org/public/mettareports/_111292.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10) | (assertEqualToResult (== 2 3)) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02](https://logicmoo.org/public/mettareports/_111336.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02) | (assertEqualToResult (match &self ($p is-a Color) $p)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02](https://logicmoo.org/public/mettareports/_111350.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02) | (assertEqualToResult (match &self ($p is-a Color) $p)) | () | () | | PASS | [TRUTHVALUE.TRUTHVALUETEST.07](https://logicmoo.org/public/mettareports/_111364.metta.html#TRUTHVALUE.TRUTHVALUETEST.07) | (assertEqual (count (STV 0.1 0.9))) | (9.000000000000002) | (9.000000000000002) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02](https://logicmoo.org/public/mettareports/_111430.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02) | (assertEqual (collapse (match &self (= (shape) $x) $x))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01](https://logicmoo.org/public/mettareports/_11172.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01) | (assertEqual (get-state (get-token))) | ((A B)) | ((A B)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://logicmoo.org/public/mettareports/_111772.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_108878)) | ((State 30)) | | PASS | [COMMON.NUMTEST.02](https://logicmoo.org/public/mettareports/_112010.metta.html#COMMON.NUMTEST.02) | (assertEqual (fromNat (S (S Z)))) | (2 2 2 2 2 2 2 2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09](https://logicmoo.org/public/mettareports/_112042.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09) | (assertEqual (g 2)) | (102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02](https://logicmoo.org/public/mettareports/_112256.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02) | (assertEqual (TV (FA))) | ((stv 0.4 0.8)) | ((stv 0.4 0.8)) | | FAIL | [PREV.TESTS3.07](https://logicmoo.org/public/mettareports/_112258.metta.html#PREV.TESTS3.07) | (assertEqual (AddGoalEvent (Outside (1.0 0.9)))) | () | ((^ open)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03](https://logicmoo.org/public/mettareports/_112408.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03) | (assertEqualToResult (match &self (:= (Green $who) T) ($who is really green))) | ((Sam is really green)) | ((Sam is really green)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01](https://logicmoo.org/public/mettareports/_112488.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01) | (assertEqual (get-type (curry +))) | ((-> Number (-> Number Number))) | ((-> Number (-> Number Number))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07](https://logicmoo.org/public/mettareports/_112912.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07) | (assertEqualToResult (Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03](https://logicmoo.org/public/mettareports/_11304.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03) | (assertEqualToResult (frog Fritz)) | () | () | | PASS | [HOL.NATPARITYTEST.01](https://logicmoo.org/public/mettareports/_113268.metta.html#HOL.NATPARITYTEST.01) | (assertEqualToResult (add-atom &kb (: Nat Type))) | () | (()) | | PASS | [ITERATIVE-CHAINING.IBC-XP.25](https://logicmoo.org/public/mettareports/_113344.metta.html#ITERATIVE-CHAINING.IBC-XP.25) | (assertEqual (isyn (: $prf B) (fromNumber 2) (fromNumber 1))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/_113486.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_102672)) | ((State (A B) $_102672)) | | PASS | [BACKWARD-CHAINING.BC-XP.21](https://logicmoo.org/public/mettareports/_113492.metta.html#BACKWARD-CHAINING.BC-XP.21) | (assertEqualToResult (bc_bem C (fromNumber 2))) | (C C) | (C) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.21](https://logicmoo.org/public/mettareports/_113500.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.21) | (assertEqualToResult (bc_bem C (fromNumber 2))) | (C C) | (C) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04](https://logicmoo.org/public/mettareports/_113614.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04) | (assertEqual (deduce (Evaluation (mortal Plato)))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02](https://logicmoo.org/public/mettareports/_114200.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02) | (assertEqual (TV (FA))) | ((stv 0.4 0.8)) | ((stv 0.4 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18](https://logicmoo.org/public/mettareports/_114820.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18) | (assertEqual (match &self (Green $who) (Green $who))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18](https://logicmoo.org/public/mettareports/_114834.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18) | (assertEqual (match &self (Green $who) (Green $who))) | (T) | (T) | | PASS | [BASIC.KEY-LOOKUPS-MANY.05](https://logicmoo.org/public/mettareports/_115244.metta.html#BASIC.KEY-LOOKUPS-MANY.05) | (assertEqual (let $v (new-state v-4) (match &data (= (get-data $k) $v) $k))) | (k-4) | (k-4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/_115352.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_104538)) | ((State (A B) $_104538)) | | PASS | [DEPENDENT-TYPES.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONDTLTEST.04](https://logicmoo.org/public/mettareports/_1154744.metta.html#DEPENDENT-TYPES.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONDTLTEST.04) | (assertEqualToResult (synthesize (: $proof (≞ (→ P Q) $etv)) kb rb (fromNumber 1))) | ((: (IDIBase P2 Q2) (≞ (→ P Q) (ETV (:: (fromNumber 2) ∅) (direct-introduction-base-formula Fa... | ((: (IDIBase P2 Q2) (≞ (→ P Q) (ETV (:: (S (S Z)) ∅) (STV 0 0.5)))) (: (IDIBase P7 Q7) (≞ (→ P Q) (ETV (:: (S (S (S (S (S (S (S Z))))))) ∅) (STV 1 0.5)))) (let* (((: $_96714 (⊷ Q (S (S Z)) True)) (synthesize (: $_96714 (⊷ Q (S (S Z)) True)) kb rb Z)) ((: $_96978 (≞ (→ P Q) (ETV (:: $_97080 $_97102) (STV $_97140 $_97162)))) (synthesize (: $_96978 (≞ (→ P Q) (ETV (:: $_97080 $_97102) (STV $_97140 $_97162)))) kb rb Z)) ((: $_97450 (⍃ $_97080 (S (S Z)))) (synthesize (: $_97450 (⍃ $_97080 (S (S Z)))) kb rb Z))) (: (IDIRecursive P2 $_96714 $_96978 $_97450) (≞ (→ P Q) (ETV (:: (S (S Z)) (:: $_97080 $_97102)) (STV (/ (+ (* $_97140 (if (<= (if (< (- 1.0 $_97162) 0) (* -1 (- 1.0 $_97162)) (- 1.0 $_97162)) 1.0e-9) (max-count) (/ (* $_97162 (lookahead)) (- 1.0 $_97162)))) 1) (+ (if (<= (if (< (- 1.0 $_97162) 0) (* -1 (- 1.0 $_97162)) (- 1.0 $_97162)) 1.0e-9) (max-count) (/ (* $_97162 (lookahead)) (- 1.0 $_97162))) 1)) (/ (+ (if (<= (if (< (- 1.0 $_97162) 0) (* -1 (- 1.0 $_97162)) (- 1.0 $_97162)) 1.0e-9) (max-count) (/ (* $_97162 (lookahead)) (- 1.0 $_97162))) 1) (+ (+ (if (<= (if (< (- 1.0 $_97162) 0) (* -1 (- 1.0 $_97162)) (- 1.0 $_97162)) 1.0e-9) (max-count) (/ (* $_97162 (lookahead)) (- 1.0 $_97162))) 1) 1.0))))))) (let* (((: $_96978 (≞ (→ P Q) (ETV (:: $_97080 $_97102) (STV $_97140 $_97162)))) (synthesize (: $_96978 (≞ (→ P Q) (ETV (:: $_97080 $_97102) (STV $_97140 $_97162)))) kb rb Z)) ((: $_97450 (⍃ $_97080 (S (S (S (S (S (S (S Z))))))))) (synthesize (: $_97450 (⍃ $_97080 (S (S (S (S (S (S (S Z))))))))) kb rb Z))) (: (IDIRecursive P7 Q7 $_96978 $_97450) (≞ (→ P Q) (ETV (:: (S (S (S (S (S (S (S Z))))))) (:: $_97080 $_97102)) (STV (/ (+ (* $_97140 (if (<= (if (< (- 1.0 $_97162) 0) (* -1 (- 1.0 $_97162)) (- 1.0 $_97162)) 1.0e-9) (max-count) (/ (* $_97162 (lookahead)) (- 1.0 $_97162)))) 1) (+ (if (<= (if (< (- 1.0 $_97162) 0) (* -1 (- 1.0 $_97162)) (- 1.0 $_97162)) 1.0e-9) (max-count) (/ (* $_97162 (lookahead)) (- 1.0 $_97162))) 1)) (/ (+ (if (<= (if (< (- 1.0 $_97162) 0) (* -1 (- 1.0 $_97162)) (- 1.0 $_97162)) 1.0e-9) (max-count) (/ (* $_97162 (lookahead)) (- 1.0 $_97162))) 1) (+ (+ (if (<= (if (< (- 1.0 $_97162) 0) (* -1 (- 1.0 $_97162)) (- 1.0 $_97162)) 1.0e-9) (max-count) (/ (* $_97162 (lookahead)) (- 1.0 $_97162))) 1) 1.0))))))) (let* (((: $_102480 (≞ (→ P Q) (ETV (:: $_102582 $_102604) (STV $_102642 $_102664)))) (synthesize (: $_102480 (≞ (→ P Q) (ETV (:: $_102582 $_102604) (STV $_102642 $_102664)))) kb rb Z)) ((: $_102952 (⍃ $_102582 (S (S Z)))) (synthesize (: $_102952 (⍃ $_102582 (S (S Z)))) kb rb Z))) (: (IDIRecursive P2 Q2 $_102480 $_102952) (≞ (→ P Q) (ETV (:: (S (S Z)) (:: $_102582 $_102604)) (STV (/ (* $_102642 (if (<= (if (< (- 1.0 $_102664) 0) (* -1 (- 1.0 $_102664)) (- 1.0 $_102664)) 1.0e-9) (max-count) (/ (* $_102664 (lookahead)) (- 1.0 $_102664)))) (+ (if (<= (if (< (- 1.0 $_102664) 0) (* -1 (- 1.0 $_102664)) (- 1.0 $_102664)) 1.0e-9) (max-count) (/ (* $_102664 (lookahead)) (- 1.0 $_102664))) 1)) (/ (+ (if (<= (if (< (- 1.0 $_102664) 0) (* -1 (- 1.0 $_102664)) (- 1.0 $_102664)) 1.0e-9) (max-count) (/ (* $_102664 (lookahead)) (- 1.0 $_102664))) 1) (+ (+ (if (<= (if (< (- 1.0 $_102664) 0) (* -1 (- 1.0 $_102664)) (- 1.0 $_102664)) 1.0e-9) (max-count) (/ (* $_102664 (lookahead)) (- 1.0 $_102664))) 1) 1.0))))))) (let* (((: $_105094 (⊷ Q (S (S (S (S (S (S (S Z))))))) False)) (synthesize (: $_105094 (⊷ Q (S (S (S (S (S (S (S Z))))))) False)) kb rb Z)) ((: $_102480 (≞ (→ P Q) (ETV (:: $_102582 $_102604) (STV $_102642 $_102664)))) (synthesize (: $_102480 (≞ (→ P Q) (ETV (:: $_102582 $_102604) (STV $_102642 $_102664)))) kb rb Z)) ((: $_102952 (⍃ $_102582 (S (S (S (S (S (S (S Z))))))))) (synthesize (: $_102952 (⍃ $_102582 (S (S (S (S (S (S (S Z))))))))) kb rb Z))) (: (IDIRecursive P7 $_105094 $_102480 $_102952) (≞ (→ P Q) (ETV (:: (S (S (S (S (S (S (S Z))))))) (:: $_102582 $_102604)) (STV (/ (* $_102642 (if (<= (if (< (- 1.0 $_102664) 0) (* -1 (- 1.0 $_102664)) (- 1.0 $_102664)) 1.0e-9) (max-count) (/ (* $_102664 (lookahead)) (- 1.0 $_102664)))) (+ (if (<= (if (< (- 1.0 $_102664) 0) (* -1 (- 1.0 $_102664)) (- 1.0 $_102664)) 1.0e-9) (max-count) (/ (* $_102664 (lookahead)) (- 1.0 $_102664))) 1)) (/ (+ (if (<= (if (< (- 1.0 $_102664) 0) (* -1 (- 1.0 $_102664)) (- 1.0 $_102664)) 1.0e-9) (max-count) (/ (* $_102664 (lookahead)) (- 1.0 $_102664))) 1) (+ (+ (if (<= (if (< (- 1.0 $_102664) 0) (* -1 (- 1.0 $_102664)) (- 1.0 $_102664)) 1.0e-9) (max-count) (/ (* $_102664 (lookahead)) (- 1.0 $_102664))) 1) 1.0))))))) (let* (((: $_108358 (≞ (→ P Q) (ETV $_108444 $_96596))) (synthesize (: $_108358 (≞ (→ P Q) (ETV $_108444 $_96596))) kb rb Z))) (: (EvidenceElimination $_108358) (≞ (→ P Q) $_96596))) (let* (((: $_108822 (≞ (→ P P) (STV $_108908 $_108930))) (synthesize (: $_108822 (≞ (→ P P) (STV $_108908 $_108930))) kb rb Z)) ((: $_109150 (≞ (→ P Q) (STV $_109236 $_109258))) (synthesize (: $_109150 (≞ (→ P Q) (STV $_109236 $_109258))) kb rb Z))) (: (Deduction Pm Pm Qm $_108822 $_109150) (≞ (→ P Q) (if (and (and (< 0 0.2) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.2 0.2) 1) 0.2)) 1 (/ (- (+ 0.2 0.2) 1) 0.2))) 0 (if (< 1 (/ (- (+ 0.2 0.2) 1) 0.2)) 1 (/ (- (+ 0.2 0.2) 1) 0.2))) $_108908) (<= $_108908 (if (> 0 (if (< 1 (/ 0.2 0.2)) 1 (/ 0.2 0.2))) 0 (if (< 1 (/ 0.2 0.2)) 1 (/ 0.2 0.2)))))) (and (< 0 0.2) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.2 0.3) 1) 0.2)) 1 (/ (- (+ 0.2 0.3) 1) 0.2))) 0 (if (< 1 (/ (- (+ 0.2 0.3) 1) 0.2)) 1 (/ (- (+ 0.2 0.3) 1) 0.2))) $_109236) (<= $_109236 (if (> 0 (if (< 1 (/ 0.3 0.2)) 1 (/ 0.3 0.2))) 0 (if (< 1 (/ 0.3 0.2)) 1 (/ 0.3 0.2))))))) (STV (if (< 0.9999 0.2) 0.3 (+ (* $_108908 $_109236) (/ (* (- 1 $_108908) (- 0.3 (* 0.2 $_109236))) (- 1 0.2)))) (min 0.3 (min 0.3 (min 0.2 (min $_108930 $_109258))))) (STV 1 0))))) (let* (((: $_108822 (≞ (→ P Q) (STV $_108908 $_108930))) (synthesize (: $_108822 (≞ (→ P Q) (STV $_108908 $_108930))) kb rb Z)) ((: $_109150 (≞ (→ Q Q) (STV $_109236 $_109258))) (synthesize (: $_109150 (≞ (→ Q Q) (STV $_109236 $_109258))) kb rb Z))) (: (Deduction Pm Qm Qm $_108822 $_109150) (≞ (→ P Q) (if (and (and (< 0 0.2) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.2 0.3) 1) 0.2)) 1 (/ (- (+ 0.2 0.3) 1) 0.2))) 0 (if (< 1 (/ (- (+ 0.2 0.3) 1) 0.2)) 1 (/ (- (+ 0.2 0.3) 1) 0.2))) $_108908) (<= $_108908 (if (> 0 (if (< 1 (/ 0.3 0.2)) 1 (/ 0.3 0.2))) 0 (if (< 1 (/ 0.3 0.2)) 1 (/ 0.3 0.2)))))) (and (< 0 0.3) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.3 0.3) 1) 0.3)) 1 (/ (- (+ 0.3 0.3) 1) 0.3))) 0 (if (< 1 (/ (- (+ 0.3 0.3) 1) 0.3)) 1 (/ (- (+ 0.3 0.3) 1) 0.3))) $_109236) (<= $_109236 (if (> 0 (if (< 1 (/ 0.3 0.3)) 1 (/ 0.3 0.3))) 0 (if (< 1 (/ 0.3 0.3)) 1 (/ 0.3 0.3))))))) (STV (if (< 0.9999 0.3) 0.3 (+ (* $_108908 $_109236) (/ (* (- 1 $_108908) (- 0.3 (* 0.3 $_109236))) (- 1 0.3)))) (min 0.3 (min 0.2 (min 0.2 (min $_108930 $_109258))))) (STV 1 0))))) (let* (((: $_108822 (≞ (→ P R) (STV $_108908 $_108930))) (synthesize (: $_108822 (≞ (→ P R) (STV $_108908 $_108930))) kb rb Z)) ((: $_109150 (≞ (→ R Q) (STV $_109236 $_109258))) (synthesize (: $_109150 (≞ (→ R Q) (STV $_109236 $_109258))) kb rb Z))) (: (Deduction Pm Rm Qm $_108822 $_109150) (≞ (→ P Q) (if (and (and (< 0 0.2) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.2 0.4) 1) 0.2)) 1 (/ (- (+ 0.2 0.4) 1) 0.2))) 0 (if (< 1 (/ (- (+ 0.2 0.4) 1) 0.2)) 1 (/ (- (+ 0.2 0.4) 1) 0.2))) $_108908) (<= $_108908 (if (> 0 (if (< 1 (/ 0.4 0.2)) 1 (/ 0.4 0.2))) 0 (if (< 1 (/ 0.4 0.2)) 1 (/ 0.4 0.2)))))) (and (< 0 0.4) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.4 0.3) 1) 0.4)) 1 (/ (- (+ 0.4 0.3) 1) 0.4))) 0 (if (< 1 (/ (- (+ 0.4 0.3) 1) 0.4)) 1 (/ (- (+ 0.4 0.3) 1) 0.4))) $_109236) (<= $_109236 (if (> 0 (if (< 1 (/ 0.3 0.4)) 1 (/ 0.3 0.4))) 0 (if (< 1 (/ 0.3 0.4)) 1 (/ 0.3 0.4))))))) (STV (if (< 0.9999 0.4) 0.3 (+ (* $_108908 $_109236) (/ (* (- 1 $_108908) (- 0.3 (* 0.4 $_109236))) (- 1 0.4)))) (min 0.3 (min 0.1 (min 0.2 (min $_108930 $_109258))))) (STV 1 0))))) (let* (((: $_108822 (≞ (→ P (→ Q R)) (STV $_108908 $_108930))) (synthesize (: $_108822 (≞ (→ P (→ Q R)) (STV $_108908 $_108930))) kb rb Z)) ((: $_109150 (≞ (→ (→ Q R) Q) (STV $_109236 $_109258))) (synthesize (: $_109150 (≞ (→ (→ Q R) Q) (STV $_109236 $_109258))) kb rb Z))) (: (Deduction Pm QRm Qm $_108822 $_109150) (≞ (→ P Q) (if (and (and (< 0 0.2) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.2 0.9) 1) 0.2)) 1 (/ (- (+ 0.2 0.9) 1) 0.2))) 0 (if (< 1 (/ (- (+ 0.2 0.9) 1) 0.2)) 1 (/ (- (+ 0.2 0.9) 1) 0.2))) $_108908) (<= $_108908 (if (> 0 (if (< 1 (/ 0.9 0.2)) 1 (/ 0.9 0.2))) 0 (if (< 1 (/ 0.9 0.2)) 1 (/ 0.9 0.2)))))) (and (< 0 0.9) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.9 0.3) 1) 0.9)) 1 (/ (- (+ 0.9 0.3) 1) 0.9))) 0 (if (< 1 (/ (- (+ 0.9 0.3) 1) 0.9)) 1 (/ (- (+ 0.9 0.3) 1) 0.9))) $_109236) (<= $_109236 (if (> 0 (if (< 1 (/ 0.3 0.9)) 1 (/ 0.3 0.9))) 0 (if (< 1 (/ 0.3 0.9)) 1 (/ 0.3 0.9))))))) (STV (if (< 0.9999 0.9) 0.3 (+ (* $_108908 $_109236) (/ (* (- 1 $_108908) (- 0.3 (* 0.9 $_109236))) (- 1 0.9)))) (min 0.3 (min 0.7 (min 0.2 (min $_108930 $_109258))))) (STV 1 0))))) (let* (((: $_121070 (⊷ Q (S (S Z)) True)) (synthesize (: $_121070 (⊷ Q (S (S Z)) True)) kb rb Z))) (: (IDIBase P2 $_121070) (≞ (→ P Q) (ETV (:: (S (S Z)) ∅) (STV 1 0.5))))) (let* (((: $_122072 (⊷ Q (S (S (S (S (S (S (S Z))))))) False)) (synthesize (: $_122072 (⊷ Q (S (S (S (S (S (S (S Z))))))) False)) kb rb Z))) (: (IDIBase P7 $_122072) (≞ (→ P Q) (ETV (:: (S (S (S (S (S (S (S Z))))))) ∅) (STV 0 0.5)))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03](https://logicmoo.org/public/mettareports/_11578.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03) | (assertEqualToResult (match &self (:= (S K K x) $r) (match &self (:= $r $r2) $r2))) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02](https://logicmoo.org/public/mettareports/_115860.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02) | (assertEqualToResult (match &self ($p is-a Color) $p)) | () | () | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.02](https://logicmoo.org/public/mettareports/_115890.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.02) | (assertEqualToResult (add-atom &kb (: FM (≼ Feb Mar)))) | (True) | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05](https://logicmoo.org/public/mettareports/_116078.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05) | (assertEqual (get-type (= (Mortal Socrates) (Mortal Plato)))) | (Type) | (Type) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://logicmoo.org/public/mettareports/_116114.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [SUBTYPING.SUBTYPING-TEST.01](https://logicmoo.org/public/mettareports/_1171898.metta.html#SUBTYPING.SUBTYPING-TEST.01) | (assertEqual (synthesize (: $proof (: felix Cat)) kb rb Z)) | ((: fC (: felix Cat))) | ((: fC (: felix Cat))) | | PASS | [FORWARD-CHAINING.FC-XP.23](https://logicmoo.org/public/mettareports/_117262.metta.html#FORWARD-CHAINING.FC-XP.23) | (assertEqualToResult (add-atom &kb_em (→ B C))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08](https://logicmoo.org/public/mettareports/_117286.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08) | (assertEqual (find-equal (color) (foo))) | (red) | (red) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.23](https://logicmoo.org/public/mettareports/_117300.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.23) | (assertEqualToResult (add-atom &kb_em (→ B C))) | () | (()) | | PASS | [BASIC.STATE-TYPES.05](https://logicmoo.org/public/mettareports/_117368.metta.html#BASIC.STATE-TYPES.05) | (assertEqualToResult ("Bind B-first with B")) | (("Bind B-first with B")) | (("Bind B-first with B")) | | PASS | [METTA-MORPH-TESTS.TYPES2.05](https://logicmoo.org/public/mettareports/_11756.metta.html#METTA-MORPH-TESTS.TYPES2.05) | (assertEqualToResult (match &self (: reproduce $1) $1)) | ((-> Lion Lion Lion)) | ((-> Lion Lion Lion)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03](https://logicmoo.org/public/mettareports/_118254.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03) | (assertEqual (get-type (new-state 2))) | ((MonadicState Number)) | ((StateMonad Number)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.28](https://logicmoo.org/public/mettareports/_118518.metta.html#ITERATIVE-CHAINING.IFC-XP.28) | (assertEqualToResult (add-atom &kb (: bc (→ B C)))) | () | (()) | | PASS | [HOL.NATPARITYTEST.05](https://logicmoo.org/public/mettareports/_118616.metta.html#HOL.NATPARITYTEST.05) | (assertEqualToResult (add-atom &kb (: MkEvenZ (Even Z)))) | () | (()) | | PASS | [ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.05](https://logicmoo.org/public/mettareports/_118664.metta.html#ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.05) | (assertEqualToResult ("========== Test inductive rule ==========")) | (("========== Test inductive rule ==========")) | (("========== Test inductive rule ==========")) | | PASS | [COMPARISONS.ADD-ATOM-NAIVE-FIB.08](https://logicmoo.org/public/mettareports/_119228.metta.html#COMPARISONS.ADD-ATOM-NAIVE-FIB.08) | (assertEqualToResult (match &other2 (= (foo) $fooN) $fooN)) | (foo1 foo2) | (foo1 foo2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02](https://logicmoo.org/public/mettareports/_119460.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02) | (assertEqual (get-type (drop (Cons 1 Nil)))) | ((Vec Number Z)) | ((Vec Number Z)) | | PASS | [COMMON.LISTTEST.01](https://logicmoo.org/public/mettareports/_120326.metta.html#COMMON.LISTTEST.01) | (assertEqualToResult ("============ Test insert ============")) | (("============ Test insert ============")) | (("============ Test insert ============")) | | PASS | [HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01](https://logicmoo.org/public/mettareports/_120456.metta.html#HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01) | (assertEqualToResult (collapse (superpose ((superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (4 5 6 4 5 6 4 5 6 4 5... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 ... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07](https://logicmoo.org/public/mettareports/_12076.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18](https://logicmoo.org/public/mettareports/_120914.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18) | (assertEqualToResult (bin)) | (0 1) | (0 1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18](https://logicmoo.org/public/mettareports/_120922.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18) | (assertEqualToResult (bin)) | (0 1) | (0 1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05](https://logicmoo.org/public/mettareports/_120966.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) (match &self (:= $r $r2) $r2))) | ((S (S Z))) | ((S (S Z))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://logicmoo.org/public/mettareports/_121858.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.13](https://logicmoo.org/public/mettareports/_121940.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.13) | (assertEqualToResult (add-atom &kb (: Trans (-> (≼ $x $y) (-> (≼ $y $z) (≼ $x $z)))))) | (True) | (()) | | PASS | [ITERATIVE-CHAINING.IFC-XP.39](https://logicmoo.org/public/mettareports/_121962.metta.html#ITERATIVE-CHAINING.IFC-XP.39) | (assertEqualToResult (ifc (: a A) (fromNumber 1) (fromNumber 1))) | ((: a A) (: (ModusPonens ab a) B)) | ((: a A) (: (ModusPonens ab a) B)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.08](https://logicmoo.org/public/mettareports/_122146.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.08) | (assertEqual (case (+ 1 (superpose (1 2 3))) (($x (+ 1 $x))))) | (3 4 5) | (3 4 5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04](https://logicmoo.org/public/mettareports/_12218.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04) | (assertEqualToResult (nop (change-state! &state-active inactive))) | () | (()) | | PASS | [BACKWARD-CHAINING.BC-XP.12](https://logicmoo.org/public/mettareports/_122244.metta.html#BACKWARD-CHAINING.BC-XP.12) | (assertEqual (bc_eq (→ A C) kb_eq (fromNumber 2))) | ((→ A C)) | ((→ A C)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.12](https://logicmoo.org/public/mettareports/_122252.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.12) | (assertEqual (bc_eq (→ A C) kb_eq (fromNumber 2))) | ((→ A C)) | ((→ A C)) | | PASS | [CURRENT.TESTS2.06](https://logicmoo.org/public/mettareports/_122352.metta.html#CURRENT.TESTS2.06) | (assertEqualToResult (AddBeliefEvent (ballright (1.0 0.9)))) | () | () | | PASS | [NARS-V0.TESTS2.06](https://logicmoo.org/public/mettareports/_122358.metta.html#NARS-V0.TESTS2.06) | (assertEqualToResult (AddBeliefEvent (ballright (1.0 0.9)))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01](https://logicmoo.org/public/mettareports/_122436.metta.html#HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01) | (assertEqualToResult (collapse (superpose ((superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (4 5 6 4 5 6 4 5 6 4 5... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 ... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.14](https://logicmoo.org/public/mettareports/_123142.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.14) | (assertEqualToResult (match &self ($Rel A $X) ($Rel A $X))) | ((Rel-P A B) (Rel-Q A C)) | ((Rel-P A B) (Rel-Q A C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05](https://logicmoo.org/public/mettareports/_123230.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05) | (assertEqual (TV (green Fritz))) | ((stv 0.7047 0.68)) | ((stv 0.7047 0.68)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17](https://logicmoo.org/public/mettareports/_123488.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17) | (assertEqual (get-type (fmap (curry-a + 1) (Left 5)))) | ((Either Number)) | ((Either Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18](https://logicmoo.org/public/mettareports/_123520.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18) | (assertEqualToResult (bin)) | (0 1) | (0 1) | | PASS | [BACKWARD-CHAINING.BC-XP.34](https://logicmoo.org/public/mettareports/_123548.metta.html#BACKWARD-CHAINING.BC-XP.34) | (assertEqual (bc_em (→ A C) (fromNumber 2))) | ((→ A C)) | ((→ A C)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.34](https://logicmoo.org/public/mettareports/_123556.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.34) | (assertEqual (bc_em (→ A C) (fromNumber 2))) | ((→ A C)) | ((→ A C)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://logicmoo.org/public/mettareports/_123722.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | () | () | | PASS | [ITERATIVE-CHAINING.IFC-XP.19](https://logicmoo.org/public/mettareports/_124086.metta.html#ITERATIVE-CHAINING.IFC-XP.19) | (assertEqualToResult ((ic_bare A kb_bare rb_bare (fromNumber 1) (fromNumber 2)))) | ((→ A B) (→ B C) A C) | (A C (→ A B) (→ B C)) | | PASS | [PREV.TESTS3.04](https://logicmoo.org/public/mettareports/_124166.metta.html#PREV.TESTS3.04) | (assertEqualToResult (AddBeliefEvent (corridorIn (1.0 0.9)))) | () | () | | FAIL | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.15](https://logicmoo.org/public/mettareports/_124258.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.15) | (assertEqualToResult =====) | (=====) | ("===== Prove P→Q using base , recursive and order rules (synthesizer) =====") | | FAIL | [PREV.TESTS4.05](https://logicmoo.org/public/mettareports/_124468.metta.html#PREV.TESTS4.05) | (assertEqual (EternalQuestion ({(garfield) } --> artist))) | ((Event (None (0.5 0.0)) (eternal Nil 0.0))) | ((Event (({(garfield) } --> artist) (1.0 0.27508280575237937)) (eternal (4 3 2 1.0) (0 0.0)))) | | PASS | [ITERATIVE-CHAINING.IFC-XP.34](https://logicmoo.org/public/mettareports/_124538.metta.html#ITERATIVE-CHAINING.IFC-XP.34) | (assertEqualToResult (fc (: a A) (fromNumber 1))) | ((: a A) (: (ModusPonens ab a) B)) | ((: a A) (: (ModusPonens ab a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05](https://logicmoo.org/public/mettareports/_124602.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) (match &self (:= $r $r2) $r2))) | ((S (S Z))) | ((S (S Z))) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.02](https://logicmoo.org/public/mettareports/_124760.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.02) | (assertEqualToResult (map inc (Cons 2 (Cons 3 (Cons 1 Nil))))) | ((Cons 3 (Cons 4 (Cons 2 Nil)))) | ((Cons 3 (Cons 4 (Cons 2 Nil)))) | | FAIL | [NARS-V0.TESTS4.05](https://logicmoo.org/public/mettareports/_124868.metta.html#NARS-V0.TESTS4.05) | (assertEqual (EternalQuestion ({(garfield) } --> artist))) | ((Event (None (0.5 0.0)) (eternal Nil 0.0))) | ((Event (({(garfield) } --> artist) (1.0 0.27508280575237937)) (eternal (4 3 2 1.0) (0 0.0)))) | | PASS | [CURRENT.TESTS5.09](https://logicmoo.org/public/mettareports/_124906.metta.html#CURRENT.TESTS5.09) | (assertEqual (EternalQuestion ({(instance1) } --> sheep))) | ((Event (({(instance1) } --> sheep) (1.0 0.30916030534351147)) (eternal (4 3) (0 0.0))) (Event (({(i... | ((Event (({(instance1) } --> sheep) (1.0 0.30916030534351147)) (eternal (4 3) (0 0.0)))) | | PASS | [NARS-V0.TESTS5.06](https://logicmoo.org/public/mettareports/_124912.metta.html#NARS-V0.TESTS5.06) | (assertEqual (EternalQuestion ({(instance1) } --> sheep))) | ((Event (({(instance1) } --> sheep) (1.0 0.30916030534351147)) (eternal (4 3) (0 0.0))) (Event (({(i... | ((Event (({(instance1) } --> sheep) (1.0 0.30916030534351147)) (eternal (4 3) (0 0.0)))) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.14](https://logicmoo.org/public/mettareports/_125018.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.14) | (assertEqualToResult (match &self ($Rel A $X) ($Rel A $X))) | ((Rel-P A B) (Rel-Q A C)) | ((Rel-P A B) (Rel-Q A C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01](https://logicmoo.org/public/mettareports/_125116.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01) | (assertEqual (Add S Z)) | (S) | (S) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04](https://logicmoo.org/public/mettareports/_125180.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04) | (assertEqual (Something? (Add (S Z) (S Z)))) | ((Something? (S (S Z)))) | ((Something? (S (S Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05](https://logicmoo.org/public/mettareports/_125246.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05) | (assertEqual (get-type (ConsN "1" (ConsN "2" NilN)))) | ((VecN String 2)) | ((VecN String 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02](https://logicmoo.org/public/mettareports/_125420.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02) | (assertEqual (get-type (drop (Cons 1 Nil)))) | ((Vec Number Z)) | ((Vec Number Z)) | | PASS | [COMMON.MAYBETEST.02](https://logicmoo.org/public/mettareports/_125518.metta.html#COMMON.MAYBETEST.02) | (assertEqualToResult (Maybe< (Just 10) Nothing)) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://logicmoo.org/public/mettareports/_125768.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05](https://logicmoo.org/public/mettareports/_125784.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) (match &self (:= $r $r2) $r2))) | ((S (S Z))) | ((S (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06](https://logicmoo.org/public/mettareports/_126232.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06) | (assertEqual (get-type ((curry-a + 2) 3))) | (Number) | (Number) | | PASS | [POLYWARD-CHAINING.PC-XP.04](https://logicmoo.org/public/mettareports/_126506.metta.html#POLYWARD-CHAINING.PC-XP.04) | (assertEqualToResult (add-atom &kb (: a A))) | () | (()) | | PASS | [DEPENDENT-TYPES.MINERCURRIEDDTL.04](https://logicmoo.org/public/mettareports/_126526.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTL.04) | (assertEqualToResult (add-atom &db (Inheritance C E))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03](https://logicmoo.org/public/mettareports/_126530.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03) | (assertEqual (match &kb (, (Venus orbit $x au) (Mars orbit $y au)) (- $y $x))) | (0.8) | (0.8) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03](https://logicmoo.org/public/mettareports/_126792.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (active) | | FAIL | [BACKWARD-CHAINING.BC-XP.06](https://logicmoo.org/public/mettareports/_127446.metta.html#BACKWARD-CHAINING.BC-XP.06) | (assertEqualToResult Bare) | (Bare) | ("=== Equality ===") | | FAIL | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.06](https://logicmoo.org/public/mettareports/_127470.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.06) | (assertEqualToResult Bare) | (Bare) | ("=== Equality ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02](https://logicmoo.org/public/mettareports/_127538.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02) | (assertEqual (get-type (drop (Cons 1 Nil)))) | ((Vec Number Z)) | ((Vec Number Z)) | | PASS | [BASIC.STATE-TYPES.12](https://logicmoo.org/public/mettareports/_127728.metta.html#BASIC.STATE-TYPES.12) | (assertEqualToResult ("(get-type False-first)=" (get-type (get-state &false-first)))) | (("(get-type False-first)=" Symbol)) | (("(get-type False-first)=" Symbol)) | | PASS | [BASIC.CML-UNSHARED.06](https://logicmoo.org/public/mettareports/_127806.metta.html#BASIC.CML-UNSHARED.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [BASIC.HYPERPOSING.06](https://logicmoo.org/public/mettareports/_127806.metta.html#BASIC.HYPERPOSING.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [DEPENDENT-TYPES.MINERDTLTEST.06](https://logicmoo.org/public/mettareports/_127846.metta.html#DEPENDENT-TYPES.MINERDTLTEST.06) | (assertEqualToResult (let (: $proof (minsup $pattern)) (synthesize (: $proof $pattern) kb rb (fromNumber 5)) (minsup $pattern))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01](https://logicmoo.org/public/mettareports/_128058.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01) | (assertEqual (Add S Z)) | (S) | (S) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03](https://logicmoo.org/public/mettareports/_128228.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03) | (assertEqual (color)) | (green yellow red) | (red yellow green) | | PASS | [COMMON.EQUALITYTYPETEST.01](https://logicmoo.org/public/mettareports/_128402.metta.html#COMMON.EQUALITYTYPETEST.01) | (assertEqualToResult (foo (Refl T42))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06](https://logicmoo.org/public/mettareports/_128460.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06) | (assertEqual (get-type &state-token)) | ((StateMonad Expression)) | ((StateMonad Expression)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.04](https://logicmoo.org/public/mettareports/_128554.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.04) | (assertEqual (case (+ 1 5) ((5 Error) (6 OK) (6 Error)))) | (OK) | (OK) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://logicmoo.org/public/mettareports/_128844.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14](https://logicmoo.org/public/mettareports/_12926.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14) | (assertEqual (let (List $t) (get-type (Cons 5 (Cons 6 Nil))) $t)) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://logicmoo.org/public/mettareports/_129364.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.04](https://logicmoo.org/public/mettareports/_129722.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.04) | (assertEqualToResult (range 1 1)) | () | (()) | | PASS | [BACKWARD-CHAINING.BC-XP.07](https://logicmoo.org/public/mettareports/_12988.metta.html#BACKWARD-CHAINING.BC-XP.07) | (assertEqual (bc_eq A kb_eq Z)) | (A) | (A) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.07](https://logicmoo.org/public/mettareports/_12996.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.07) | (assertEqual (bc_eq A kb_eq Z)) | (A) | (A) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13](https://logicmoo.org/public/mettareports/_130152.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13) | (assertEqual (of-same-type Green Red)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13](https://logicmoo.org/public/mettareports/_130166.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13) | (assertEqual (of-same-type Green Red)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://logicmoo.org/public/mettareports/_130242.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $color color) $color)) | (red green blue) | (blue green red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05](https://logicmoo.org/public/mettareports/_130368.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05) | (assertEqual (get-type (ConsN "1" (ConsN "2" NilN)))) | ((VecN String 2)) | ((VecN String 2)) | | FAIL | [EXPERIMENTS.UNIFY-VIA-CASE.03](https://logicmoo.org/public/mettareports/_130398.metta.html#EXPERIMENTS.UNIFY-VIA-CASE.03) | (assertEqualToResult (case (f $x) (((Link A $y) (Link $x $y))))) | ((Link $_128124 B)) | ((Link A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12](https://logicmoo.org/public/mettareports/_130656.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12) | (assertEqual (get-type (Cons 5 (Cons 6 Nil)))) | ((List Number)) | ((List Number)) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.08](https://logicmoo.org/public/mettareports/_130824.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.08) | (assertEqualToResult (prodWith * (Cons 1 Nil) (Cons 2 Nil))) | ((Cons 2 Nil)) | ((Cons 2 Nil)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03](https://logicmoo.org/public/mettareports/_13104.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03) | (assertEqualToResult (frog Fritz)) | () | () | | PASS | [CURRENT.TESTS2.05](https://logicmoo.org/public/mettareports/_131052.metta.html#CURRENT.TESTS2.05) | (assertEqualToResult (AddBeliefEvent ((^ left) (1.0 0.9)))) | () | () | | PASS | [NARS-V0.TESTS2.05](https://logicmoo.org/public/mettareports/_131058.metta.html#NARS-V0.TESTS2.05) | (assertEqualToResult (AddBeliefEvent ((^ left) (1.0 0.9)))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.04](https://logicmoo.org/public/mettareports/_131190.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.04) | (assertEqual (case (+ 1 5) ((5 Error) (6 OK) (6 Error)))) | (OK) | (OK) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://logicmoo.org/public/mettareports/_131492.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02](https://logicmoo.org/public/mettareports/_13158.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02) | (assertEqual (ift (green $x) $x)) | (Fritz) | (Fritz) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12](https://logicmoo.org/public/mettareports/_132034.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12) | (assertEqual (get-type (Cons 5 (Cons 6 Nil)))) | ((List Number)) | ((List Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10](https://logicmoo.org/public/mettareports/_132066.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10) | (assertEqual ((curry-a is Socrates) Human)) | (True) | (True) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.06](https://logicmoo.org/public/mettareports/_132500.metta.html#METTA-MORPH-TESTS.MATCH-VOID.06) | (assertEqualToResult (case (match &belief_events $1 $1) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://logicmoo.org/public/mettareports/_132590.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02](https://logicmoo.org/public/mettareports/_132600.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02) | (assertEqualToResult (- 8 (/ 4 6.4))) | (7.375) | (7.375) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18](https://logicmoo.org/public/mettareports/_132652.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18) | (assertEqual (fmap (curry-a + 2) (UntypedC 5))) | ((UntypedC 7)) | ((UntypedC 7)) | | FAIL | [NEW.TESTS1.03](https://logicmoo.org/public/mettareports/_132794.metta.html#NEW.TESTS1.03) | (assertEqual (EternalQuestion (({(garfield) } * ([(blue) ])) --> like))) | ((Event (None (0.5 0.0)) (eternal Nil 0.0))) | ((Event ((({(garfield) } * ([(blue) ])) --> like) (1.0 0.2965825874694874)) (eternal (Cons 2 (Cons 1 (Cons 3 Nil))) 0.643288027761712))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12](https://logicmoo.org/public/mettareports/_133148.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12) | (assertEqual ((lambda $x (+ $x 1)) 2)) | (3) | (3) | | PASS | [BASIC.HYPERPOSING-SHARED.06](https://logicmoo.org/public/mettareports/_133442.metta.html#BASIC.HYPERPOSING-SHARED.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [BASIC.HYPERPOSING-UNSHARED.06](https://logicmoo.org/public/mettareports/_133442.metta.html#BASIC.HYPERPOSING-UNSHARED.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://logicmoo.org/public/mettareports/_13354.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04](https://logicmoo.org/public/mettareports/_13356.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04) | (assertEqualToResult (match &self (:= ($color $who) T) ($who is really $color))) | ((Sam is really Green) (Tom is really White)) | ((Sam is really Green) (Tom is really White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06](https://logicmoo.org/public/mettareports/_134078.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06) | (assertEqual (get-type Either)) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19](https://logicmoo.org/public/mettareports/_135102.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19) | (assertEqualToResult (+ 1 (bin))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08](https://logicmoo.org/public/mettareports/_135616.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08) | (assertEqual ((curry-a + 2) 3)) | (5) | (5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02](https://logicmoo.org/public/mettareports/_135658.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02) | (assertEqualToResult (- 8 (/ 4 6.4))) | (7.375) | (7.375) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04](https://logicmoo.org/public/mettareports/_135774.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04) | (assertEqual (insert 1 (insert 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07](https://logicmoo.org/public/mettareports/_13634.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [COMMON.NUMTEST.06](https://logicmoo.org/public/mettareports/_136372.metta.html#COMMON.NUMTEST.06) | (assertEqual (approxEq 10 10.0001 1.0e-9)) | (False False False False False False False False) | (False) | | PASS | [NEW.TESTS3.03](https://logicmoo.org/public/mettareports/_13670.metta.html#NEW.TESTS3.03) | (assertEqualToResult (AddBeliefEvent (((doorAt &/ (^ open)) =/> Outside) (1.0 0.9)))) | () | () | | PASS | [CURRENT.TESTS3.03](https://logicmoo.org/public/mettareports/_13674.metta.html#CURRENT.TESTS3.03) | (assertEqualToResult (AddBeliefEvent (((doorAt &/ (^ open)) =/> Outside) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16](https://logicmoo.org/public/mettareports/_137190.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16) | (assertEqualToResult (dup 2)) | (102 102 102 102 12) | (12 102) | | FAIL | [EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.07](https://logicmoo.org/public/mettareports/_137334.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.07) | (assertEqualToResult (record synthesize ((: $term $type) (S Z)))) | ((⊷ synthesize ((: $_134986 $_134992) (S Z)) (synthesize (: $_134986 $_134992) (S Z)))) | (... (: f (-> Number String)) (: (. f h) (-> Bool String))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17](https://logicmoo.org/public/mettareports/_137448.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17) | (assertEqual (g 2)) | (102 102 102 102 102 102 102 102 102) | (102) | | PASS | [COMMON.ORDEREDSETTEST.07](https://logicmoo.org/public/mettareports/_137468.metta.html#COMMON.ORDEREDSETTEST.07) | (assertEqual (insert 1 ∅)) | ((:: 1 ∅)) | ((:: 1 ∅)) | | FAIL | [ITERATIVE-CHAINING.IFC-XP.05](https://logicmoo.org/public/mettareports/_13746.metta.html#ITERATIVE-CHAINING.IFC-XP.05) | (assertEqualToResult Test) | (Test) | ("=== Test Utility Functions ===") | | FAIL | [RESOLVE.R.08](https://logicmoo.org/public/mettareports/_137518.metta.html#RESOLVE.R.08) | (assertEqualToResult (match r::&self ($x content) $x)) | () | (some) | | PASS | [EXPERIMENTS.UNIFY-VIA-LET.03](https://logicmoo.org/public/mettareports/_137606.metta.html#EXPERIMENTS.UNIFY-VIA-LET.03) | (assertEqualToResult (let (Link A $y) (f $x) (Link $x $y))) | ((Link A B)) | ((Link A B)) | | FAIL | [NEW.TESTS3.06](https://logicmoo.org/public/mettareports/_137704.metta.html#NEW.TESTS3.06) | (assertEqual (GoalCycle (get-state ¤tTime))) | ((BestDecision 7 Nil ((Event (corridorIn (1.0 0.9)) (4 (4) (4 1.0))) (Event (((doorAt &/ (^ open)) =... | ((^ forward)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02](https://logicmoo.org/public/mettareports/_138132.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02) | (assertEqualToResult (- 8 (/ 4 6.4))) | (7.375) | (7.375) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03](https://logicmoo.org/public/mettareports/_138776.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03) | (assertEqualToResult (match &self (:= (Green $who) T) ($who is really green))) | ((Sam is really green)) | ((Sam is really green)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://logicmoo.org/public/mettareports/_138894.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $color color) $color)) | (red green blue) | (blue green red) | | PASS | [PREV.TESTS4.01](https://logicmoo.org/public/mettareports/_139052.metta.html#PREV.TESTS4.01) | (assertEqualToResult (AddBeliefEvent (({(garfield) } --> cat) (1.0 0.9)))) | () | () | | PASS | [METTA-MORPH-TESTS.TESTS0.07](https://logicmoo.org/public/mettareports/_139664.metta.html#METTA-MORPH-TESTS.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06](https://logicmoo.org/public/mettareports/_139680.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06) | (assertEqualToResult (shape)) | ((shape)) | ((shape)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16](https://logicmoo.org/public/mettareports/_139756.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16) | (assertEqualToResult (dup 2)) | (102 102 102 102 12) | (12 102) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://logicmoo.org/public/mettareports/_139848.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [SUBTYPING.SUBTYPING-TEST.02](https://logicmoo.org/public/mettareports/_1399942.metta.html#SUBTYPING.SUBTYPING-TEST.02) | (assertEqualToResult (synthesize (: (coerce $proof felix) Mammal) kb rb (fromNumber 1))) | ((: (coerce CM felix) Mammal)) | ((: (coerce CM felix) Mammal) (let* (((: felix Mammal) (synthesize (: felix Mammal) kb rb Z))) (: (coerce STRefl felix) Mammal))) | | PASS | [BACKWARD-CHAINING.BC-XP.33](https://logicmoo.org/public/mettareports/_140004.metta.html#BACKWARD-CHAINING.BC-XP.33) | (assertEqual (bc_em (→ B C) (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://logicmoo.org/public/mettareports/_140028.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://logicmoo.org/public/mettareports/_140034.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | () | () | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.33](https://logicmoo.org/public/mettareports/_140044.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.33) | (assertEqual (bc_em (→ B C) (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03](https://logicmoo.org/public/mettareports/_140076.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03) | (assertEqual (get-type (new-state 2))) | ((MonadicState Number)) | ((StateMonad Number)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.06](https://logicmoo.org/public/mettareports/_140124.metta.html#METTA-MORPH-TESTS.MATCH-VOID.06) | (assertEqualToResult (case (match &belief_events $1 $1) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://logicmoo.org/public/mettareports/_140356.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16](https://logicmoo.org/public/mettareports/_14106.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16) | (assertEqual (Green $who)) | (T) | (T) | | PASS | [MATCH.IMPLICATIONDIRECTINTRODUCTIONMATCHTEST.01](https://logicmoo.org/public/mettareports/_141084.metta.html#MATCH.IMPLICATIONDIRECTINTRODUCTIONMATCHTEST.01) | (assertEqualToResult (idi_induction_match &self)) | ((≞ (→ P Q) (ETV (insert 42 ) (idi_formula (Bl True) (Bl False) (STV 1 0))))) | ((≞ (→ P Q) (ETV (insert 42 ) (idi_formula (Bl True) (Bl False) (STV 1 0))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10](https://logicmoo.org/public/mettareports/_141146.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10) | (assertEqualToResult (== 2 3)) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10](https://logicmoo.org/public/mettareports/_141160.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10) | (assertEqualToResult (== 2 3)) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://logicmoo.org/public/mettareports/_14116.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10](https://logicmoo.org/public/mettareports/_141206.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10) | (assertEqualToResult (== 2 3)) | (False) | (False) | | PASS | [NEW.TESTS0.03](https://logicmoo.org/public/mettareports/_141390.metta.html#NEW.TESTS0.03) | (assertEqualToResult (|- (({(a b) } --> mwawa) (1.0 0.9)))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18](https://logicmoo.org/public/mettareports/_141412.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18) | (assertEqual (f 2)) | (103 103 103 103 103 103 103 103 103) | (103) | | FAIL | [NEW.TESTS3.07](https://logicmoo.org/public/mettareports/_141660.metta.html#NEW.TESTS3.07) | (assertEqual (AddGoalEvent (Outside (1.0 0.9)))) | () | ((^ open)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02](https://logicmoo.org/public/mettareports/_14172.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02) | (assertEqualToResult (expression without known equalities)) | ((expression without known equalities)) | ((expression without known equalities)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03](https://logicmoo.org/public/mettareports/_142086.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03) | (assertEqual (match &kb (, (Venus orbit $x au) (Mars orbit $y au)) (- $y $x))) | (0.8) | (0.8) | | PASS | [PREV.TESTS3.03](https://logicmoo.org/public/mettareports/_142238.metta.html#PREV.TESTS3.03) | (assertEqualToResult (AddBeliefEvent (((doorAt &/ (^ open)) =/> Outside) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10](https://logicmoo.org/public/mettareports/_142328.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10) | (assertEqualToResult (== 2 3)) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10](https://logicmoo.org/public/mettareports/_142342.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10) | (assertEqualToResult (== 2 3)) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://logicmoo.org/public/mettareports/_142570.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.04](https://logicmoo.org/public/mettareports/_142784.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.04) | (assertEqualToResult (range 1 1)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23](https://logicmoo.org/public/mettareports/_143288.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23) | (assertEqual (fmap-i (curry-a - 7) (Right 3))) | ((Right 4)) | ((Right 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10](https://logicmoo.org/public/mettareports/_143320.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10) | (assertEqual (is (air dry))) | ((start humidifier) (start kettle) (stop ventilation)) | ((stop ventilation) (start kettle) (start humidifier)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03](https://logicmoo.org/public/mettareports/_143668.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03) | (assertEqual (drop (Cons 2 (Cons 1 Nil)))) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://logicmoo.org/public/mettareports/_143884.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_140990)) | ((State 30)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03](https://logicmoo.org/public/mettareports/_143982.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03) | (assertEqualToResult (match &self (:= (Green $who) T) ($who is really green))) | ((Sam is really green)) | ((Sam is really green)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03](https://logicmoo.org/public/mettareports/_144272.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (active) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.05](https://logicmoo.org/public/mettareports/_144546.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.05) | (assertEqual (case (+ 1 5) (($x (+ 1 $x))))) | (7) | (7) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06](https://logicmoo.org/public/mettareports/_144730.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06) | (assertEqualToResult (shape)) | ((shape)) | ((shape)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06](https://logicmoo.org/public/mettareports/_145182.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06) | (assertEqual (get-type &state-token)) | ((StateMonad Expression)) | ((StateMonad Expression)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://logicmoo.org/public/mettareports/_14546.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | ((= (Human Sam) T)) | () | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.11](https://logicmoo.org/public/mettareports/_145490.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.11) | (assertEqualToResult (fc_eq (→ A B) kb_eq (fromNumber 2))) | ((→ A B) B C) | (B C (→ A B)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_145770.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HOL.NATPARITYTEST.13](https://logicmoo.org/public/mettareports/_145834.metta.html#HOL.NATPARITYTEST.13) | (assertEqualToResult (add-atom &kb (: double_base (=== (double Z) Z)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://logicmoo.org/public/mettareports/_145868.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01](https://logicmoo.org/public/mettareports/_146022.metta.html#HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01) | (assertEqualToResult (collapse (superpose ((superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (4 5 6 4 5 6 4 5 6 4 5... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 ... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9)) | | FAIL | [COMPILER.DEFINE-IF-LIKE.04](https://logicmoo.org/public/mettareports/_146110.metta.html#COMPILER.DEFINE-IF-LIKE.04) | (assertEqual (pass-or-fail-f)) | ((pass-or-fail-f)) | (:pass) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13](https://logicmoo.org/public/mettareports/_146388.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13) | (assertEqualToResult (get-type (Cons 5 (Cons "6" Nil)))) | ((List Number)) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03](https://logicmoo.org/public/mettareports/_146536.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (active) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10](https://logicmoo.org/public/mettareports/_146934.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10) | (assertEqual (is (air dry))) | ((start humidifier) (start kettle) (stop ventilation)) | ((stop ventilation) (start kettle) (start humidifier)) | | PASS | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.04](https://logicmoo.org/public/mettareports/_147600.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.04) | (assertEqualToResult (synthesize (: $proof (≞ (→ P R) $tv)) kb rb (S Z))) | ((: (Deduction Pm Qm Rm PQm QRm) (≞ (→ P R) (deduction-formula (STV 0.5 0.1) (STV 0.6 0.2) (STV ... | ((: (Deduction Pm Qm Rm PQm QRm) (≞ (→ P R) (STV 0.8 0.1))) (let* (((: $_22214 (≞ (→ P P) (STV $_22280 $_22298))) (synthesize (: $_22214 (≞ (→ P P) (STV $_22280 $_22298))) kb rb Z)) ((: $_22442 (≞ (→ P R) (STV $_22508 $_22526))) (synthesize (: $_22442 (≞ (→ P R) (STV $_22508 $_22526))) kb rb Z))) (: (Deduction Pm Pm Rm $_22214 $_22442) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.5) 1) 0.5)) 1 (/ (- (+ 0.5 0.5) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.5) 1) 0.5)) 1 (/ (- (+ 0.5 0.5) 1) 0.5))) $_22280) (<= $_22280 (if (> 0 (if (< 1 (/ 0.5 0.5)) 1 (/ 0.5 0.5))) 0 (if (< 1 (/ 0.5 0.5)) 1 (/ 0.5 0.5)))))) (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) $_22508) (<= $_22508 (if (> 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5))) 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5))))))) (STV (if (< 0.9999 0.5) 0.7 (+ (* $_22280 $_22508) (/ (* (- 1 $_22280) (- 0.7 (* 0.5 $_22508))) (- 1 0.5)))) (min 0.1 (min 0.1 (min 0.3 (min $_22298 $_22526))))) (STV 1 0))))) (let* (((: $_22214 (≞ (→ P R) (STV $_22280 $_22298))) (synthesize (: $_22214 (≞ (→ P R) (STV $_22280 $_22298))) kb rb Z)) ((: $_22442 (≞ (→ R R) (STV $_22508 $_22526))) (synthesize (: $_22442 (≞ (→ R R) (STV $_22508 $_22526))) kb rb Z))) (: (Deduction Pm Rm Rm $_22214 $_22442) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) $_22280) (<= $_22280 (if (> 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5))) 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5)))))) (and (< 0 0.7) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.7 0.7) 1) 0.7)) 1 (/ (- (+ 0.7 0.7) 1) 0.7))) 0 (if (< 1 (/ (- (+ 0.7 0.7) 1) 0.7)) 1 (/ (- (+ 0.7 0.7) 1) 0.7))) $_22508) (<= $_22508 (if (> 0 (if (< 1 (/ 0.7 0.7)) 1 (/ 0.7 0.7))) 0 (if (< 1 (/ 0.7 0.7)) 1 (/ 0.7 0.7))))))) (STV (if (< 0.9999 0.7) 0.7 (+ (* $_22280 $_22508) (/ (* (- 1 $_22280) (- 0.7 (* 0.7 $_22508))) (- 1 0.7)))) (min 0.1 (min 0.3 (min 0.3 (min $_22298 $_22526))))) (STV 1 0))))) (let* (((: $_22214 (≞ (→ P (→ P Q)) (STV $_22280 $_22298))) (synthesize (: $_22214 (≞ (→ P (→ P Q)) (STV $_22280 $_22298))) kb rb Z)) ((: $_22442 (≞ (→ (→ P Q) R) (STV $_22508 $_22526))) (synthesize (: $_22442 (≞ (→ (→ P Q) R) (STV $_22508 $_22526))) kb rb Z))) (: (Deduction Pm PQm Rm $_22214 $_22442) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.8) 1) 0.5)) 1 (/ (- (+ 0.5 0.8) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.8) 1) 0.5)) 1 (/ (- (+ 0.5 0.8) 1) 0.5))) $_22280) (<= $_22280 (if (> 0 (if (< 1 (/ 0.8 0.5)) 1 (/ 0.8 0.5))) 0 (if (< 1 (/ 0.8 0.5)) 1 (/ 0.8 0.5)))))) (and (< 0 0.8) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.8 0.7) 1) 0.8)) 1 (/ (- (+ 0.8 0.7) 1) 0.8))) 0 (if (< 1 (/ (- (+ 0.8 0.7) 1) 0.8)) 1 (/ (- (+ 0.8 0.7) 1) 0.8))) $_22508) (<= $_22508 (if (> 0 (if (< 1 (/ 0.7 0.8)) 1 (/ 0.7 0.8))) 0 (if (< 1 (/ 0.7 0.8)) 1 (/ 0.7 0.8))))))) (STV (if (< 0.9999 0.8) 0.7 (+ (* $_22280 $_22508) (/ (* (- 1 $_22280) (- 0.7 (* 0.8 $_22508))) (- 1 0.8)))) (min 0.1 (min 0.4 (min 0.3 (min $_22298 $_22526))))) (STV 1 0))))) (let* (((: $_22214 (≞ (→ P (→ Q R)) (STV $_22280 $_22298))) (synthesize (: $_22214 (≞ (→ P (→ Q R)) (STV $_22280 $_22298))) kb rb Z)) ((: $_22442 (≞ (→ (→ Q R) R) (STV $_22508 $_22526))) (synthesize (: $_22442 (≞ (→ (→ Q R) R) (STV $_22508 $_22526))) kb rb Z))) (: (Deduction Pm QRm Rm $_22214 $_22442) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.9) 1) 0.5)) 1 (/ (- (+ 0.5 0.9) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.9) 1) 0.5)) 1 (/ (- (+ 0.5 0.9) 1) 0.5))) $_22280) (<= $_22280 (if (> 0 (if (< 1 (/ 0.9 0.5)) 1 (/ 0.9 0.5))) 0 (if (< 1 (/ 0.9 0.5)) 1 (/ 0.9 0.5)))))) (and (< 0 0.9) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.9 0.7) 1) 0.9)) 1 (/ (- (+ 0.9 0.7) 1) 0.9))) 0 (if (< 1 (/ (- (+ 0.9 0.7) 1) 0.9)) 1 (/ (- (+ 0.9 0.7) 1) 0.9))) $_22508) (<= $_22508 (if (> 0 (if (< 1 (/ 0.7 0.9)) 1 (/ 0.7 0.9))) 0 (if (< 1 (/ 0.7 0.9)) 1 (/ 0.7 0.9))))))) (STV (if (< 0.9999 0.9) 0.7 (+ (* $_22280 $_22508) (/ (* (- 1 $_22280) (- 0.7 (* 0.9 $_22508))) (- 1 0.9)))) (min 0.1 (min 0.5 (min 0.3 (min $_22298 $_22526))))) (STV 1 0)))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05](https://logicmoo.org/public/mettareports/_147924.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05) | (assertEqual (get-type (= (Mortal Socrates) (Mortal Plato)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05](https://logicmoo.org/public/mettareports/_147926.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05) | (assertEqual (get-type (= (Mortal Socrates) (Mortal Plato)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05](https://logicmoo.org/public/mettareports/_147938.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05) | (assertEqual (get-type (= (Mortal Socrates) (Mortal Plato)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05](https://logicmoo.org/public/mettareports/_147940.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05) | (assertEqual (get-type (= (Mortal Socrates) (Mortal Plato)))) | (Type) | (Type) | | PASS | [NARS-V0.TESTS4.02](https://logicmoo.org/public/mettareports/_147954.metta.html#NARS-V0.TESTS4.02) | (assertEqualToResult (AddBeliefEvent (((cat * sky) --> like) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02](https://logicmoo.org/public/mettareports/_14862.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02) | (assertEqualToResult (expression without known equalities)) | ((expression without known equalities)) | ((expression without known equalities)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/_14872.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_2742 2))) | ((> 4 (+ $_2742 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02](https://logicmoo.org/public/mettareports/_14876.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02) | (assertEqualToResult (expression without known equalities)) | ((expression without known equalities)) | ((expression without known equalities)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.06](https://logicmoo.org/public/mettareports/_148826.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.06) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.09](https://logicmoo.org/public/mettareports/_148848.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.09) | (assertEqualToResult (superpose ())) | () | () | | FAIL | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.10](https://logicmoo.org/public/mettareports/_148874.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.10) | (assertEqualToResult (synthesize (: $proof (⍃ (fromNumber 2) (fromNumber 3))) kb rb (fromNumber 2))) | () | ((: (SuccMonotonicity (SuccMonotonicity ZeroLTSucc)) (⍃ (S (S Z)) (S (S (S Z)))))) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_149036.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04](https://logicmoo.org/public/mettareports/_149074.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04) | (assertEqual (Add Z (S Z))) | ((S Z)) | ((S Z)) | | PASS | [DEPENDENT-TYPES.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONDTLTEST.01](https://logicmoo.org/public/mettareports/_1490874.metta.html#DEPENDENT-TYPES.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONDTLTEST.01) | (assertEqualToResult deduction_idi_prf) | (deduction_idi_prf) | (deduction_idi_prf) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11](https://logicmoo.org/public/mettareports/_149396.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11) | (assertEqual ((is-socrates) Human)) | (True) | (True) | | FAIL | [CONTAINERS-ARE-SPACES.05-MATCH-SUPERPOSE-ELEMENT-LIKE-SPACE.02](https://logicmoo.org/public/mettareports/_149404.metta.html#CONTAINERS-ARE-SPACES.05-MATCH-SUPERPOSE-ELEMENT-LIKE-SPACE.02) | (assertEqual (match (kb) ($rel A_Each $x) ($rel $x))) | () | ((SS-P_Each B_Each) (SS-Q_Each C_Each)) | | PASS | [CURRENT.TESTS0.02](https://logicmoo.org/public/mettareports/_149414.metta.html#CURRENT.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://logicmoo.org/public/mettareports/_149712.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19](https://logicmoo.org/public/mettareports/_149860.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19) | (assertEqual (let $r (Add (S Z) Z) (match &self (= (eq $r (S Z)) $tv) $tv))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10](https://logicmoo.org/public/mettareports/_150128.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10) | (assertEqual (f 2)) | (103) | (103) | | FAIL | [HOL.NATSTANDALONETEST.12](https://logicmoo.org/public/mettareports/_150326.metta.html#HOL.NATSTANDALONETEST.12) | (assertEqualToResult (bc (: $prf (plusRightId Z)) (fromNumber 4))) | ((: ((Replace0 (Sym plusRightIdProp)) plusBase) (plusRightId Z)) (: ((Replace0 (Sym plusRightIdProp)... | ((: ((Replace0 plusBase) ((Replace0 (Sym plusBase)) ((Replace0 (Sym plusRightIdProp)) plusBase))) (plusRightId Z)) (: ((Replace0 (Sym plusRightIdProp)) plusBase) (plusRightId Z)) (: ((Replace0 (Sym plusRightIdProp)) ((Trans (Sym plusBase)) ((Trans plusBase) plusBase))) (plusRightId Z)) (: ((Replace0 ((Trans plusBase) (Sym plusRightIdProp))) ((Replace0 (Sym plusBase)) plusBase)) (plusRightId Z)) (: ((Replace0 ((Trans plusRightIdProp) (Sym plusRightIdProp))) ((Replace0 (Sym plusRightIdProp)) plusBase)) (plusRightId Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08](https://logicmoo.org/public/mettareports/_150948.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08) | (assertEqual (find-equal (color) (foo))) | (red) | (red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10](https://logicmoo.org/public/mettareports/_151686.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10) | (assertEqual (f 2)) | (103) | (103) | | PASS | [BACKWARD-CHAINING.BC-XP.29](https://logicmoo.org/public/mettareports/_152004.metta.html#BACKWARD-CHAINING.BC-XP.29) | (assertEqual (bc_em A Z)) | (A) | (A) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.29](https://logicmoo.org/public/mettareports/_152020.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.29) | (assertEqual (bc_em A Z)) | (A) | (A) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_152084.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.02) | (assertEqual (bc (: $_2954 B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03](https://logicmoo.org/public/mettareports/_15214.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03) | (assertEqualToResult (match &self (:= (S K K x) $r) (match &self (:= $r $r2) $r2))) | (x) | (x) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.11](https://logicmoo.org/public/mettareports/_152234.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.11) | (assertEqualToResult (add-atom &kb (: ND (≼ Nov Dec)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05](https://logicmoo.org/public/mettareports/_152298.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05) | (assertEqual (TV (green Fritz))) | ((stv 0.7047 0.68)) | ((stv 0.7047 0.68)) | | FAIL | [DEPENDENT-TYPES.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONDTLTEST.02](https://logicmoo.org/public/mettareports/_1527480.metta.html#DEPENDENT-TYPES.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONDTLTEST.02) | (assertEqualToResult (get-type deduction_idi_prf)) | () | ((≞ (→ P Q) $_1517510)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03](https://logicmoo.org/public/mettareports/_152748.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03) | (assertEqual (match &kb (, (Venus orbit $x au) (Mars orbit $y au)) (- $y $x))) | (0.8) | (0.8) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03](https://logicmoo.org/public/mettareports/_152762.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03) | (assertEqual (match &kb (, (Venus orbit $x au) (Mars orbit $y au)) (- $y $x))) | (0.8) | (0.8) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.08](https://logicmoo.org/public/mettareports/_152900.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.08) | (assertEqualToResult (add-atom &kb (: AS (≼ Aug Sep)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07](https://logicmoo.org/public/mettareports/_153222.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04](https://logicmoo.org/public/mettareports/_153500.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04) | (assertEqual (Something? (Add (S Z) (S Z)))) | ((Something? (S (S Z)))) | ((Something? (S (S Z)))) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.05](https://logicmoo.org/public/mettareports/_153566.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.05) | (assertEqualToResult (add-atom &kb (: MJ (≼ May Jun)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04](https://logicmoo.org/public/mettareports/_153688.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04) | (assertEqual (TV (frog Fritz))) | ((stv 0.783 0.68)) | ((stv 0.783 0.68)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05](https://logicmoo.org/public/mettareports/_153774.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05) | (assertEqual (superpose ((P_AS B_AS) (Q_AS C_AS)))) | ((P_AS B_AS) (Q_AS C_AS)) | ((P_AS B_AS) (Q_AS C_AS)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.01](https://logicmoo.org/public/mettareports/_153848.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.01) | (assertEqual (get-closed-proof (bc &ctl-depth-kb depth-updater depth-updater depth-terminator (fromNumber 1) (: $prf (Terminate Z))))) | (TerminateZ) | (TerminateZ) | | PASS | [BASIC.KEY-LOOKUPS-MANY.06](https://logicmoo.org/public/mettareports/_153890.metta.html#BASIC.KEY-LOOKUPS-MANY.06) | (assertEqual (let $v (new-state v-5) (match &data (= (get-data $k) $v) $k))) | (k-5) | (k-5) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.02](https://logicmoo.org/public/mettareports/_154022.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.02) | (assertEqualToResult (add-atom &kb (: FM (≼ Feb Mar)))) | () | (()) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.13](https://logicmoo.org/public/mettareports/_154234.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.13) | (assertEqualToResult (synthesize (functions) (fromNumber 2))) | ((Cons (. f f) (Cons (. f g) (Cons (. g f) (Cons (. g g) Nil))))) | ((Cons (. f f) (Cons (. f g) (Cons (. g f) (Cons (. g g) Nil))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03](https://logicmoo.org/public/mettareports/_154320.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03) | (assertEqualToResult (match &self (:= (Green $who) T) ($who is really green))) | ((Sam is really green)) | ((Sam is really green)) | | PASS | [ITERATIVE-CHAINING.IBC-XP.17](https://logicmoo.org/public/mettareports/_154602.metta.html#ITERATIVE-CHAINING.IBC-XP.17) | (assertEqualToResult (add-atom-nodup &space-test A)) | () | (()) | | PASS | [JOHN-CARRY-FLOWER.JOHN-CARRY-FLOWER-TEST.01](https://logicmoo.org/public/mettareports/_15464.metta.html#JOHN-CARRY-FLOWER.JOHN-CARRY-FLOWER-TEST.01) | (assertEqualToResult (match &kb $x (add-atom &labelled-kb (: (WitnessOf $x) $x)))) | () | (()) | | PASS | [NARS-V0.TESTS3.04](https://logicmoo.org/public/mettareports/_155000.metta.html#NARS-V0.TESTS3.04) | (assertEqualToResult (AddBeliefEvent (corridorIn (1.0 0.9)))) | () | () | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_155668.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.01) | (assertEqualToResult (add-atom &kb (: a A))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05](https://logicmoo.org/public/mettareports/_156030.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05) | (assertEqual (explain (Evaluation (mortal Plato)))) | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato... | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato))))) | | FAIL | [DEPENDENT-TYPES.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONDTLTEST.03](https://logicmoo.org/public/mettareports/_1564550.metta.html#DEPENDENT-TYPES.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONDTLTEST.03) | (assertEqualToResult =====) | (=====) | ("===== Prove that P→Q based on one piece of evidence =====") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22](https://logicmoo.org/public/mettareports/_156456.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22) | (assertEqualToResult (fact 5)) | (120) | (120) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18](https://logicmoo.org/public/mettareports/_156498.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18) | (assertEqual (f 2)) | (103 103 103 103 103 103 103 103 103) | (103) | | PASS | [HOL.NATSIMPLETEST~OLD.01](https://logicmoo.org/public/mettareports/_1565080.metta.html#HOL.NATSIMPLETEST~OLD.01) | (assertEqualToResult (synthesize (: $proof (=== (plus Z $y) $y)) kb rb Z)) | ((: Base_plus (=== (plus Z $_1534044) $_1534044))) | ((: Base_plus (=== (plus Z $_1534044) $_1534044))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03](https://logicmoo.org/public/mettareports/_157272.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03) | (assertEqual (match &kb (, (Venus orbit $x au) (Mars orbit $y au)) (- $y $x))) | (0.8) | (0.8) | | PASS | [BASIC.STATE-TYPES.21](https://logicmoo.org/public/mettareports/_157492.metta.html#BASIC.STATE-TYPES.21) | (assertEqualToResult ("(get-type &is_left)=" &is_left (get-type &is_left))) | (("(get-type &is_left)=" False Bool)) | (("(get-type &is_left)=" False Bool)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.15](https://logicmoo.org/public/mettareports/_158034.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.15) | (assertEqualToResult (superpose ((Rel-P B) (Rel-Q C)))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03](https://logicmoo.org/public/mettareports/_158102.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03) | (assertEqualToResult (% 21 17)) | (4) | (4) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04](https://logicmoo.org/public/mettareports/_158102.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04) | (assertEqual (insert 1 (insert 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07](https://logicmoo.org/public/mettareports/_158602.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [ITERATIVE-CHAINING.IBC-XP.11](https://logicmoo.org/public/mettareports/_158608.metta.html#ITERATIVE-CHAINING.IBC-XP.11) | (assertEqual (syn (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [COMPILER.00A-LANG-COMPILED-CASE.01](https://logicmoo.org/public/mettareports/_158970.metta.html#COMPILER.00A-LANG-COMPILED-CASE.01) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [COMPARISONS.ADD-ATOM-NAIVE-FIB.09](https://logicmoo.org/public/mettareports/_159020.metta.html#COMPARISONS.ADD-ATOM-NAIVE-FIB.09) | (assertEqualToResult (eval-in-space &other (fib 50))) | ((eval-in-space &other (fib 50))) | ((eval-in-space GroundingSpace-0x55d27822e408 (fib 50))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04](https://logicmoo.org/public/mettareports/_159028.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04) | (assertEqual (Something? (Add (S Z) (S Z)))) | ((Something? (S (S Z)))) | ((Something? (S (S Z)))) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_159030.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [PREV.TESTS3.02](https://logicmoo.org/public/mettareports/_159094.metta.html#PREV.TESTS3.02) | (assertEqualToResult (AddBeliefEvent (((windowAt &/ (^ open)) =/> Outside) (1.0 0.9)))) | () | () | | PASS | [HOL.NATSIMPLETEST.01](https://logicmoo.org/public/mettareports/_1592832.metta.html#HOL.NATSIMPLETEST.01) | (assertEqualToResult (synthesize (: $proof (=== (plus Z $y) $y)) kb rb Z)) | ((: Base_plus (=== (plus Z $_1561804) $_1561804))) | ((: Base_plus (=== (plus Z $_1561804) $_1561804))) | | PASS | [COMMON.LISTTEST.02](https://logicmoo.org/public/mettareports/_159534.metta.html#COMMON.LISTTEST.02) | (assertEqualToResult (insert 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_159566.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17](https://logicmoo.org/public/mettareports/_159592.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17) | (assertEqual (g 2)) | (102 102 102 102 102 102 102 102 102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04](https://logicmoo.org/public/mettareports/_159718.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04) | (assertEqual (Something? (Add (S Z) (S Z)))) | ((Something? (S (S Z)))) | ((Something? (S (S Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04](https://logicmoo.org/public/mettareports/_159732.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04) | (assertEqual (Something? (Add (S Z) (S Z)))) | ((Something? (S (S Z)))) | ((Something? (S (S Z)))) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.02](https://logicmoo.org/public/mettareports/_159748.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.02) | (assertEqual (:? (HumansAreMortal SocratesIsHuman))) | () | ((Mortal Socrates)) | | PASS | [HOL.NATPARITYTEST.09](https://logicmoo.org/public/mettareports/_159900.metta.html#HOL.NATPARITYTEST.09) | (assertEqualToResult (add-atom &kb (: Sym (-> (: $prf (=== $x $y)) (=== $y $x))))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23](https://logicmoo.org/public/mettareports/_159972.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23) | (assertEqual (eqa (Add Z Z) (Add Z Z))) | (T) | (T) | | FAIL | [SYNTHESIS.UNIFYTEST.01](https://logicmoo.org/public/mettareports/_160060.metta.html#SYNTHESIS.UNIFYTEST.01) | (assertEqualToResult (unify (Link $x B) (Link A $y) (Link $x $y))) | ((Link A $_157794)) | ((Link A B)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.40](https://logicmoo.org/public/mettareports/_161280.metta.html#ITERATIVE-CHAINING.IFC-XP.40) | (assertEqualToResult (get-atoms &kb)) | ((: ab (→ A B)) (: bc (→ B C)) (: a A) (: (ModusPonens ab a) B)) | ((: a A) (: ab (→ A B)) (: bc (→ B C)) (: (ModusPonens ab a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08](https://logicmoo.org/public/mettareports/_161332.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08) | (assertEqual (find-equal (color) (foo))) | (red) | (red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://logicmoo.org/public/mettareports/_161386.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://logicmoo.org/public/mettareports/_16146.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $1 $1)) | (1 2) | (1 2) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.09](https://logicmoo.org/public/mettareports/_161658.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.09) | (assertEqualToResult (add-atom &kb (: SO (≼ Sep Oct)))) | (True) | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://logicmoo.org/public/mettareports/_161906.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04](https://logicmoo.org/public/mettareports/_161966.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04) | (assertEqualToResult (match &self (:= ($color $who) T) ($who is really $color))) | ((Sam is really Green) (Tom is really White)) | ((Sam is really Green) (Tom is really White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08](https://logicmoo.org/public/mettareports/_162032.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | PASS | [COMPARISONS.ADD-ATOM-NAIVE-FIB.02](https://logicmoo.org/public/mettareports/_162092.metta.html#COMPARISONS.ADD-ATOM-NAIVE-FIB.02) | (assertEqualToResult (add-atom &other (= (fib $n) (if (== $n 0) 0 (if (== $n 1) 1 (+ (fib (- $n 1)) (fib (- $n 2)))))))) | () | (()) | | FAIL | [BACKWARD-CHAINING.BC-XP.35](https://logicmoo.org/public/mettareports/_162098.metta.html#BACKWARD-CHAINING.BC-XP.35) | (assertEqualToResult ===) | (===) | ("=== DTL Equality Match ===") | | FAIL | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.35](https://logicmoo.org/public/mettareports/_162122.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.35) | (assertEqualToResult ===) | (===) | ("=== DTL Equality Match ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19](https://logicmoo.org/public/mettareports/_162308.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19) | (assertEqualToResult (+ 1 (bin))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19](https://logicmoo.org/public/mettareports/_162314.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19) | (assertEqualToResult (+ 1 (bin))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05](https://logicmoo.org/public/mettareports/_162398.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05) | (assertEqualToResult (and (> 4 2) (< 4 3))) | (False) | (False) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.11](https://logicmoo.org/public/mettareports/_162400.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.11) | (assertEqualToResult (prodWith . (Cons f Nil) (Cons g Nil))) | ((Cons (. f g) Nil)) | ((Cons (. f g) Nil)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03](https://logicmoo.org/public/mettareports/_162432.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03) | (assertEqual (color)) | (green yellow red) | (red yellow green) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.14](https://logicmoo.org/public/mettareports/_162870.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.14) | (assertEqualToResult (add-atom &kb (: JPA (≼ Jan $x)))) | () | (()) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.10](https://logicmoo.org/public/mettareports/_163056.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.10) | (assertEqual (:? (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | () | (Type) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03](https://logicmoo.org/public/mettareports/_163242.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03) | (assertEqual (get-type (new-state 2))) | ((MonadicState Number)) | ((StateMonad Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://logicmoo.org/public/mettareports/_163358.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | (T) | | PASS | [FORWARD-CHAINING.FC-XP.24](https://logicmoo.org/public/mettareports/_163380.metta.html#FORWARD-CHAINING.FC-XP.24) | (assertEqualToResult (add-atom &kb_em A)) | () | (()) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.24](https://logicmoo.org/public/mettareports/_163430.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.24) | (assertEqualToResult (add-atom &kb_em A)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21](https://logicmoo.org/public/mettareports/_163478.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC "5")))) | () | () | | FAIL | [DEPENDENT-TYPES.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONDTLTEST.05](https://logicmoo.org/public/mettareports/_1637376.metta.html#DEPENDENT-TYPES.DEDUCTIONIMPLICATIONDIRECTINTRODUCTIONDTLTEST.05) | (assertEqualToResult Prove) | (Prove) | ("===== Prove that P→Q based on two pieces of evidence =====") | | PASS | [COMMON.ORDEREDSETTEST.03](https://logicmoo.org/public/mettareports/_163846.metta.html#COMMON.ORDEREDSETTEST.03) | (assertEqual (elem 1 (insert 2 ∅))) | (False) | (False) | | PASS | [COMMON.MAYBETEST.03](https://logicmoo.org/public/mettareports/_163854.metta.html#COMMON.MAYBETEST.03) | (assertEqualToResult (Maybe< Nothing (Just 10))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03](https://logicmoo.org/public/mettareports/_16396.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03) | (assertEqualToResult (match &self (:= (S K K x) $r) (match &self (:= $r $r2) $r2))) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03](https://logicmoo.org/public/mettareports/_164068.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03) | (assertEqual (color)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05](https://logicmoo.org/public/mettareports/_164396.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05) | (assertEqual (Add Something Z)) | (Something) | (Something) | | PASS | [ITERATIVE-CHAINING.IBC-XP.02](https://logicmoo.org/public/mettareports/_164474.metta.html#ITERATIVE-CHAINING.IBC-XP.02) | (assertEqualToResult (add-atom &kb (: bc (→ B C)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08](https://logicmoo.org/public/mettareports/_164818.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19](https://logicmoo.org/public/mettareports/_164906.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19) | (assertEqualToResult (+ 1 (bin))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19](https://logicmoo.org/public/mettareports/_164920.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19) | (assertEqualToResult (+ 1 (bin))) | (1 2) | (1 2) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03](https://logicmoo.org/public/mettareports/_165108.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03) | (assertEqual (get-type (new-state 2))) | ((MonadicState Number)) | ((StateMonad Number)) | | PASS | [PREV.TESTS4.02](https://logicmoo.org/public/mettareports/_165268.metta.html#PREV.TESTS4.02) | (assertEqualToResult (AddBeliefEvent (((cat * sky) --> like) (1.0 0.9)))) | () | () | | PASS | [BACKWARD-CHAINING.BC-XP.45](https://logicmoo.org/public/mettareports/_165672.metta.html#BACKWARD-CHAINING.BC-XP.45) | (assertEqual (bc_dem (: $prf (→ A C)) (fromNumber 2))) | ((: (Deduction ab bc) (→ A C))) | ((: (Deduction ab bc) (→ A C))) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.45](https://logicmoo.org/public/mettareports/_165680.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.45) | (assertEqual (bc_dem (: $prf (→ A C)) (fromNumber 2))) | ((: (Deduction ab bc) (→ A C))) | ((: (Deduction ab bc) (→ A C))) | | PASS | [RESOLVE.R.09](https://logicmoo.org/public/mettareports/_165944.metta.html#RESOLVE.R.09) | (assertEqualToResult r::content) | (r::content) | (r::content) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03](https://logicmoo.org/public/mettareports/_16596.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03) | (assertEqualToResult (match &self (, (Frog $x) (implies (Frog $x) $y)) $y)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.04](https://logicmoo.org/public/mettareports/_166396.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.04) | (assertEqualToResult (synthesize (: $proof (≞ (→ P R) $tv)) kb rb (S Z))) | ((: (Deduction Pm Qm Rm PQm QRm) (≞ (→ P R) (deduction-formula (STV 0.5 0.1) (STV 0.6 0.2) (STV ... | ((: (Deduction Pm Qm Rm PQm QRm) (≞ (→ P R) (STV 0.8 0.1))) (let* (((: $_22214 (≞ (→ P P) (STV $_22280 $_22298))) (synthesize (: $_22214 (≞ (→ P P) (STV $_22280 $_22298))) kb rb Z)) ((: $_22442 (≞ (→ P R) (STV $_22508 $_22526))) (synthesize (: $_22442 (≞ (→ P R) (STV $_22508 $_22526))) kb rb Z))) (: (Deduction Pm Pm Rm $_22214 $_22442) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.5) 1) 0.5)) 1 (/ (- (+ 0.5 0.5) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.5) 1) 0.5)) 1 (/ (- (+ 0.5 0.5) 1) 0.5))) $_22280) (<= $_22280 (if (> 0 (if (< 1 (/ 0.5 0.5)) 1 (/ 0.5 0.5))) 0 (if (< 1 (/ 0.5 0.5)) 1 (/ 0.5 0.5)))))) (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) $_22508) (<= $_22508 (if (> 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5))) 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5))))))) (STV (if (< 0.9999 0.5) 0.7 (+ (* $_22280 $_22508) (/ (* (- 1 $_22280) (- 0.7 (* 0.5 $_22508))) (- 1 0.5)))) (min 0.1 (min 0.1 (min 0.3 (min $_22298 $_22526))))) (STV 1 0))))) (let* (((: $_22214 (≞ (→ P R) (STV $_22280 $_22298))) (synthesize (: $_22214 (≞ (→ P R) (STV $_22280 $_22298))) kb rb Z)) ((: $_22442 (≞ (→ R R) (STV $_22508 $_22526))) (synthesize (: $_22442 (≞ (→ R R) (STV $_22508 $_22526))) kb rb Z))) (: (Deduction Pm Rm Rm $_22214 $_22442) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) $_22280) (<= $_22280 (if (> 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5))) 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5)))))) (and (< 0 0.7) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.7 0.7) 1) 0.7)) 1 (/ (- (+ 0.7 0.7) 1) 0.7))) 0 (if (< 1 (/ (- (+ 0.7 0.7) 1) 0.7)) 1 (/ (- (+ 0.7 0.7) 1) 0.7))) $_22508) (<= $_22508 (if (> 0 (if (< 1 (/ 0.7 0.7)) 1 (/ 0.7 0.7))) 0 (if (< 1 (/ 0.7 0.7)) 1 (/ 0.7 0.7))))))) (STV (if (< 0.9999 0.7) 0.7 (+ (* $_22280 $_22508) (/ (* (- 1 $_22280) (- 0.7 (* 0.7 $_22508))) (- 1 0.7)))) (min 0.1 (min 0.3 (min 0.3 (min $_22298 $_22526))))) (STV 1 0))))) (let* (((: $_22214 (≞ (→ P (→ P Q)) (STV $_22280 $_22298))) (synthesize (: $_22214 (≞ (→ P (→ P Q)) (STV $_22280 $_22298))) kb rb Z)) ((: $_22442 (≞ (→ (→ P Q) R) (STV $_22508 $_22526))) (synthesize (: $_22442 (≞ (→ (→ P Q) R) (STV $_22508 $_22526))) kb rb Z))) (: (Deduction Pm PQm Rm $_22214 $_22442) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.8) 1) 0.5)) 1 (/ (- (+ 0.5 0.8) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.8) 1) 0.5)) 1 (/ (- (+ 0.5 0.8) 1) 0.5))) $_22280) (<= $_22280 (if (> 0 (if (< 1 (/ 0.8 0.5)) 1 (/ 0.8 0.5))) 0 (if (< 1 (/ 0.8 0.5)) 1 (/ 0.8 0.5)))))) (and (< 0 0.8) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.8 0.7) 1) 0.8)) 1 (/ (- (+ 0.8 0.7) 1) 0.8))) 0 (if (< 1 (/ (- (+ 0.8 0.7) 1) 0.8)) 1 (/ (- (+ 0.8 0.7) 1) 0.8))) $_22508) (<= $_22508 (if (> 0 (if (< 1 (/ 0.7 0.8)) 1 (/ 0.7 0.8))) 0 (if (< 1 (/ 0.7 0.8)) 1 (/ 0.7 0.8))))))) (STV (if (< 0.9999 0.8) 0.7 (+ (* $_22280 $_22508) (/ (* (- 1 $_22280) (- 0.7 (* 0.8 $_22508))) (- 1 0.8)))) (min 0.1 (min 0.4 (min 0.3 (min $_22298 $_22526))))) (STV 1 0))))) (let* (((: $_22214 (≞ (→ P (→ Q R)) (STV $_22280 $_22298))) (synthesize (: $_22214 (≞ (→ P (→ Q R)) (STV $_22280 $_22298))) kb rb Z)) ((: $_22442 (≞ (→ (→ Q R) R) (STV $_22508 $_22526))) (synthesize (: $_22442 (≞ (→ (→ Q R) R) (STV $_22508 $_22526))) kb rb Z))) (: (Deduction Pm QRm Rm $_22214 $_22442) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.9) 1) 0.5)) 1 (/ (- (+ 0.5 0.9) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.9) 1) 0.5)) 1 (/ (- (+ 0.5 0.9) 1) 0.5))) $_22280) (<= $_22280 (if (> 0 (if (< 1 (/ 0.9 0.5)) 1 (/ 0.9 0.5))) 0 (if (< 1 (/ 0.9 0.5)) 1 (/ 0.9 0.5)))))) (and (< 0 0.9) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.9 0.7) 1) 0.9)) 1 (/ (- (+ 0.9 0.7) 1) 0.9))) 0 (if (< 1 (/ (- (+ 0.9 0.7) 1) 0.9)) 1 (/ (- (+ 0.9 0.7) 1) 0.9))) $_22508) (<= $_22508 (if (> 0 (if (< 1 (/ 0.7 0.9)) 1 (/ 0.7 0.9))) 0 (if (< 1 (/ 0.7 0.9)) 1 (/ 0.7 0.9))))))) (STV (if (< 0.9999 0.9) 0.7 (+ (* $_22280 $_22508) (/ (* (- 1 $_22280) (- 0.7 (* 0.9 $_22508))) (- 1 0.9)))) (min 0.1 (min 0.5 (min 0.3 (min $_22298 $_22526))))) (STV 1 0)))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06](https://logicmoo.org/public/mettareports/_166434.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06) | (assertEqual (get-type Either)) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06](https://logicmoo.org/public/mettareports/_166448.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06) | (assertEqual (get-type Either)) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04](https://logicmoo.org/public/mettareports/_166496.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04) | (assertEqualToResult (nop (change-state! &state-active inactive))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06](https://logicmoo.org/public/mettareports/_166574.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06) | (assertEqual (get-type ((curry-a + 2) 3))) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06](https://logicmoo.org/public/mettareports/_166588.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06) | (assertEqual (get-type ((curry-a + 2) 3))) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06](https://logicmoo.org/public/mettareports/_166602.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06) | (assertEqual (get-type ((curry-a + 2) 3))) | (Number) | (Number) | | PASS | [BACKWARD-CHAINING.BC-XP.04](https://logicmoo.org/public/mettareports/_166714.metta.html#BACKWARD-CHAINING.BC-XP.04) | (assertEqual (bc_bare C kb_bare rb_bare (fromNumber 2))) | (C) | (C) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.04](https://logicmoo.org/public/mettareports/_166722.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.04) | (assertEqual (bc_bare C kb_bare rb_bare (fromNumber 2))) | (C) | (C) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05](https://logicmoo.org/public/mettareports/_166802.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05) | (assertEqual (explain (Evaluation (mortal Plato)))) | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato... | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato))))) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_166902.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06](https://logicmoo.org/public/mettareports/_167390.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06) | (assertEqual (get-type Either)) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06](https://logicmoo.org/public/mettareports/_167404.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06) | (assertEqual (get-type Either)) | (Type) | (Type) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://logicmoo.org/public/mettareports/_167676.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | (EmptyType) | ((StateMonad String)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://logicmoo.org/public/mettareports/_167746.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19](https://logicmoo.org/public/mettareports/_168086.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19) | (assertEqual (let $r (Add (S Z) Z) (match &self (= (eq $r (S Z)) $tv) $tv))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19](https://logicmoo.org/public/mettareports/_168100.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19) | (assertEqual (let $r (Add (S Z) Z) (match &self (= (eq $r (S Z)) $tv) $tv))) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://logicmoo.org/public/mettareports/_168504.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://logicmoo.org/public/mettareports/_168528.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_165634)) | ((State 30)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/_16870.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_11464)) | ((State 2 $_11464)) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_168872.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_168878.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [SUBTYPING.SUBTYPING-TEST.03](https://logicmoo.org/public/mettareports/_1690136.metta.html#SUBTYPING.SUBTYPING-TEST.03) | (assertEqualToResult (synthesize (: $proof (: felix Mammal)) kb rb (fromNumber 1))) | ((: (STImplCoer CM fC) (: felix Mammal))) | ((: (STImplCoer CM fC) (: felix Mammal)) (let* (((: $_1445956 (: felix Mammal)) (synthesize (: $_1445956 (: felix Mammal)) kb rb Z))) (: (STImplCoer STRefl $_1445956) (: felix Mammal))) (let* (((: $_1446334 (: felix Mammal)) (synthesize (: $_1446334 (: felix Mammal)) kb rb Z))) (: (coerce STRefl $_1446334) (: felix Mammal)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11](https://logicmoo.org/public/mettareports/_169116.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11) | (assertEqualToResult (== (A B) (A B))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26](https://logicmoo.org/public/mettareports/_16912.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03](https://logicmoo.org/public/mettareports/_169170.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03) | (assertEqual (drop (Cons 2 (Cons 1 Nil)))) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [FORWARD-CHAINING.FC-XP.31](https://logicmoo.org/public/mettareports/_169184.metta.html#FORWARD-CHAINING.FC-XP.31) | (assertEqualToResult (let (: $prf (→ $x $y)) (kb_dtl) (fc_dtl (: $prf (→ $x $y)) kb_dtl rb_dtl (fromNumber 2)))) | ((: ab (→ A B)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C) (: bc (→ B C)... | ((: ab (→ A B)) (: bc (→ B C)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.31](https://logicmoo.org/public/mettareports/_169208.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.31) | (assertEqualToResult (let (: $prf (→ $x $y)) (kb_dtl) (fc_dtl (: $prf (→ $x $y)) kb_dtl rb_dtl (fromNumber 2)))) | ((: ab (→ A B)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C) (: bc (→ B C)... | ((: ab (→ A B)) (: bc (→ B C)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | PASS | [DEPENDENT-TYPES.SUPPORTRULEEXP.02](https://logicmoo.org/public/mettareports/_16950.metta.html#DEPENDENT-TYPES.SUPPORTRULEEXP.02) | (assertEqualToResult (add-atom &db (Inheritance Allen human))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://logicmoo.org/public/mettareports/_170002.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://logicmoo.org/public/mettareports/_170008.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | PASS | [COMMON.LISTTEST.16](https://logicmoo.org/public/mettareports/_17012.metta.html#COMMON.LISTTEST.16) | (assertEqualToResult ("============ Test insert_uniq ============")) | (("============ Test insert_uniq ============")) | (("============ Test insert_uniq ============")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05](https://logicmoo.org/public/mettareports/_170316.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05) | (assertEqual (TV (green Fritz))) | ((stv 0.7047 0.68)) | ((stv 0.7047 0.68)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.05](https://logicmoo.org/public/mettareports/_170370.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.05) | (assertEqual (case (+ 1 5) (($x (+ 1 $x))))) | (7) | (7) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.06](https://logicmoo.org/public/mettareports/_170650.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.06) | (assertEqualToResult (add-atom &kb (: JJ (≼ Jun Jul)))) | (True) | (()) | | PASS | [BACKWARD-CHAINING.BC-XP.40](https://logicmoo.org/public/mettareports/_17066.metta.html#BACKWARD-CHAINING.BC-XP.40) | (assertEqual (bc_dem (: $prf (→ A B)) Z)) | ((: ab (→ A B))) | ((: ab (→ A B))) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.40](https://logicmoo.org/public/mettareports/_17074.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.40) | (assertEqual (bc_dem (: $prf (→ A B)) Z)) | ((: ab (→ A B))) | ((: ab (→ A B))) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04](https://logicmoo.org/public/mettareports/_170782.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04) | (assertEqual (insert 1 (insert 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_171910.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.06](https://logicmoo.org/public/mettareports/_172470.metta.html#INFERENCE-CONTROL.INF-CTL-XP.06) | (assertEqual (bc depth-updater depth-updater depth-terminator (fromNumber 4) (: $prf C))) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C)) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C)) | | PASS | [BASIC.CML-UNSHARED.07](https://logicmoo.org/public/mettareports/_172800.metta.html#BASIC.CML-UNSHARED.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [BASIC.HYPERPOSING.07](https://logicmoo.org/public/mettareports/_172800.metta.html#BASIC.HYPERPOSING.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | FAIL | [NARS-V0.TESTS1.02](https://logicmoo.org/public/mettareports/_172850.metta.html#NARS-V0.TESTS1.02) | (assertEqual (TupleCount (get-atoms &belief_events))) | (2) | (3) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.05](https://logicmoo.org/public/mettareports/_172992.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.05) | (assertEqual (case (+ 1 5) (($x (+ 1 $x))))) | (7) | (7) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05](https://logicmoo.org/public/mettareports/_173326.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05) | (assertEqual (superpose ((P_AS B_AS) (Q_AS C_AS)))) | ((P_AS B_AS) (Q_AS C_AS)) | ((P_AS B_AS) (Q_AS C_AS)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.29](https://logicmoo.org/public/mettareports/_173356.metta.html#ITERATIVE-CHAINING.IFC-XP.29) | (assertEqualToResult (add-atom &kb (: a A))) | () | (()) | | PASS | [COMMON.NUMTEST.03](https://logicmoo.org/public/mettareports/_174210.metta.html#COMMON.NUMTEST.03) | (assertEqual (ceil 2.4)) | (3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3... | (3) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13](https://logicmoo.org/public/mettareports/_174660.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13) | (assertEqualToResult (get-type (Cons 5 (Cons "6" Nil)))) | ((List Number)) | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://logicmoo.org/public/mettareports/_174670.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://logicmoo.org/public/mettareports/_174970.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03](https://logicmoo.org/public/mettareports/_175130.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03) | (assertEqual (drop (Cons 2 (Cons 1 Nil)))) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [COMPILER.DEFINE-IF-LIKE.05](https://logicmoo.org/public/mettareports/_175186.metta.html#COMPILER.DEFINE-IF-LIKE.05) | (assertEqual (get-state &pass)) | (:uncalled) | (:uncalled) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://logicmoo.org/public/mettareports/_175370.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09](https://logicmoo.org/public/mettareports/_175464.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09) | (assertEqual (eq (Add Z Z) Z)) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13](https://logicmoo.org/public/mettareports/_176038.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13) | (assertEqualToResult (get-type (Cons 5 (Cons "6" Nil)))) | ((List Number)) | () | | PASS | [FORWARD-CHAINING.FC-XP.03](https://logicmoo.org/public/mettareports/_176120.metta.html#FORWARD-CHAINING.FC-XP.03) | (assertEqualToResult (fc_entail (⊢ (→ A B)) kb_entail rb_entail (fromNumber 2))) | ((⊢ (→ A B)) (⊢ B) (⊢ C)) | ((⊢ B) (⊢ C) (⊢ (→ A B))) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.03](https://logicmoo.org/public/mettareports/_176126.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.03) | (assertEqualToResult (fc_entail (⊢ (→ A B)) kb_entail rb_entail (fromNumber 2))) | ((⊢ (→ A B)) (⊢ B) (⊢ C)) | ((⊢ B) (⊢ C) (⊢ (→ A B))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://logicmoo.org/public/mettareports/_176656.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_173762)) | ((State 30)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.10](https://logicmoo.org/public/mettareports/_176980.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.10) | (assertEqualToResult (collapse (superpose ()))) | () | (()) | | PASS | [COMMON.NUMTEST.01](https://logicmoo.org/public/mettareports/_17704.metta.html#COMMON.NUMTEST.01) | (assertEqual (fromNumber 1)) | ((S Z)) | ((S Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03](https://logicmoo.org/public/mettareports/_177248.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03) | (assertEqual (drop (Cons 2 (Cons 1 Nil)))) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | FAIL | [BACKWARD-CHAINING.BC-XP.13](https://logicmoo.org/public/mettareports/_177252.metta.html#BACKWARD-CHAINING.BC-XP.13) | (assertEqualToResult Entail) | (Entail) | ("=== Bare Entail Match ===") | | FAIL | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.13](https://logicmoo.org/public/mettareports/_177276.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.13) | (assertEqualToResult Entail) | (Entail) | ("=== Bare Entail Match ===") | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://logicmoo.org/public/mettareports/_177608.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | FAIL | [NARS-V0.TESTS0.06](https://logicmoo.org/public/mettareports/_177684.metta.html#NARS-V0.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-XP.02](https://logicmoo.org/public/mettareports/_177714.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-XP.02) | (assertEqual (bc depth-updater depth-updater depth-terminator (fromNumber 2) (: $prf (≼ Feb Feb)))) | ((: Refl (≼ Feb Feb))) | ((: Refl (≼ Feb Feb))) | | FAIL | [CURRENT.TESTS0.07](https://logicmoo.org/public/mettareports/_177770.metta.html#CURRENT.TESTS0.07) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | PASS | [METTA-MORPH-TESTS.COLLAPSE.01](https://logicmoo.org/public/mettareports/_178068.metta.html#METTA-MORPH-TESTS.COLLAPSE.01) | (assertEqualToResult (collapse (1 2 3))) | (((1 2 3))) | (((1 2 3))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://logicmoo.org/public/mettareports/_178162.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_175268)) | ((State 30)) | | FAIL | [EXAMPLES.EXPRESSION.03](https://logicmoo.org/public/mettareports/_178312.metta.html#EXAMPLES.EXPRESSION.03) | (assertEqualToResult ((hylo mapExpr evalExpr nTimes) (, 3 (S (S (S Z)))))) | ((evalExpr (mapExpr (hylo mapExpr evalExpr nTimes) (nTimes (S (S (S Z))))))) | (9) | | PASS | [BASIC.HYPERPOSING-SHARED.07](https://logicmoo.org/public/mettareports/_178444.metta.html#BASIC.HYPERPOSING-SHARED.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [BASIC.HYPERPOSING-UNSHARED.07](https://logicmoo.org/public/mettareports/_178444.metta.html#BASIC.HYPERPOSING-UNSHARED.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08](https://logicmoo.org/public/mettareports/_178488.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02](https://logicmoo.org/public/mettareports/_178492.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02) | (assertEqual (get-type ((curry +) 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04](https://logicmoo.org/public/mettareports/_178848.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04) | (assertEqual (TV (frog Fritz))) | ((stv 0.783 0.68)) | ((stv 0.783 0.68)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://logicmoo.org/public/mettareports/_178972.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://logicmoo.org/public/mettareports/_178984.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [CURRENT.TESTS4.03](https://logicmoo.org/public/mettareports/_179046.metta.html#CURRENT.TESTS4.03) | (assertEqualToResult (AddBeliefEvent ((sky --> ([(blue) ])) (1.0 0.9)))) | () | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://logicmoo.org/public/mettareports/_17952.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | (EmptyType) | ((StateMonad String)) | | PASS | [BASIC.STATE-TYPES.13](https://logicmoo.org/public/mettareports/_180196.metta.html#BASIC.STATE-TYPES.13) | (assertEqual (get-type Either)) | (Type) | (Type) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.15](https://logicmoo.org/public/mettareports/_180238.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.15) | (assertEqualToResult (superpose ((Rel-P B) (Rel-Q C)))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20](https://logicmoo.org/public/mettareports/_180254.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20) | (assertEqualToResult (let $x (+ 2 3) (* $x $x))) | (25) | (25) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://logicmoo.org/public/mettareports/_180388.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.07](https://logicmoo.org/public/mettareports/_180596.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.07) | (assertEqualToResult (range 1 10)) | ((1 2 3 4 5 6 7 8 9)) | ((1 2 3 4 5 6 7 8 9)) | | PASS | [EXPERIMENTS.UNIFY-VIA-LET.01](https://logicmoo.org/public/mettareports/_18098.metta.html#EXPERIMENTS.UNIFY-VIA-LET.01) | (assertEqualToResult (let (Link A $y) (Link $x B) (Link $x $y))) | ((Link A B)) | ((Link A B)) | | PASS | [METTA-MORPH-TESTS.TYPES.01](https://logicmoo.org/public/mettareports/_181518.metta.html#METTA-MORPH-TESTS.TYPES.01) | (assertEqualToResult (f 42)) | (42) | (42) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.06](https://logicmoo.org/public/mettareports/_181584.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.06) | (assertEqual (case 5 ((6 OK)))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.15](https://logicmoo.org/public/mettareports/_182114.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.15) | (assertEqualToResult (superpose ((Rel-P B) (Rel-Q C)))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://logicmoo.org/public/mettareports/_182180.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://logicmoo.org/public/mettareports/_182796.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | FAIL | [ITERATIVE-CHAINING.IBC-XP.26](https://logicmoo.org/public/mettareports/_183738.metta.html#ITERATIVE-CHAINING.IBC-XP.26) | (assertEqualToResult (get-atoms &kb)) | ((: ab (→ A B)) (: bc (→ B C)) (: a A) (: ModusPonens (-> (→ $_181276 $_181282) (-> $_181276 $... | ((: -> (-> $_171084 $_171232) (-> (-> $_171062 $_171084) (-> $_171062 $_171232))) (: Deduction (-> (→ $_171084 $_171232) (-> (→ $_171062 $_171084) (→ $_171062 $_171232)))) (: ModusPonens (-> (→ $_171062 $_171084) (-> $_171062 $_171084))) (: a A) (: ab (→ A B)) (: bc (→ B C)) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08](https://logicmoo.org/public/mettareports/_183868.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05](https://logicmoo.org/public/mettareports/_184098.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05) | (assertEqual (eq (S K K x) x)) | (T) | (T) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05](https://logicmoo.org/public/mettareports/_184526.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05) | (assertEqual (superpose ((P_AS B_AS) (Q_AS C_AS)))) | ((P_AS B_AS) (Q_AS C_AS)) | ((P_AS B_AS) (Q_AS C_AS)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.08](https://logicmoo.org/public/mettareports/_184940.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.08) | (assertEqualToResult (let (→ $x $y) (kb_bare) (fc_bare (→ $x $y) kb_bare rb_bare (fromNumber 2)))) | ((→ A B) B C (→ B C)) | (B C (→ A B) (→ B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03](https://logicmoo.org/public/mettareports/_185410.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03) | (assertEqual (TV (croaks Fritz))) | ((stv 0.95 0.85)) | ((stv 0.95 0.85)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03](https://logicmoo.org/public/mettareports/_185704.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03) | (assertEqualToResult (% 21 17)) | (4) | (4) | | PASS | [METTA-MORPH-TESTS.LETLET.01](https://logicmoo.org/public/mettareports/_186032.metta.html#METTA-MORPH-TESTS.LETLET.01) | (assertEqualToResult (let $T (1.0 0.9) (let* ((($f1 $c1) $T)) ($f1 $c1)))) | ((1.0 0.9)) | ((1.0 0.9)) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.03](https://logicmoo.org/public/mettareports/_186320.metta.html#TRUTHVALUE.TRUTHVALUETEST.03) | (assertEqual (confidence->count 0.9)) | (9.000000000000002) | (9.000000000000002) | | PASS | [BACKWARD-CHAINING.BC-XP.22](https://logicmoo.org/public/mettareports/_186452.metta.html#BACKWARD-CHAINING.BC-XP.22) | (assertEqual (bc_bem (→ A B) (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.22](https://logicmoo.org/public/mettareports/_186476.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.22) | (assertEqual (bc_bem (→ A B) (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | FAIL | [COMMON.NUMTEST.07](https://logicmoo.org/public/mettareports/_186788.metta.html#COMMON.NUMTEST.07) | (assertEqual (â©» Z (S Z))) | (True (< Z (S Z)) True (< Z (S Z))) | (True) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.10](https://logicmoo.org/public/mettareports/_187404.metta.html#FORMULA.DEDUCTIONFORMULATEST.10) | (assertEqualToResult (conditional-probability-consistency 0.2 0.3 1)) | (True True True True True True True True True True True True True True True True True True True True... | (True) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24](https://logicmoo.org/public/mettareports/_187440.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24) | (assertEqualToResult (eqa Z (Add Z Z))) | (T) | ((eqa Z (Add Z Z))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://logicmoo.org/public/mettareports/_187588.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14](https://logicmoo.org/public/mettareports/_187672.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14) | (assertEqual (let (List $t) (get-type (Cons 5 (Cons 6 Nil))) $t)) | (Number) | (Number) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://logicmoo.org/public/mettareports/_187852.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $x) $y) $y)) | ((* 2 $_174990)) | ((* 2 $_174990)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.41](https://logicmoo.org/public/mettareports/_188028.metta.html#ITERATIVE-CHAINING.IFC-XP.41) | (assertEqualToResult (ifc (: a A) (fromNumber 1) (fromNumber 2))) | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)... | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07](https://logicmoo.org/public/mettareports/_188220.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.TYPES2.05](https://logicmoo.org/public/mettareports/_18832.metta.html#METTA-MORPH-TESTS.TYPES2.05) | (assertEqualToResult (match &self (: reproduce $1) $1)) | ((-> Lion Lion Lion)) | ((-> Lion Lion Lion)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04](https://logicmoo.org/public/mettareports/_188334.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04) | (assertEqualToResult (match &self (:= ($color $who) T) ($who is really $color))) | ((Sam is really Green) (Tom is really White)) | ((Sam is really Green) (Tom is really White)) | | PASS | [METTA-MORPH-TESTS.TYPES2.05](https://logicmoo.org/public/mettareports/_18846.metta.html#METTA-MORPH-TESTS.TYPES2.05) | (assertEqualToResult (match &self (: reproduce $1) $1)) | ((-> Lion Lion Lion)) | ((-> Lion Lion Lion)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03](https://logicmoo.org/public/mettareports/_188748.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03) | (assertEqualToResult (% 21 17)) | (4) | (4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03](https://logicmoo.org/public/mettareports/_188762.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03) | (assertEqualToResult (% 21 17)) | (4) | (4) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://logicmoo.org/public/mettareports/_189498.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | (EmptyType) | ((StateMonad String)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04](https://logicmoo.org/public/mettareports/_189658.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04) | (assertEqual (TV (frog Fritz))) | ((stv 0.783 0.68)) | ((stv 0.783 0.68)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.07](https://logicmoo.org/public/mettareports/_190074.metta.html#ITERATIVE-CHAINING.IFC-XP.07) | (assertEqualToResult ((let $s (superpose ("f" "g")) (lambda0 $s)))) | ("f" "g") | ("f" "g") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04](https://logicmoo.org/public/mettareports/_190084.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04) | (assertEqual (TV (frog Fritz))) | ((stv 0.783 0.68)) | ((stv 0.783 0.68)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://logicmoo.org/public/mettareports/_19014.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04](https://logicmoo.org/public/mettareports/_190652.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04) | (assertEqualToResult (nop (change-state! &state-active inactive))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03](https://logicmoo.org/public/mettareports/_191222.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03) | (assertEqualToResult (% 21 17)) | (4) | (4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03](https://logicmoo.org/public/mettareports/_191236.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03) | (assertEqualToResult (% 21 17)) | (4) | (4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01](https://logicmoo.org/public/mettareports/_191968.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01) | (assertEqual (get-type (Mortal Plato))) | (Type) | (Type) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07](https://logicmoo.org/public/mettareports/_192046.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07) | (assertEqualToResult (get-type ((curry-a + 2) "S"))) | (Number) | () | | PASS | [PLN.GENE-PLN-XP.01](https://logicmoo.org/public/mettareports/_192146.metta.html#PLN.GENE-PLN-XP.01) | (assertEqualToResult (find-atoms &self (: $what (-> (transcribed_to $g $t) (-> (translates_to $t $p) (codes_for $g $p)))))) | ((: gene-codes-protein (-> (transcribed_to $_171338 $_171360) (-> (translates_to $_171360 $_171432) ... | ((: gene-codes-protein (-> (transcribed_to $_171338 $_171360) (-> (translates_to $_171360 $_171432) (codes_for $_171338 $_171432))))) | | PASS | [METTA-MORPH-TESTS.IF.01](https://logicmoo.org/public/mettareports/_192346.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_192366.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [BASIC.KEY-LOOKUPS-MANY.07](https://logicmoo.org/public/mettareports/_192368.metta.html#BASIC.KEY-LOOKUPS-MANY.07) | (assertEqual (let $v (new-state v-6) (match &data (= (get-data $k) $v) $k))) | ("k-6") | ("k-6") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13](https://logicmoo.org/public/mettareports/_192542.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13) | (assertEqual ((lambda ($x $y) (+ $x $y)) (2 7))) | (9) | (9) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06](https://logicmoo.org/public/mettareports/_19266.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06) | (assertEqualToResult (eq Green Blue)) | ((eq Green Blue)) | ((eq Green Blue)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04](https://logicmoo.org/public/mettareports/_192898.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04) | (assertEqualToResult (get-type (drop Nil))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04](https://logicmoo.org/public/mettareports/_193540.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04) | (assertEqualToResult (match &self (:= ($color $who) T) ($who is really $color))) | ((Sam is really Green) (Tom is really White)) | ((Sam is really Green) (Tom is really White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06](https://logicmoo.org/public/mettareports/_193664.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06) | (assertEqual (get-type (dropN (ConsN "1" NilN)))) | ((VecN String 0)) | ((VecN String 0)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09](https://logicmoo.org/public/mettareports/_194254.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09) | (assertEqualToResult (get-type (isLeft 5))) | (Bool) | () | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.01](https://logicmoo.org/public/mettareports/_194340.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.01) | (assertEqual (maybe-inc Nothing)) | (Nothing) | (Nothing) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_194656.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_194664.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://logicmoo.org/public/mettareports/_195900.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | (T) | (T) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-XP.05](https://logicmoo.org/public/mettareports/_196090.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-XP.05) | (assertEqual (bc depth-updater depth-updater depth-terminator (fromNumber 4) (: $prf (≼ Feb May)))) | ((: ((Trans FM) ((Trans MA) AM)) (≼ Feb May))) | ((: ((Trans FM) ((Trans MA) AM)) (≼ Feb May))) | | PASS | [EXPERIMENTS.UNIFY-VIA-LET.04](https://logicmoo.org/public/mettareports/_196164.metta.html#EXPERIMENTS.UNIFY-VIA-LET.04) | (assertEqualToResult (let (g $y) (Link $x B) (Link $x $y))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03](https://logicmoo.org/public/mettareports/_19616.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05](https://logicmoo.org/public/mettareports/_196466.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05) | (assertEqual (match &self (= (status (Goal $goal)) &state-active) $goal)) | () | (meditation) | | PASS | [PREV.TESTS2.02](https://logicmoo.org/public/mettareports/_196578.metta.html#PREV.TESTS2.02) | (assertEqualToResult (AddBeliefEvent ((^ left) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27](https://logicmoo.org/public/mettareports/_196710.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27) | (assertEqual (sort (Cons 3 (Cons 1 (Cons 2 Nil))))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09](https://logicmoo.org/public/mettareports/_197040.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09) | (assertEqualToResult (get-type (isLeft 5))) | (Bool) | () | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_197262.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [EXTEND.EXAMPLE3.01](https://logicmoo.org/public/mettareports/_19762.metta.html#EXTEND.EXAMPLE3.01) | (assertEqualToResult (extend-py! mettamorph)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01](https://logicmoo.org/public/mettareports/_197744.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01) | (assertEqual (TV (And (PA) (PB)))) | ((stv 0.3 0.8)) | ((stv 0.3 0.8)) | | FAIL | [ITERATIVE-CHAINING.IFC-XP.13](https://logicmoo.org/public/mettareports/_198014.metta.html#ITERATIVE-CHAINING.IFC-XP.13) | (assertEqualToResult Forward) | (Forward) | ("=== Test Iterative Chainer Wrapped Ardoun Forward Bare Entail (no collapse) ===") | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://logicmoo.org/public/mettareports/_198242.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | FAIL | [CONTAINERS-ARE-SPACES.04-MATCH-LIST-LIKE-SPACE.03](https://logicmoo.org/public/mettareports/_198366.metta.html#CONTAINERS-ARE-SPACES.04-MATCH-LIST-LIKE-SPACE.03) | (assertEqual (superpose ((P_List B_List) (Q_List C_List)))) | ((P_List B_List) (Q_List C_List)) | () | | FAIL | [RESOLVE.R.10](https://logicmoo.org/public/mettareports/_198442.metta.html#RESOLVE.R.10) | (assertEqualToResult (r::content)) | ((r::content)) | ((content)) | | PASS | [SUBTYPING.SUBTYPING-TEST.04](https://logicmoo.org/public/mettareports/_1986360.metta.html#SUBTYPING.SUBTYPING-TEST.04) | (assertEqualToResult (synthesize (: $proof (<: Cat Animal)) kb rb (fromNumber 1))) | ((: (STTrans CM MA) (<: Cat Animal))) | ((: (STTrans CM MA) (<: Cat Animal)) (let* (((: $_1742168 (<: Cat Animal)) (synthesize (: $_1742168 (<: Cat Animal)) kb rb Z))) (: (STTrans STRefl $_1742168) (<: Cat Animal))) (let* (((: $_1742546 (<: Cat Animal)) (synthesize (: $_1742546 (<: Cat Animal)) kb rb Z))) (: (coerce STRefl $_1742546) (<: Cat Animal)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06](https://logicmoo.org/public/mettareports/_198772.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06) | (assertEqual (get-type (dropN (ConsN "1" NilN)))) | ((VecN String 0)) | ((VecN String 0)) | | PASS | [COMPARISONS.ADD-ATOM-NAIVE-FIB.10](https://logicmoo.org/public/mettareports/_198778.metta.html#COMPARISONS.ADD-ATOM-NAIVE-FIB.10) | (assertEqualToResult (eval-in-space &other2 (foo))) | ((eval-in-space &other2 (foo))) | ((eval-in-space GroundingSpace-0x55d27867ec48 (foo))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04](https://logicmoo.org/public/mettareports/_198922.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04) | (assertEqualToResult (match &kb ($prop is-a Color) (match &self ($obj is $prop) $obj))) | (Ball) | (Ball) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11](https://logicmoo.org/public/mettareports/_198956.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11) | (assertEqualToResult (== (A B) (A B))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11](https://logicmoo.org/public/mettareports/_198984.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11) | (assertEqualToResult (== (A B) (A B))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21](https://logicmoo.org/public/mettareports/_199002.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC "5")))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11](https://logicmoo.org/public/mettareports/_199030.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11) | (assertEqualToResult (== (A B) (A B))) | (True) | (True) | | PASS | [FORWARD-CHAINING.FC-XP.12](https://logicmoo.org/public/mettareports/_199186.metta.html#FORWARD-CHAINING.FC-XP.12) | (assertEqualToResult (let (→ $x $y) (kb_eq) (fc_eq (→ $x $y) kb_eq (fromNumber 2)))) | ((→ A B) B C (→ B C)) | (B C (→ A B) (→ B C)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.12](https://logicmoo.org/public/mettareports/_199280.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.12) | (assertEqualToResult (let (→ $x $y) (kb_eq) (fc_eq (→ $x $y) kb_eq (fromNumber 2)))) | ((→ A B) B C (→ B C)) | (B C (→ A B) (→ B C)) | | FAIL | [EXAMPLES.EXPRESSION.04](https://logicmoo.org/public/mettareports/_199480.metta.html#EXAMPLES.EXPRESSION.04) | (assertEqualToResult ((para mapExpr diff) (Fix (Plus (Fix (Var X)) (Fix (Const 1)))))) | ((diff (Plus (Fix (Var X)) (Fix (Const 1))))) | ((diff (mapExpr (para_pair mapExpr diff) (unFix (Fix (Plus (Fix (Var X)) (Fix (Const 1)))))))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://logicmoo.org/public/mettareports/_199614.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://logicmoo.org/public/mettareports/_199758.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06](https://logicmoo.org/public/mettareports/_199826.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06) | (assertEqual (case (match &kb ($rel B_AS $x) ($rel $x)) (((SS-P_AS $y) (P_AS $y)) ((SS-Q_AS $y) (Q_AS $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11](https://logicmoo.org/public/mettareports/_200152.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11) | (assertEqualToResult (== (A B) (A B))) | (True) | (True) | | PASS | [TRUTHVALUE.EVIDENTIALTRUTHVALUETEST.04](https://logicmoo.org/public/mettareports/_200248.metta.html#TRUTHVALUE.EVIDENTIALTRUTHVALUETEST.04) | (assertEqualToResult (count (ETV (Singleton 42) (STV 0.1 0.9)))) | (9.000000000000002 9.000000000000002 9.000000000000002 9.000000000000002 9.000000000000002 9.0000000... | (9.000000000000002) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04](https://logicmoo.org/public/mettareports/_200294.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04) | (assertEqual (color)) | (green yellow red) | (green yellow red) | | PASS | [BASIC.COINS.01](https://logicmoo.org/public/mettareports/_200326.metta.html#BASIC.COINS.01) | (assertEqual (count-change 11)) | (4) | (4) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://logicmoo.org/public/mettareports/_200350.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://logicmoo.org/public/mettareports/_200352.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://logicmoo.org/public/mettareports/_200366.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://logicmoo.org/public/mettareports/_200378.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09](https://logicmoo.org/public/mettareports/_200778.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09) | (assertEqualToResult (rev A (superpose (B C D)))) | ((B A) (C A) (D A)) | ((B A) (C A) (D A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20](https://logicmoo.org/public/mettareports/_200900.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20) | (assertEqualToResult (match &self (= (eq (Add (S Z) Z) (S Z)) $tv) $tv)) | () | () | | PASS | [COMPILER.DEFINE-IF-LIKE.06](https://logicmoo.org/public/mettareports/_201030.metta.html#COMPILER.DEFINE-IF-LIKE.06) | (assertEqual (get-state &fail)) | (:uncalled) | (:uncalled) | | PASS | [HOL.NATSTANDALONETEST.07](https://logicmoo.org/public/mettareports/_201722.metta.html#HOL.NATSTANDALONETEST.07) | (assertEqualToResult (add-atom &kb (: plusRec (=== (plus (S $x) $y) (S (plus $x $y)))))) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://logicmoo.org/public/mettareports/_202060.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.16](https://logicmoo.org/public/mettareports/_202326.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.16) | (assertEqual (depth-continuor (: $prf $thm) Z)) | (False) | (False) | | PASS | [PREV.TESTS5.03](https://logicmoo.org/public/mettareports/_202486.metta.html#PREV.TESTS5.03) | (assertEqualToResult (AddBeliefEvent ((sheep --> ([(white) ])) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07](https://logicmoo.org/public/mettareports/_202606.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07) | (assertEqual (get-type (Left 5))) | (Either) | (Either) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01](https://logicmoo.org/public/mettareports/_203158.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01) | (assertEqual (TV (And (PA) (PB)))) | ((stv 0.3 0.8)) | ((stv 0.3 0.8)) | | FAIL | [DEPENDENT-TYPES.SUPPORTRULEEXP.04](https://logicmoo.org/public/mettareports/_203254.metta.html#DEPENDENT-TYPES.SUPPORTRULEEXP.04) | (assertEqualToResult (synthesize (: $proof $something) kb rb (fromNumber 2))) | ((: (WitnessOf (axiom (Inheritance Allen man))) (axiom (Inheritance Allen man))) (: (WitnessOf (axio... | ((: (WitnessOf (axiom (Inheritance Allen human))) (axiom (Inheritance Allen human))) (: (WitnessOf (axiom (Inheritance Allen man))) (axiom (Inheritance Allen man))) (: (WitnessOf (axiom (Inheritance man mortal))) (axiom (Inheritance man mortal))) (: (specilizeX (WitnessOf (axiom (Inheritance Allen human)))) (SpecializationOf (Inheritance (VarIdx Z) human) (Inheritance (VarIdx Z) (VarIdx (S Z))))) (: (specilizeX (WitnessOf (axiom (Inheritance Allen man)))) (SpecializationOf (Inheritance (VarIdx Z) man) (Inheritance (VarIdx Z) (VarIdx (S Z))))) (: (specilizeX (WitnessOf (axiom (Inheritance man mortal)))) (SpecializationOf (Inheritance (VarIdx Z) mortal) (Inheritance (VarIdx Z) (VarIdx (S Z))))) (: (specilizeY (WitnessOf (axiom (Inheritance Allen human)))) (SpecializationOf (Inheritance Allen (VarIdx (S Z))) (Inheritance (VarIdx Z) (VarIdx (S Z))))) (: (specilizeY (WitnessOf (axiom (Inheritance Allen man)))) (SpecializationOf (Inheritance Allen (VarIdx (S Z))) (Inheritance (VarIdx Z) (VarIdx (S Z))))) (: (specilizeY (WitnessOf (axiom (Inheritance man mortal)))) (SpecializationOf (Inheritance man (VarIdx (S Z))) (Inheritance (VarIdx Z) (VarIdx (S Z))))) (: (support (specilizeX (WitnessOf (axiom (Inheritance Allen human))))) (SupportOf (Inheritance (VarIdx Z) human) 1)) (: (support (specilizeX (WitnessOf (axiom (Inheritance Allen man))))) (SupportOf (Inheritance (VarIdx Z) man) 1)) (: (support (specilizeX (WitnessOf (axiom (Inheritance man mortal))))) (SupportOf (Inheritance (VarIdx Z) mortal) 1)) (: (support (specilizeY (WitnessOf (axiom (Inheritance Allen human))))) (SupportOf (Inheritance Allen (VarIdx (S Z))) 2)) (: (support (specilizeY (WitnessOf (axiom (Inheritance Allen man))))) (SupportOf (Inheritance Allen (VarIdx (S Z))) 2)) (: (support (specilizeY (WitnessOf (axiom (Inheritance man mortal))))) (SupportOf (Inheritance man (VarIdx (S Z))) 1))) | | PASS | [METTA-MORPH-TESTS.PEANO.01](https://logicmoo.org/public/mettareports/_203288.metta.html#METTA-MORPH-TESTS.PEANO.01) | (assertEqualToResult (Add (S (S Z)) (S (S (S Z))))) | ((S (S (S (S (S Z)))))) | ((S (S (S (S (S Z)))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18](https://logicmoo.org/public/mettareports/_203410.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18) | (assertEqual (f 2)) | (103 103 103 103 103 103 103 103 103) | (103) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04](https://logicmoo.org/public/mettareports/_203878.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04) | (assertEqualToResult (match &self (:= ($color $who) T) ($who is really $color))) | ((Sam is really Green) (Tom is really White)) | ((Sam is really Green) (Tom is really White)) | | FAIL | [SQL-SPACE.SQL-SPACE-TEST.02](https://logicmoo.org/public/mettareports/_204194.metta.html#SQL-SPACE.SQL-SPACE-TEST.02) | (assertEqualToResult (sql.save-query-result &sql_space &self (, (musicbrainz.artist (id $id) (name $name)) (musicbrainz.artist (id $id) (begin_date_year 1977)) (limit 3)))) | ((sql.save-query-result (new-sql-space musicbrainz_db localhost musicbrainz musicbrainz 5432) &self ... | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07](https://logicmoo.org/public/mettareports/_204258.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.05](https://logicmoo.org/public/mettareports/_204388.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.05) | (assertEqualToResult (range 1 3)) | ((1 2)) | ((1 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18](https://logicmoo.org/public/mettareports/_204476.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18) | (assertEqual (fmap (curry-a + 2) (UntypedC 5))) | ((UntypedC 7)) | ((UntypedC 7)) | | PASS | [FORWARD-CHAINING.FC-XP.17](https://logicmoo.org/public/mettareports/_20460.metta.html#FORWARD-CHAINING.FC-XP.17) | (assertEqualToResult (add-atom &rb_bem (⊢ (→ $p $q) $p $q))) | () | (()) | | PASS | [PREV.TESTS0.07](https://logicmoo.org/public/mettareports/_204664.metta.html#PREV.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [METTA-MORPH-TESTS.TESTS0.07](https://logicmoo.org/public/mettareports/_204678.metta.html#METTA-MORPH-TESTS.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [POLYWARD-CHAINING.PC-XP.13](https://logicmoo.org/public/mettareports/_204970.metta.html#POLYWARD-CHAINING.PC-XP.13) | (assertEqual (frc (: a A) Z)) | ((: a A)) | ((: a A)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_205096.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.02) | (assertEqualToResult (add-atom &kb (: ab (→ A B)))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.11](https://logicmoo.org/public/mettareports/_205200.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.11) | (assertEqualToResult (superpose ((nop 1)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11](https://logicmoo.org/public/mettareports/_205458.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11) | (assertEqual ((is-socrates) Human)) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02](https://logicmoo.org/public/mettareports/_205466.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02) | (assertEqual (get-type (HumansAreMortal SocratesIsHuman))) | ((Mortal Socrates)) | ((Mortal Socrates)) | | PASS | [NEW.TESTS5.08](https://logicmoo.org/public/mettareports/_206592.metta.html#NEW.TESTS5.08) | (assertEqualToResult (AddBeliefEvent (({(instance1) } --> ([(see) ])) (1.0 0.9)))) | () | () | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.17](https://logicmoo.org/public/mettareports/_20716.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.17) | (assertEqualToResult (add-atom &rb_bem (⊢ (→ $p $q) $p $q))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.06](https://logicmoo.org/public/mettareports/_207408.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.06) | (assertEqual (case 5 ((6 OK)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20](https://logicmoo.org/public/mettareports/_207460.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20) | (assertEqualToResult (let $x (+ 2 3) (* $x $x))) | (25) | (25) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20](https://logicmoo.org/public/mettareports/_207466.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20) | (assertEqualToResult (let $x (+ 2 3) (* $x $x))) | (25) | (25) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://logicmoo.org/public/mettareports/_207870.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://logicmoo.org/public/mettareports/_207958.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04](https://logicmoo.org/public/mettareports/_208132.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04) | (assertEqualToResult (nop (change-state! &state-active inactive))) | () | (()) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://logicmoo.org/public/mettareports/_208138.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_209072.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [POLYWARD-CHAINING.PC-XP.02](https://logicmoo.org/public/mettareports/_20916.metta.html#POLYWARD-CHAINING.PC-XP.02) | (assertEqualToResult (add-atom &kb (: ab (→ A B)))) | () | (()) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://logicmoo.org/public/mettareports/_209234.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://logicmoo.org/public/mettareports/_209248.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02](https://logicmoo.org/public/mettareports/_209410.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02) | (assertEqual (get-type (HumansAreMortal SocratesIsHuman))) | ((Mortal Socrates)) | ((Mortal Socrates)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07](https://logicmoo.org/public/mettareports/_209420.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07) | (assertEqualToResult (get-type (= SocratesIsHuman PlatoIsHuman))) | (Type) | () | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://logicmoo.org/public/mettareports/_209572.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://logicmoo.org/public/mettareports/_209684.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (42) | (42) | | FAIL | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.11](https://logicmoo.org/public/mettareports/_209758.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.11) | (assertEqualToResult (built-in type checker)) | ((built-in type checker)) | ("===== Prove that 5 < 7 (synthesizer) =====") | | FAIL | [BASIC.STATE-TYPES.06](https://logicmoo.org/public/mettareports/_209836.metta.html#BASIC.STATE-TYPES.06) | (assertEqualToResult ("(get-type B-first)=" (get-type (get-state &b-first)))) | (("(get-type B-first)=" ABType)) | (("(get-type B-first)=" Symbol)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://logicmoo.org/public/mettareports/_209938.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.06](https://logicmoo.org/public/mettareports/_210030.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.06) | (assertEqual (case 5 ((6 OK)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20](https://logicmoo.org/public/mettareports/_210058.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20) | (assertEqualToResult (let $x (+ 2 3) (* $x $x))) | (25) | (25) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20](https://logicmoo.org/public/mettareports/_210072.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20) | (assertEqualToResult (let $x (+ 2 3) (* $x $x))) | (25) | (25) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.07](https://logicmoo.org/public/mettareports/_210378.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.07) | (assertEqualToResult (range 1 10)) | ((1 2 3 4 5 6 7 8 9)) | ((1 2 3 4 5 6 7 8 9)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04](https://logicmoo.org/public/mettareports/_210382.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04) | (assertEqualToResult (nop (change-state! &state-active inactive))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04](https://logicmoo.org/public/mettareports/_210396.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04) | (assertEqualToResult (nop (change-state! &state-active inactive))) | () | (()) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.02](https://logicmoo.org/public/mettareports/_21048.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.02) | (assertEqualToResult (TupleConcat () (e f g))) | ((e f g)) | ((e f g)) | | PASS | [HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01](https://logicmoo.org/public/mettareports/_211224.metta.html#HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01) | (assertEqualToResult ((inc) 2)) | (3) | (3) | | PASS | [NEW.TESTS1.01](https://logicmoo.org/public/mettareports/_211574.metta.html#NEW.TESTS1.01) | (assertEqual (TupleCount (get-atoms &belief_events))) | (0) | (0) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://logicmoo.org/public/mettareports/_211768.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://logicmoo.org/public/mettareports/_211968.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [HOL.NATDTLTEST.03](https://logicmoo.org/public/mettareports/_212102.metta.html#HOL.NATDTLTEST.03) | (assertEqualToResult (add-atom &kb (: lambda (-> (: $x Variable) (-> (: $prf $thm) (-> (: $x $t) $thm)))))) | () | (()) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.16](https://logicmoo.org/public/mettareports/_212398.metta.html#INFERENCE-CONTROL.INF-CTL-XP.16) | (assertEqual (bc td-updater td-updater td-terminator (MkTD C (fromNumber 5)) (: $prf C))) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C)) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05](https://logicmoo.org/public/mettareports/_212418.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05) | (assertEqual (eq (S K K x) x)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06](https://logicmoo.org/public/mettareports/_212482.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06) | (assertEqualToResult (eq Green Blue)) | ((eq Green Blue)) | ((eq Green Blue)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/_212558.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://logicmoo.org/public/mettareports/_212650.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | (EmptyType) | ((StateMonad String)) | | PASS | [FORWARD-CHAINING.FC-XP.10](https://logicmoo.org/public/mettareports/_212658.metta.html#FORWARD-CHAINING.FC-XP.10) | (assertEqualToResult (fc_eq A kb_eq (fromNumber 2))) | (A B C) | (A B C) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://logicmoo.org/public/mettareports/_212664.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | (EmptyType) | ((StateMonad String)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.10](https://logicmoo.org/public/mettareports/_212670.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.10) | (assertEqualToResult (fc_eq A kb_eq (fromNumber 2))) | (A B C) | (A B C) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03](https://logicmoo.org/public/mettareports/_212746.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03) | (assertEqual (TV (croaks Fritz))) | ((stv 0.95 0.85)) | ((stv 0.95 0.85)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01](https://logicmoo.org/public/mettareports/_212842.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01) | (assertEqual (get-type (curry +))) | ((-> Number (-> Number Number))) | ((-> Number (-> Number Number))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/_213092.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | (T) | (T) | | PASS | [BACKWARD-CHAINING.BC-XP.08](https://logicmoo.org/public/mettareports/_213196.metta.html#BACKWARD-CHAINING.BC-XP.08) | (assertEqual (bc_eq B kb_eq (fromNumber 1))) | (B) | (B) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.08](https://logicmoo.org/public/mettareports/_213220.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.08) | (assertEqual (bc_eq B kb_eq (fromNumber 1))) | (B) | (B) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04](https://logicmoo.org/public/mettareports/_213302.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (sequential ((increment) (increment) (increment)))))) | (10 11 12 13 14 15) | (10 11 12 13 14 15) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.09](https://logicmoo.org/public/mettareports/_213414.metta.html#FORMULA.DEDUCTIONFORMULATEST.09) | (assertEqualToResult (simple-deduction-strength-formula 0.9 0.6 0.5 0.3 0.4)) | (0) | (0) | | PASS | [ITERATIVE-CHAINING.IFC-XP.16](https://logicmoo.org/public/mettareports/_213448.metta.html#ITERATIVE-CHAINING.IFC-XP.16) | (assertEqualToResult (ic_bare A kb_bare rb_bare (fromNumber 1) (fromNumber 1))) | (kb_bare (lambda0 B)) | (kb_bare (lambda0 B)) | | PASS | [ITERATIVE-CHAINING.IBC-XP.18](https://logicmoo.org/public/mettareports/_213452.metta.html#ITERATIVE-CHAINING.IBC-XP.18) | (assertEqualToResult (add-atom-nodup &space-test A)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08](https://logicmoo.org/public/mettareports/_213486.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | FAIL | [EXPERIMENTS.UNIFY-VIA-CASE.04](https://logicmoo.org/public/mettareports/_213710.metta.html#EXPERIMENTS.UNIFY-VIA-CASE.04) | (assertEqualToResult (case (Link $x B) (((g $y) (Link $x $y))))) | ((Link $_211436 B)) | () | | PASS | [FORWARD-CHAINING.FC-XP.02](https://logicmoo.org/public/mettareports/_214286.metta.html#FORWARD-CHAINING.FC-XP.02) | (assertEqualToResult (fc_entail (⊢ A) kb_entail rb_entail (fromNumber 2))) | ((⊢ A) (⊢ B) (⊢ C)) | ((⊢ A) (⊢ B) (⊢ C)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.02](https://logicmoo.org/public/mettareports/_214292.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.02) | (assertEqualToResult (fc_entail (⊢ A) kb_entail rb_entail (fromNumber 2))) | ((⊢ A) (⊢ B) (⊢ C)) | ((⊢ A) (⊢ B) (⊢ C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05](https://logicmoo.org/public/mettareports/_214410.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05) | (assertEqual (explain (Evaluation (mortal Plato)))) | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato... | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04](https://logicmoo.org/public/mettareports/_214478.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04) | (assertEqualToResult (match &kb ($prop is-a Color) (match &self ($obj is $prop) $obj))) | (Ball) | (Ball) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://logicmoo.org/public/mettareports/_214516.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | (EmptyType) | ((StateMonad String)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11](https://logicmoo.org/public/mettareports/_214648.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11) | (assertEqual (is (air wet))) | ((start ventilation) (stop humidifier) (stop kettle)) | ((stop kettle) (stop humidifier) (start ventilation)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://logicmoo.org/public/mettareports/_214940.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $x) $x)) | (Socrates Plato) | (Plato Socrates) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04](https://logicmoo.org/public/mettareports/_215216.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.01](https://logicmoo.org/public/mettareports/_215236.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.01) | (assertEqualToResult (superpose (a b c))) | (a b c) | (a b c) | | FAIL | [NEW.TESTS3.05](https://logicmoo.org/public/mettareports/_215690.metta.html#NEW.TESTS3.05) | (assertEqual (AddGoalEvent (Outside (1.0 0.9)))) | () | (None) | | FAIL | [CURRENT.TESTS3.05](https://logicmoo.org/public/mettareports/_215694.metta.html#CURRENT.TESTS3.05) | (assertEqual (AddGoalEvent (Outside (1.0 0.9)))) | () | (None) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14](https://logicmoo.org/public/mettareports/_215944.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14) | (assertEqual (let (List $t) (get-type (Cons 5 (Cons 6 Nil))) $t)) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02](https://logicmoo.org/public/mettareports/_21608.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02) | (assertEqualToResult (match &kb (Green $x) $x)) | (Fritz Sam) | (Fritz Sam) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.02](https://logicmoo.org/public/mettareports/_21632.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.02) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06](https://logicmoo.org/public/mettareports/_217052.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06) | (assertEqualToResult (ln (+ 2 2))) | ((ln 4)) | ((ln 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14](https://logicmoo.org/public/mettareports/_217322.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14) | (assertEqual (let (List $t) (get-type (Cons 5 (Cons 6 Nil))) $t)) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05](https://logicmoo.org/public/mettareports/_217946.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05) | (assertEqual (eq (S K K x) x)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04](https://logicmoo.org/public/mettareports/_217960.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [DEPENDENT-TYPES.MINERCURRIEDDTL.05](https://logicmoo.org/public/mettareports/_218010.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTL.05) | (assertEqualToResult (init-miner &db (ms) (highsurp))) | ((init-miner &db 1 0.8)) | ((init-miner GroundingSpace-0x56345c65a4d8 1 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11](https://logicmoo.org/public/mettareports/_218262.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11) | (assertEqual (is (air wet))) | ((start ventilation) (stop humidifier) (stop kettle)) | ((stop kettle) (stop humidifier) (start ventilation)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04](https://logicmoo.org/public/mettareports/_218400.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04) | (assertEqualToResult (get-type (drop Nil))) | () | () | | FAIL | [EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.08](https://logicmoo.org/public/mettareports/_218472.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.08) | (assertEqualToResult (record synthesize ((: (. (. g f) h) (-> $in Bool)) (fromNumber 2)))) | ((⊷ synthesize ((: (. (. g f) h) (-> $_216136 Bool)) (S (S Z))) (synthesize (: (. (. g f) h) (-> $... | ((: (. (. g f) h) (-> Bool Bool))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04](https://logicmoo.org/public/mettareports/_218490.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04) | (assertEqualToResult (< 4 (+ 2 (* 3 5)))) | (True) | (True) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://logicmoo.org/public/mettareports/_218610.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqualToResult (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05](https://logicmoo.org/public/mettareports/_218636.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05) | (assertEqual (eq (S K K x) x)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05](https://logicmoo.org/public/mettareports/_218650.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05) | (assertEqual (eq (S K K x) x)) | (T) | (T) | | PASS | [HOL.NATSIMPLETEST~OLD.03](https://logicmoo.org/public/mettareports/_2188482.metta.html#HOL.NATSIMPLETEST~OLD.03) | (assertEqualToResult (synthesize (: $proof (=== (plus (S Z) (S Z)) (S (S Z)))) kb rb (fromNumber 2))) | ((: (EqTrans Rec_plus (UnaryEqStruct Base_plus)) (=== (plus (S Z) (S Z)) (S (S Z)))) (: (EqTrans (Eq... | ((: (EqTrans Rec_plus (UnaryEqStruct Base_plus)) (=== (plus (S Z) (S Z)) (S (S Z)))) (: (EqTrans (EqTrans EqRefl Rec_plus) (UnaryEqStruct Base_plus)) (=== (plus (S Z) (S Z)) (S (S Z)))) (: (EqTrans (EqTrans Rec_plus EqRefl) (UnaryEqStruct Base_plus)) (=== (plus (S Z) (S Z)) (S (S Z))))) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.06](https://logicmoo.org/public/mettareports/_21884.metta.html#TRUTHVALUE.TRUTHVALUETEST.06) | (assertEqual (confidence (STV 0.1 0.2))) | (0.2) | (0.2) | | PASS | [QUERY.GENE-QUERY.01](https://logicmoo.org/public/mettareports/_219082.metta.html#QUERY.GENE-QUERY.01) | (assertEqualToResult (match &self ($type $id) (: (W ($type $id)) ($type $id)))) | ((: (W (tad chr16_1000_2000_GRCh38)) (tad chr16_1000_2000_GRCh38)) (: (W (gene w)) (gene w)) (: (W (... | ((: (W (gene w)) (gene w)) (: (W (gene x)) (gene x)) (: (W (gene y)) (gene y)) (: (W (gene z)) (gene z)) (: (W (sequence_variant rs1000)) (sequence_variant rs1000)) (: (W (sequence_variant rs999)) (sequence_variant rs999)) (: (W (tad chr16_1000_2000_GRCh38)) (tad chr16_1000_2000_GRCh38))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20](https://logicmoo.org/public/mettareports/_219126.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20) | (assertEqualToResult (match &self (= (eq (Add (S Z) Z) (S Z)) $tv) $tv)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20](https://logicmoo.org/public/mettareports/_219140.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20) | (assertEqualToResult (match &self (= (eq (Add (S Z) Z) (S Z)) $tv) $tv)) | () | () | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06](https://logicmoo.org/public/mettareports/_219378.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06) | (assertEqual (case (match &kb ($rel B_AS $x) ($rel $x)) (((SS-P_AS $y) (P_AS $y)) ((SS-Q_AS $y) (Q_AS $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02](https://logicmoo.org/public/mettareports/_21998.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02) | (assertEqual (insert 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05](https://logicmoo.org/public/mettareports/_220622.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05) | (assertEqual (match &self (= (status (Goal $goal)) &state-active) $goal)) | () | (meditation) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_22100.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06](https://logicmoo.org/public/mettareports/_221160.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06) | (assertEqualToResult (Add Z Ten)) | ((Add Z Ten)) | ((Add Z Ten)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06](https://logicmoo.org/public/mettareports/_221162.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06) | (assertEqualToResult (Add Z Ten)) | ((Add Z Ten)) | ((Add Z Ten)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.35](https://logicmoo.org/public/mettareports/_221280.metta.html#ITERATIVE-CHAINING.IFC-XP.35) | (assertEqualToResult (fc (: a A) (fromNumber 2))) | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17](https://logicmoo.org/public/mettareports/_22128.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17) | (assertEqual (+ (superpose (1 2 3)) 1)) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05](https://logicmoo.org/public/mettareports/_221376.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05) | (assertEqual (Add Something Z)) | (Something) | (Something) | | PASS | [POLYWARD-CHAINING.PC-XP.05](https://logicmoo.org/public/mettareports/_221696.metta.html#POLYWARD-CHAINING.PC-XP.05) | (assertEqualToResult (add-atom &rb (: ModusPonens (-> (→ $p $q) $p $q)))) | () | (()) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.04](https://logicmoo.org/public/mettareports/_221860.metta.html#TRUTHVALUE.TRUTHVALUETEST.04) | (assertEqual (mode (STV 0.1 0.2))) | (0.1) | (0.1) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_221968.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01](https://logicmoo.org/public/mettareports/_22214.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01) | (assertEqual (match &self (= (color) $x) $x)) | (green yellow red) | (red yellow green) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.07](https://logicmoo.org/public/mettareports/_222170.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.07) | (assertEqualToResult (add-atom &kb (: JA (≼ Jul Aug)))) | (True) | (()) | | PASS | [CURRENT.TESTS2.08](https://logicmoo.org/public/mettareports/_222256.metta.html#CURRENT.TESTS2.08) | (assertEqualToResult (AddBeliefEvent (ballhit (1.0 0.9)))) | () | () | | PASS | [NARS-V0.TESTS2.08](https://logicmoo.org/public/mettareports/_222262.metta.html#NARS-V0.TESTS2.08) | (assertEqualToResult (AddBeliefEvent (ballhit (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01](https://logicmoo.org/public/mettareports/_222294.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01) | (assertEqual (Add S Z)) | (S) | (S) | | PASS | [ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.03](https://logicmoo.org/public/mettareports/_22302.metta.html#ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.03) | (assertEqualToResult ("========== Test axiom ==========")) | (("========== Test axiom ==========")) | (("========== Test axiom ==========")) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_223096.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_223224.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_223230.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [CURRENT.TESTS0.05](https://logicmoo.org/public/mettareports/_223250.metta.html#CURRENT.TESTS0.05) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_223320.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03](https://logicmoo.org/public/mettareports/_223396.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03) | (assertEqual (TV (croaks Fritz))) | ((stv 0.95 0.85)) | ((stv 0.95 0.85)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05](https://logicmoo.org/public/mettareports/_223506.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05) | (assertEqualToResult (match &self (:= ($color $who) $tv) ('It's' $tv that $who is $color))) | (('It's' T that Sam is Green) ('It's' T that Tom is White) ('It's' F that Tom is Green)) | (('It's' F that Tom is Green) ('It's' T that Sam is Green) ('It's' T that Tom is White)) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_223770.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [BASIC.STATE-TYPES.22](https://logicmoo.org/public/mettareports/_224352.metta.html#BASIC.STATE-TYPES.22) | (assertEqualToResult ("(get-type &right_7)=" &right_7 (get-type &right_7))) | (("(get-type &right_7)=" (Right 7) Either)) | (("(get-type &right_7)=" (Right 7) Either)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04](https://logicmoo.org/public/mettareports/_224360.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04) | (assertEqualToResult (get-type (drop Nil))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11](https://logicmoo.org/public/mettareports/_224550.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11) | (assertEqual (is (air wet))) | ((start ventilation) (stop humidifier) (stop kettle)) | ((stop kettle) (stop humidifier) (start ventilation)) | | PASS | [HOL.NATSIMPLETEST.03](https://logicmoo.org/public/mettareports/_2245698.metta.html#HOL.NATSIMPLETEST.03) | (assertEqualToResult (synthesize (: $proof (=== (plus (S Z) (S Z)) (S (S Z)))) kb rb (fromNumber 2))) | ((: (EqTrans Rec_plus (EqStruct1 Base_plus)) (=== (plus (S Z) (S Z)) (S (S Z)))) (: (EqTrans (EqTran... | ((: (EqTrans Rec_plus (EqStruct1 Base_plus)) (=== (plus (S Z) (S Z)) (S (S Z)))) (: (EqTrans (EqTrans EqRefl Rec_plus) (EqStruct1 Base_plus)) (=== (plus (S Z) (S Z)) (S (S Z)))) (: (EqTrans (EqTrans Rec_plus EqRefl) (EqStruct1 Base_plus)) (=== (plus (S Z) (S Z)) (S (S Z))))) | | PASS | [HOL.NATSTANDALONETEST.03](https://logicmoo.org/public/mettareports/_224730.metta.html#HOL.NATSTANDALONETEST.03) | (assertEqualToResult (add-atom &kb (: Cong (-> (=== $x $x') (=== ($op $x) ($op $x')))))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04](https://logicmoo.org/public/mettareports/_225140.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04) | (assertEqualToResult (match &kb ($prop is-a Color) (match &self ($obj is $prop) $obj))) | (Ball) | (Ball) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04](https://logicmoo.org/public/mettareports/_225154.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04) | (assertEqualToResult (match &kb ($prop is-a Color) (match &self ($obj is $prop) $obj))) | (Ball) | (Ball) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03](https://logicmoo.org/public/mettareports/_225340.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03) | (assertEqual (TV (croaks Fritz))) | ((stv 0.95 0.85)) | ((stv 0.95 0.85)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26](https://logicmoo.org/public/mettareports/_22538.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26) | (assertEqual (let $z (Add Z Z) (eqa Z $z))) | (T) | (T) | | FAIL | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.09](https://logicmoo.org/public/mettareports/_225444.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.09) | (assertEqualToResult ===) | (===) | ("=== Equality ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://logicmoo.org/public/mettareports/_22546.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $x) $x)) | (Socrates Plato) | (Plato Socrates) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://logicmoo.org/public/mettareports/_22550.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $x) $x)) | (Socrates Plato) | (Plato Socrates) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18](https://logicmoo.org/public/mettareports/_225554.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18) | (assertEqual (f 2)) | (103 103 103 103 103 103 103 103 103) | (103) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19](https://logicmoo.org/public/mettareports/_225694.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19) | (assertEqualToResult (dup 2)) | (102 102 102 102 102 102 102 102 102 12 12) | (12 102) | | PASS | [METTA-MORPH-TESTS.AND-OR.01](https://logicmoo.org/public/mettareports/_225772.metta.html#METTA-MORPH-TESTS.AND-OR.01) | (assertEqualToResult (If (or (and True False) True) 1 2)) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/_225774.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/_225780.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://logicmoo.org/public/mettareports/_225926.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.03](https://logicmoo.org/public/mettareports/_226024.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.03) | (assertEqual (:check (HumansAreMortal SocratesIsHuman) (Mortal Socrates))) | () | (T) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_226374.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04](https://logicmoo.org/public/mettareports/_226478.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04) | (assertEqualToResult (get-type (drop Nil))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.02](https://logicmoo.org/public/mettareports/_226562.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.02) | (assertEqual (maybe-inc (Just 2))) | ((Just 3)) | ((Just 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15](https://logicmoo.org/public/mettareports/_226866.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15) | (assertEqual (fmap (curry-a + 2) (Something 5))) | ((Something 7)) | ((Something 7)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01](https://logicmoo.org/public/mettareports/_226894.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01) | (assertEqual (get-type (Mortal Plato))) | (Type) | (Type) | | PASS | [FORWARD-CHAINING.FC-XP.18](https://logicmoo.org/public/mettareports/_227236.metta.html#FORWARD-CHAINING.FC-XP.18) | (assertEqualToResult (fc_bem A (fromNumber 2))) | (A B C) | (A B C) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.18](https://logicmoo.org/public/mettareports/_227504.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.18) | (assertEqualToResult (fc_bem A (fromNumber 2))) | (A B C) | (A B C) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01](https://logicmoo.org/public/mettareports/_227700.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01) | (assertEqual (get-type (Mortal Plato))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01](https://logicmoo.org/public/mettareports/_228110.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01) | (assertEqualToResult (match &self (EvaluationLink (PredicateNode "eats") (ListLink $x (ConceptNode "flies"))) $x)) | ((ConceptNode "Sam") (ConceptNode "Fritz")) | ((ConceptNode "Fritz") (ConceptNode "Sam")) | | PASS | [JOHN-CARRY-FLOWER.JOHN-CARRY-FLOWER-TEST.05](https://logicmoo.org/public/mettareports/_228470.metta.html#JOHN-CARRY-FLOWER.JOHN-CARRY-FLOWER-TEST.05) | (assertEqualToResult (synthesize (: $proof (∧ (instance $C Carrying) (agent $C John) (instance $F Flower) (objectTransferred $C $F))) kb rb (fromNumber 5))) | ((: (QuaternaryConjunctionIntroduction (WitnessOf (instance JohnsCarry Carrying)) (WitnessOf (agent ... | ((: (QuaternaryConjunctionIntroduction (WitnessOf (instance JohnsCarry Carrying)) (WitnessOf (agent JohnsCarry John)) (WitnessOf (instance JohnsFlower Flower)) (ModusPonens (WitnessOf (⟹ (∧ (instance JohnsCarry Transfer) (objectTransferred JohnsCarry JohnsVase) (orientation JohnsFlower JohnsVase Inside)) (objectTransferred JohnsCarry JohnsFlower))) (TrinaryConjunctionIntroduction (ModusPonens (WitnessOf (⟹ (∧ (subclass Carrying Transfer) (instance JohnsCarry Carrying)) (instance JohnsCarry Transfer))) (BinaryConjunctionIntroduction (WitnessOf (subclass Carrying Transfer)) (WitnessOf (instance JohnsCarry Carrying)))) (WitnessOf (objectTransferred JohnsCarry JohnsVase)) (WitnessOf (orientation JohnsFlower JohnsVase Inside))))) (∧ (instance JohnsCarry Carrying) (agent JohnsCarry John) (instance JohnsFlower Flower) (objectTransferred JohnsCarry JohnsFlower))) (let* (((: $_6712 (⟹ $_6742 (∧ (instance $_5848 Carrying) (agent $_5848 John) (instance $_5908 Flower) (objectTransferred $_5848 $_5908)))) (synthesize (: $_6712 (⟹ $_6742 (∧ (instance $_5848 Carrying) (agent $_5848 John) (instance $_5908 Flower) (objectTransferred $_5848 $_5908)))) kb rb (S (S (S (S Z)))))) ((: $_7108 $_6742) (synthesize (: $_7108 $_6742) kb rb (S (S (S (S Z))))))) (: (ModusPonens $_6712 $_7108) (∧ (instance $_5848 Carrying) (agent $_5848 John) (instance $_5908 Flower) (objectTransferred $_5848 $_5908))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01](https://logicmoo.org/public/mettareports/_22856.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01) | (assertEqual (get-type (Cons 0 (Cons 1 Nil)))) | ((Vec Number (S (S Z)))) | ((Vec Number (S (S Z)))) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.03](https://logicmoo.org/public/mettareports/_228964.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.03) | (assertEqualToResult (fc_entail (⊢ (→ A B)) kb_entail rb_entail (fromNumber 2))) | ((⊢ (→ A B)) (⊢ B) (⊢ C)) | ((⊢ B) (⊢ C) (⊢ (→ A B))) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.07](https://logicmoo.org/public/mettareports/_229018.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.07) | (assertEqual (case (+ 1 (superpose (1 2 3))) ((3 OK-3) (4 OK-4)))) | (OK-3 OK-4) | (OK-3 OK-4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10](https://logicmoo.org/public/mettareports/_229306.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10) | (assertEqualToResult (eq Z (S Z))) | ((eq Z (S Z))) | ((eq Z (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08](https://logicmoo.org/public/mettareports/_229524.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04](https://logicmoo.org/public/mettareports/_229664.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04) | (assertEqualToResult (match &kb ($prop is-a Color) (match &self ($obj is $prop) $obj))) | (Ball) | (Ball) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_229720.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04](https://logicmoo.org/public/mettareports/_22980.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (sequential ((increment) (increment) (increment)))))) | (10 11 12 13 14 15) | (10 11 12 13 14 15) | | PASS | [BASIC.KEY-LOOKUPS-MANY.08](https://logicmoo.org/public/mettareports/_229888.metta.html#BASIC.KEY-LOOKUPS-MANY.08) | (assertEqual (let $v (new-state v-7) (match &data (= (get-data $k) $v) $k))) | (k-7) | (k-7) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06](https://logicmoo.org/public/mettareports/_230578.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06) | (assertEqual (case (match &kb ($rel B_AS $x) ($rel $x)) (((SS-P_AS $y) (P_AS $y)) ((SS-Q_AS $y) (Q_AS $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.16](https://logicmoo.org/public/mettareports/_230798.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.16) | (assertEqual (match &self ($rel A $x) ($rel $x))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [BASIC.CML-UNSHARED.08](https://logicmoo.org/public/mettareports/_230934.metta.html#BASIC.CML-UNSHARED.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [BASIC.HYPERPOSING.08](https://logicmoo.org/public/mettareports/_230934.metta.html#BASIC.HYPERPOSING.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HOL.NATPARITYTEST.02](https://logicmoo.org/public/mettareports/_230966.metta.html#HOL.NATPARITYTEST.02) | (assertEqualToResult (add-atom &kb (: Z Nat))) | () | (()) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_231068.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.TESTS0.02](https://logicmoo.org/public/mettareports/_231244.metta.html#METTA-MORPH-TESTS.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03](https://logicmoo.org/public/mettareports/_23134.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03) | (assertEqualToResult (match &self (, (Frog $x) (implies (Frog $x) $y)) $y)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.42](https://logicmoo.org/public/mettareports/_231396.metta.html#ITERATIVE-CHAINING.IFC-XP.42) | (assertEqualToResult (get-atoms &kb)) | ((: ab (→ A B)) (: bc (→ B C)) (: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ... | ((: a A) (: ab (→ A B)) (: bc (→ B C)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05](https://logicmoo.org/public/mettareports/_232024.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05) | (assertEqual (let $v (new-state 1) (get-type $v))) | ((StateMonad Number)) | ((StateMonad Number)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://logicmoo.org/public/mettareports/_232110.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07](https://logicmoo.org/public/mettareports/_232374.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07) | (assertEqualToResult (get-type ((curry-a + 2) "S"))) | (Number) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07](https://logicmoo.org/public/mettareports/_232388.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07) | (assertEqualToResult (get-type ((curry-a + 2) "S"))) | (Number) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07](https://logicmoo.org/public/mettareports/_232402.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07) | (assertEqualToResult (get-type ((curry-a + 2) "S"))) | (Number) | () | | PASS | [RESOLVE.R.11](https://logicmoo.org/public/mettareports/_232702.metta.html#RESOLVE.R.11) | (assertEqualToResult (match r::&self ($x r::content) $x)) | () | () | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.05](https://logicmoo.org/public/mettareports/_232834.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.05) | (assertEqualToResult (range 1 3)) | ((1 2)) | ((1 2)) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.10](https://logicmoo.org/public/mettareports/_232934.metta.html#INFERENCE-CONTROL.INF-CTL-XP.10) | (assertEqualToResult (bc td-updater td-updater td-terminator (MkTD A (fromNumber 0)) (: $prf A))) | () | () | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.04](https://logicmoo.org/public/mettareports/_232992.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.04) | (assertEqualToResult (add-atom &kb (: AM (≼ Apr May)))) | (True) | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25](https://logicmoo.org/public/mettareports/_233344.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25) | (assertEqual (eq Z (Add Z Z))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01](https://logicmoo.org/public/mettareports/_233510.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01) | (assertEqualToResult (match &self (EvaluationLink (PredicateNode "eats") (ListLink $x (ConceptNode "flies"))) $x)) | ((ConceptNode "Sam") (ConceptNode "Fritz")) | ((ConceptNode "Fritz") (ConceptNode "Sam")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07](https://logicmoo.org/public/mettareports/_234210.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07) | (assertEqualToResult (dropN NilN)) | ((dropN NilN)) | ((dropN NilN)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09](https://logicmoo.org/public/mettareports/_234440.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09) | (assertEqualToResult (rev A (superpose (B C D)))) | ((B A) (C A) (D A)) | ((B A) (C A) (D A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04](https://logicmoo.org/public/mettareports/_234498.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04) | (assertEqual (color)) | (green yellow red) | (green yellow red) | | PASS | [COMMON.LISTTEST.03](https://logicmoo.org/public/mettareports/_234556.metta.html#COMMON.LISTTEST.03) | (assertEqualToResult (insert 2 (insert 1 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [BACKWARD-CHAINING.BC-XP.19](https://logicmoo.org/public/mettareports/_234650.metta.html#BACKWARD-CHAINING.BC-XP.19) | (assertEqual (bc_bem A Z)) | (A) | (A) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.19](https://logicmoo.org/public/mettareports/_234682.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.19) | (assertEqual (bc_bem A Z)) | (A) | (A) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07](https://logicmoo.org/public/mettareports/_234962.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07) | (assertEqual (get-type (Left 5))) | (Either) | (Either) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07](https://logicmoo.org/public/mettareports/_234976.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07) | (assertEqual (get-type (Left 5))) | (Either) | (Either) | | PASS | [NARS-V0.TESTS0.02](https://logicmoo.org/public/mettareports/_235118.metta.html#NARS-V0.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://logicmoo.org/public/mettareports/_235348.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://logicmoo.org/public/mettareports/_235348.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://logicmoo.org/public/mettareports/_235766.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.12](https://logicmoo.org/public/mettareports/_235772.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.12) | (assertEqualToResult (collapse (superpose ((nop 1))))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07](https://logicmoo.org/public/mettareports/_235918.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07) | (assertEqual (get-type (Left 5))) | (Either) | (Either) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07](https://logicmoo.org/public/mettareports/_235932.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07) | (assertEqual (get-type (Left 5))) | (Either) | (Either) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14](https://logicmoo.org/public/mettareports/_235940.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14) | (assertEqual (g 2)) | (102 102 102 102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04](https://logicmoo.org/public/mettareports/_236134.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04) | (assertEqual (color)) | (green yellow red) | (green yellow red) | | PASS | [BASIC.HYPERPOSING-SHARED.08](https://logicmoo.org/public/mettareports/_236586.metta.html#BASIC.HYPERPOSING-SHARED.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [BASIC.HYPERPOSING-UNSHARED.08](https://logicmoo.org/public/mettareports/_236586.metta.html#BASIC.HYPERPOSING-UNSHARED.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12](https://logicmoo.org/public/mettareports/_236882.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12) | (assertEqualToResult (== (A B) (A (B C)))) | (False) | (False) | | PASS | [BACKWARD-CHAINING.BC-XP.36](https://logicmoo.org/public/mettareports/_237356.metta.html#BACKWARD-CHAINING.BC-XP.36) | (assertEqualToResult (add-atom &kb_dem (: ab (→ A B)))) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.36](https://logicmoo.org/public/mettareports/_237382.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.36) | (assertEqualToResult (add-atom &kb_dem (: ab (→ A B)))) | () | (()) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.07](https://logicmoo.org/public/mettareports/_237460.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.07) | (assertEqualToResult (range 1 10)) | ((1 2 3 4 5 6 7 8 9)) | ((1 2 3 4 5 6 7 8 9)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://logicmoo.org/public/mettareports/_238042.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05](https://logicmoo.org/public/mettareports/_238102.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05) | (assertEqual (match &self (= (status (Goal $goal)) &state-active) $goal)) | () | (meditation) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01](https://logicmoo.org/public/mettareports/_238446.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01) | (assertEqual (get-type (curry +))) | ((-> Number (-> Number Number))) | ((-> Number (-> Number Number))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05](https://logicmoo.org/public/mettareports/_238448.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12](https://logicmoo.org/public/mettareports/_23844.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12) | (assertEqualToResult (== (A B) (A (B C)))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05](https://logicmoo.org/public/mettareports/_238746.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05) | (assertEqual (explain (Evaluation (mortal Plato)))) | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato... | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato))))) | | PASS | [BACKWARD-CHAINING.BC-XP.30](https://logicmoo.org/public/mettareports/_238994.metta.html#BACKWARD-CHAINING.BC-XP.30) | (assertEqual (bc_em B (fromNumber 1))) | (B) | (B) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.30](https://logicmoo.org/public/mettareports/_239026.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.30) | (assertEqual (bc_em B (fromNumber 1))) | (B) | (B) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14](https://logicmoo.org/public/mettareports/_239118.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14) | (assertEqual (g 2)) | (102 102 102 102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07](https://logicmoo.org/public/mettareports/_239318.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07) | (assertEqualToResult (dropN NilN)) | ((dropN NilN)) | ((dropN NilN)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11](https://logicmoo.org/public/mettareports/_240024.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11) | (assertEqual &m) | (&m) | ((: g (-> Number Numer))) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_240238.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05](https://logicmoo.org/public/mettareports/_240338.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05) | (assertEqual (match &self (= (status (Goal $goal)) &state-active) $goal)) | () | (meditation) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05](https://logicmoo.org/public/mettareports/_240352.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05) | (assertEqual (match &self (= (status (Goal $goal)) &state-active) $goal)) | () | (meditation) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_240414.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_240420.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.14](https://logicmoo.org/public/mettareports/_24048.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.14) | (assertEqualToResult (add-atom &kb (: JPA (≼ Jan $x)))) | (True) | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19](https://logicmoo.org/public/mettareports/_240780.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19) | (assertEqualToResult (dup 2)) | (102 102 102 102 102 102 102 102 102 12 12) | (12 102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06](https://logicmoo.org/public/mettareports/_240802.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06) | (assertEqualToResult (eq Green Blue)) | ((eq Green Blue)) | ((eq Green Blue)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://logicmoo.org/public/mettareports/_241048.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05](https://logicmoo.org/public/mettareports/_241192.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07](https://logicmoo.org/public/mettareports/_241266.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07) | (assertEqualToResult (get-type (= SocratesIsHuman PlatoIsHuman))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07](https://logicmoo.org/public/mettareports/_241268.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07) | (assertEqualToResult (get-type (= SocratesIsHuman PlatoIsHuman))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07](https://logicmoo.org/public/mettareports/_241282.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07) | (assertEqualToResult (get-type (= SocratesIsHuman PlatoIsHuman))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07](https://logicmoo.org/public/mettareports/_241294.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07) | (assertEqualToResult (get-type (= SocratesIsHuman PlatoIsHuman))) | (Type) | () | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_241432.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11](https://logicmoo.org/public/mettareports/_241582.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11) | (assertEqual &m) | (&m) | ((: g (-> Number Numer))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02](https://logicmoo.org/public/mettareports/_241912.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02) | (assertEqual (get-type (HumansAreMortal SocratesIsHuman))) | ((Mortal Socrates)) | ((Mortal Socrates)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02](https://logicmoo.org/public/mettareports/_241926.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02) | (assertEqual (get-type (HumansAreMortal SocratesIsHuman))) | ((Mortal Socrates)) | ((Mortal Socrates)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.02](https://logicmoo.org/public/mettareports/_24268.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.02) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://logicmoo.org/public/mettareports/_242972.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.TESTS0.06](https://logicmoo.org/public/mettareports/_243078.metta.html#METTA-MORPH-TESTS.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A | B) --> cat) (1.0... | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | PASS | [ITERATIVE-CHAINING.IBC-XP.03](https://logicmoo.org/public/mettareports/_243162.metta.html#ITERATIVE-CHAINING.IBC-XP.03) | (assertEqualToResult (add-atom &kb (: a A))) | () | (()) | | PASS | [BASIC.STATE-TYPES.14](https://logicmoo.org/public/mettareports/_243446.metta.html#BASIC.STATE-TYPES.14) | (assertEqual (get-type (Left 5))) | (Either) | (Either) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/_243656.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/_244190.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | () | () | | PASS | [CURRENT.TESTS5.04](https://logicmoo.org/public/mettareports/_24434.metta.html#CURRENT.TESTS5.04) | (assertEqualToResult (BeliefCycle (get-state ¤tTime))) | () | () | | FAIL | [SQL-SPACE.SQL-SPACE-TEST.03](https://logicmoo.org/public/mettareports/_244350.metta.html#SQL-SPACE.SQL-SPACE-TEST.03) | (assertEqualToResult (get-atoms &self)) | () | (GroundingSpace-0x5644bc8f9998) | | FAIL | [FLYBASE.FLYBASE-LOADER-SIZE-ESTIMATES.01](https://logicmoo.org/public/mettareports/_244486.metta.html#FLYBASE.FLYBASE-LOADER-SIZE-ESTIMATES.01) | (assertEqual (number-of (gene_map_table! $MapID $OrganismAbbreviation $ParalogGeneID 3-59 $CytogeneticLoc $SequenceLoc))) | (1) | (74) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03](https://logicmoo.org/public/mettareports/_244780.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03) | (assertEqualToResult ((curry +) 2)) | (((curry +) 2)) | (((curry +) 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09](https://logicmoo.org/public/mettareports/_244824.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09) | (assertEqualToResult (rev A (superpose (B C D)))) | ((B A) (C A) (D A)) | ((B A) (C A) (D A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12](https://logicmoo.org/public/mettareports/_245576.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12) | (assertEqual (of-same-type Color Shape)) | (T) | (T) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_245636.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://logicmoo.org/public/mettareports/_245746.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.01](https://logicmoo.org/public/mettareports/_245852.metta.html#FORMULA.DEDUCTIONFORMULATEST.01) | (assertEqualToResult (max 3 4)) | (4 4) | (4) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.05](https://logicmoo.org/public/mettareports/_245896.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.05) | (assertEqualToResult (range 1 3)) | ((1 2)) | ((1 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04](https://logicmoo.org/public/mettareports/_246078.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04) | (assertEqualToResult (< 4 (+ 2 (* 3 5)))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06](https://logicmoo.org/public/mettareports/_246330.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06) | (assertEqualToResult (eq Green Blue)) | ((eq Green Blue)) | ((eq Green Blue)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01](https://logicmoo.org/public/mettareports/_246468.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01) | (assertEqual (get-type (curry +))) | ((-> Number (-> Number Number))) | ((-> Number (-> Number Number))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01](https://logicmoo.org/public/mettareports/_24646.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (inactive) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05](https://logicmoo.org/public/mettareports/_246594.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05) | (assertEqual (explain (Evaluation (mortal Plato)))) | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato... | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05](https://logicmoo.org/public/mettareports/_246682.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05) | (assertEqual (explain (Evaluation (mortal Plato)))) | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato... | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato))))) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.02](https://logicmoo.org/public/mettareports/_246816.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.02) | (assertEqualToResult (superpose ((superpose (a b c))))) | (a b c) | (a b c) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06](https://logicmoo.org/public/mettareports/_247020.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06) | (assertEqualToResult (eq Green Blue)) | ((eq Green Blue)) | ((eq Green Blue)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06](https://logicmoo.org/public/mettareports/_247034.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06) | (assertEqualToResult (eq Green Blue)) | ((eq Green Blue)) | ((eq Green Blue)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/_247072.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/_247086.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | (T) | (T) | | PASS | [COMMON.LISTTEST.19](https://logicmoo.org/public/mettareports/_24708.metta.html#COMMON.LISTTEST.19) | (assertEqualToResult (insert_uniq 2 (insert_uniq 3 (insert_uniq 2 (insert_uniq 1 Nil))))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01](https://logicmoo.org/public/mettareports/_247228.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01) | (assertEqual (Add S Z)) | (S) | (S) | | FAIL | [ITERATORS.COMBINED.03](https://logicmoo.org/public/mettareports/_247764.metta.html#ITERATORS.COMBINED.03) | (assertEqualToResult (collapse (read-metta! (open! "neg1_pos1.txt" read)))) | ((-1)) | (((read-metta! (open! "neg1_pos1.txt" read)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://logicmoo.org/public/mettareports/_248044.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $x) $x)) | (Socrates Plato) | (Plato Socrates) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://logicmoo.org/public/mettareports/_248056.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $x) $x)) | (Socrates Plato) | (Plato Socrates) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01](https://logicmoo.org/public/mettareports/_248066.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01) | (assertEqual (get-type (curry +))) | ((-> Number (-> Number Number))) | ((-> Number (-> Number Number))) | | PASS | [NARS-V0.TESTS3.02](https://logicmoo.org/public/mettareports/_248574.metta.html#NARS-V0.TESTS3.02) | (assertEqualToResult (AddBeliefEvent (((windowAt &/ (^ open)) =/> Outside) (1.0 0.9)))) | () | () | | PASS | [NEW.TESTS5.07](https://logicmoo.org/public/mettareports/_248922.metta.html#NEW.TESTS5.07) | (assertEqualToResult (AddBeliefEvent (({(instance1) } --> ([(white) ])) (1.0 0.9)))) | () | () | | FAIL | [FORWARD-CHAINING.FC-XP.13](https://logicmoo.org/public/mettareports/_248928.metta.html#FORWARD-CHAINING.FC-XP.13) | (assertEqualToResult ===) | (===) | ("=== Bare Entail Match ===") | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.07](https://logicmoo.org/public/mettareports/_248942.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.07) | (assertEqualToResult (range 1 10)) | ((1 2 3 4 5 6 7 8 9)) | ((1 2 3 4 5 6 7 8 9)) | | FAIL | [FORWARD-CHAINER.FORWARD-CHAINER-XP.13](https://logicmoo.org/public/mettareports/_249034.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.13) | (assertEqualToResult ===) | (===) | ("=== Bare Entail Match ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04](https://logicmoo.org/public/mettareports/_249136.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04) | (assertEqualToResult (< 4 (+ 2 (* 3 5)))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04](https://logicmoo.org/public/mettareports/_249150.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04) | (assertEqualToResult (< 4 (+ 2 (* 3 5)))) | (True) | (True) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_249362.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05](https://logicmoo.org/public/mettareports/_249874.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05) | (assertEqualToResult (match &self (:= ($color $who) $tv) ('It's' $tv that $who is $color))) | (('It's' T that Sam is Green) ('It's' T that Tom is White) ('It's' F that Tom is Green)) | (('It's' F that Tom is Green) ('It's' T that Sam is Green) ('It's' T that Tom is White)) | | PASS | [PREV.TESTS0.02](https://logicmoo.org/public/mettareports/_250130.metta.html#PREV.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.TESTS0.02](https://logicmoo.org/public/mettareports/_250158.metta.html#METTA-MORPH-TESTS.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [PLN.GENE-PLN-XP.02](https://logicmoo.org/public/mettareports/_250614.metta.html#PLN.GENE-PLN-XP.02) | (assertEqualToResult (find-atoms &self (: $y (transcribed_to (gene a) $t)))) | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: transcribed_to-a-t2 (transcrib... | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: transcribed_to-a-t2 (transcribed_to (gene a) (transcript t2)))) | | PASS | [ITERATORS.COMBINED.01](https://logicmoo.org/public/mettareports/_250868.metta.html#ITERATORS.COMBINED.01) | (assertEqualToResult (add-atom &iter1 -1)) | () | (()) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.12](https://logicmoo.org/public/mettareports/_25134.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.12) | (assertEqual (:? (= Human Mortal))) | () | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04](https://logicmoo.org/public/mettareports/_251596.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04) | (assertEqualToResult (< 4 (+ 2 (* 3 5)))) | (True) | (True) | | PASS | [CURRENT.TESTS0.04](https://logicmoo.org/public/mettareports/_25182.metta.html#CURRENT.TESTS0.04) | (assertEqualToResult (|- (({(a b) } --> mwawa) (1.0 0.9)))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | | PASS | [PREV.TESTS2.01](https://logicmoo.org/public/mettareports/_251936.metta.html#PREV.TESTS2.01) | (assertEqualToResult (AddBeliefEvent (ballleft (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21](https://logicmoo.org/public/mettareports/_252016.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21) | (assertEqual (let (S (S $r)) (Add (S Z) (S Z)) $r)) | (Z) | (Z) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.04](https://logicmoo.org/public/mettareports/_252236.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.04) | (assertEqual (bc &kb depth-updater depth-updater depth-bc-terminator (fromNumber 2) (: $prf (≼ Feb Feb)))) | ((: Refl (≼ Feb Feb))) | ((: Refl (≼ Feb Feb))) | | FAIL | [ITERATIVE-CHAINING.IBC-XP.22](https://logicmoo.org/public/mettareports/_252712.metta.html#ITERATIVE-CHAINING.IBC-XP.22) | (assertEqualToResult Backward) | (Backward) | ("=== Test Iterative Chainer Wrapped Around Backward DTL Curried (collapse) ===") | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.16](https://logicmoo.org/public/mettareports/_253002.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.16) | (assertEqual (match &self ($rel A $x) ($rel $x))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://logicmoo.org/public/mettareports/_253304.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | PASS | [BACKWARD-CHAINING.BC-XP.24](https://logicmoo.org/public/mettareports/_253498.metta.html#BACKWARD-CHAINING.BC-XP.24) | (assertEqual (bc_bem (→ A C) (fromNumber 2))) | ((→ A C)) | ((→ A C)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.24](https://logicmoo.org/public/mettareports/_253506.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.24) | (assertEqual (bc_bem (→ A C) (fromNumber 2))) | ((→ A C)) | ((→ A C)) | | FAIL | [CONTAINERS-ARE-SPACES.05-MATCH-SUPERPOSE-ELEMENT-LIKE-SPACE.03](https://logicmoo.org/public/mettareports/_253528.metta.html#CONTAINERS-ARE-SPACES.05-MATCH-SUPERPOSE-ELEMENT-LIKE-SPACE.03) | (assertEqual (superpose ((P_Each B_Each) (Q_Each C_Each)))) | ((P_Each B_Each) (Q_Each C_Each)) | () | | PASS | [BASIC.STATE-TYPES.07](https://logicmoo.org/public/mettareports/_253760.metta.html#BASIC.STATE-TYPES.07) | (assertEqualToResult ("Change B-first into A")) | (("Change B-first into A")) | (("Change B-first into A")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05](https://logicmoo.org/public/mettareports/_253846.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05) | (assertEqual (let $v (new-state 1) (get-type $v))) | ((StateMonad Number)) | ((StateMonad Number)) | | FAIL | [ITERATIVE-CHAINING.IBC-XP.07](https://logicmoo.org/public/mettareports/_253918.metta.html#ITERATIVE-CHAINING.IBC-XP.07) | (assertEqualToResult ===) | (===) | ("=== Test Backward Chainer DTL Curried ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01](https://logicmoo.org/public/mettareports/_254568.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01) | (assertEqual (Add S Z)) | (S) | (S) | | FAIL | [PREV.TESTS1.03](https://logicmoo.org/public/mettareports/_254590.metta.html#PREV.TESTS1.03) | (assertEqual (EternalQuestion (({(garfield) } * ([(blue) ])) --> like))) | ((Event (None (0.5 0.0)) (eternal Nil 0.0))) | ((Event ((({(garfield) } * ([(blue) ])) --> like) (1.0 0.2965825874694874)) (eternal (Cons 2 (Cons 1 (Cons 3 Nil))) 0.643288027761712))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06](https://logicmoo.org/public/mettareports/_254666.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06) | (assertEqual (if (== (get-state (status (Goal $goal))) active) $goal (superpose ()))) | () | (lunch-order) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05](https://logicmoo.org/public/mettareports/_254674.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05) | (assertEqualToResult (match &self (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.07](https://logicmoo.org/public/mettareports/_254856.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.07) | (assertEqual (case (+ 1 (superpose (1 2 3))) ((3 OK-3) (4 OK-4)))) | (OK-3 OK-4) | (OK-3 OK-4) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.16](https://logicmoo.org/public/mettareports/_254878.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.16) | (assertEqual (match &self ($rel A $x) ($rel $x))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [HOL.NATTEST.03](https://logicmoo.org/public/mettareports/_255018.metta.html#HOL.NATTEST.03) | (assertEqual (synthesize (: $prf (=== (=== (plus Z Z) Z) (ZRID_plus Z))) kb rb (fromNumber 2))) | ((: (EqSym PropZRID_plus) (=== (=== (plus Z Z) Z) (ZRID_plus Z)))) | ((: (EqSym PropZRID_plus) (=== (=== (plus Z Z) Z) (ZRID_plus Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05](https://logicmoo.org/public/mettareports/_255080.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05) | (assertEqualToResult (match &self (:= ($color $who) $tv) ('It's' $tv that $who is $color))) | (('It's' T that Sam is Green) ('It's' T that Tom is White) ('It's' F that Tom is Green)) | (('It's' F that Tom is Green) ('It's' T that Sam is Green) ('It's' T that Tom is White)) | | PASS | [BACKWARD-CHAINING.BC-XP.03](https://logicmoo.org/public/mettareports/_255392.metta.html#BACKWARD-CHAINING.BC-XP.03) | (assertEqual (bc_bare B kb_bare rb_bare (fromNumber 1))) | (B) | (B) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.03](https://logicmoo.org/public/mettareports/_255416.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.03) | (assertEqual (bc_bare B kb_bare rb_bare (fromNumber 1))) | (B) | (B) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01](https://logicmoo.org/public/mettareports/_255432.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01) | (assertEqualToResult (match &self (implies (Frog Sam) $what) $what)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05](https://logicmoo.org/public/mettareports/_255444.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05) | (assertEqual (collapse (shape))) | (((shape))) | (((shape))) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-SUPERPOSE.01](https://logicmoo.org/public/mettareports/_255812.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-SUPERPOSE.01) | (assertEqualToResult (. (superpose (f g)) (superpose (f g)))) | ((. f f) (. f g) (. g f) (. g g)) | ((. f f) (. f g) (. g f) (. g g)) | | PASS | [HOL.NATPARITYTEST.06](https://logicmoo.org/public/mettareports/_256772.metta.html#HOL.NATPARITYTEST.06) | (assertEqualToResult (add-atom &kb (: MkEvenSS (-> (: $prf (Even $k)) (Even (S (S $k))))))) | () | (()) | | PASS | [BASIC.STATE-TYPES.23](https://logicmoo.org/public/mettareports/_256916.metta.html#BASIC.STATE-TYPES.23) | (assertEqualToResult ("bind &right_7-first with &right_7")) | (("bind &right_7-first with &right_7")) | (("bind &right_7-first with &right_7")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01](https://logicmoo.org/public/mettareports/_257398.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01) | (assertEqual (Add S Z)) | (S) | (S) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.07](https://logicmoo.org/public/mettareports/_257442.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.07) | (assertEqualToResult (fc_bare (→ A B) kb_bare rb_bare (fromNumber 2))) | ((→ A B) B C) | (B C (→ A B)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.07](https://logicmoo.org/public/mettareports/_257450.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.07) | (assertEqual (case (+ 1 (superpose (1 2 3))) ((3 OK-3) (4 OK-4)))) | (OK-3 OK-4) | (OK-3 OK-4) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.07](https://logicmoo.org/public/mettareports/_257464.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.07) | (assertEqual (case (+ 1 (superpose (1 2 3))) ((3 OK-3) (4 OK-4)))) | (OK-3 OK-4) | (OK-3 OK-4) | | PASS | [METTA-MORPH-TESTS.TESTS0.04](https://logicmoo.org/public/mettareports/_257698.metta.html#METTA-MORPH-TESTS.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://logicmoo.org/public/mettareports/_257968.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | PASS | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/_257986.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | (1764 1764) | (1764) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07](https://logicmoo.org/public/mettareports/_258052.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07) | (assertEqualToResult (pair (bin) (bin))) | ((A A) (A B) (B A) (B B)) | ((A A) (A B) (B A) (B B)) | | FAIL | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.01](https://logicmoo.org/public/mettareports/_258458.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.01) | (assertEqualToResult =====) | (=====) | ("===== Test synthesizer ====") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05](https://logicmoo.org/public/mettareports/_258624.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05) | (assertEqualToResult (match &self (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://logicmoo.org/public/mettareports/_258680.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($A mortal) (mortal $A))))) | ((mortal man)) | ((mortal man)) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_258850.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_258898.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.04](https://logicmoo.org/public/mettareports/_25892.metta.html#METTA-MORPH-TESTS.STATES-SPACES.04) | (assertEqualToResult (add-atom &WU b)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24](https://logicmoo.org/public/mettareports/_258958.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24) | (assertEqual (fmap-i (curry-a * 2) (Cons 3 (Cons 4 Nil)))) | ((Cons 6 (Cons 8 Nil))) | ((Cons 6 (Cons 8 Nil))) | | PASS | [COMMON.ORDEREDSETTEST.11](https://logicmoo.org/public/mettareports/_259000.metta.html#COMMON.ORDEREDSETTEST.11) | (assertEqual (insert (S Z) (insert (S (S Z)) (insert (S Z) (insert Z ∅))))) | ((:: Z (:: (S Z) (:: (S (S Z)) ∅))) (:: Z (:: (S Z) (:: (S (S Z)) ∅))) (:: Z (:: (S Z) (:: (S (S... | ((:: Z (:: (S Z) (:: (S (S Z)) ∅)))) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://logicmoo.org/public/mettareports/_25908.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $1 $1)) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://logicmoo.org/public/mettareports/_259238.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (add-atom &attentional_focus 1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://logicmoo.org/public/mettareports/_25932.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $1 $1)) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://logicmoo.org/public/mettareports/_259486.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $tv) $tv)) | (F) | (F) | | PASS | [BACKWARD-CHAINING.BC-XP.23](https://logicmoo.org/public/mettareports/_259512.metta.html#BACKWARD-CHAINING.BC-XP.23) | (assertEqual (bc_bem (→ B C) (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.23](https://logicmoo.org/public/mettareports/_259552.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.23) | (assertEqual (bc_bem (→ B C) (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | PASS | [ITERATIVE-CHAINING.IBC-XP.19](https://logicmoo.org/public/mettareports/_260660.metta.html#ITERATIVE-CHAINING.IBC-XP.19) | (assertEqualToResult (get-atoms &space-test)) | (A) | (A) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01](https://logicmoo.org/public/mettareports/_260832.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01) | (assertEqualToResult (match &self (implies (Frog Sam) $what) $what)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [BASIC.CML-UNSHARED.09](https://logicmoo.org/public/mettareports/_261082.metta.html#BASIC.CML-UNSHARED.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [BASIC.HYPERPOSING.09](https://logicmoo.org/public/mettareports/_261082.metta.html#BASIC.HYPERPOSING.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | FAIL | [RESOLVE.R.12](https://logicmoo.org/public/mettareports/_261140.metta.html#RESOLVE.R.12) | (assertEqualToResult (r::call_func fact 6)) | ((r::call_func fact 6)) | (720) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08](https://logicmoo.org/public/mettareports/_261194.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08) | (assertEqual ((curry-a + 2) 3)) | (5) | (5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11](https://logicmoo.org/public/mettareports/_261534.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11) | (assertEqual (is (air wet))) | ((start ventilation) (stop humidifier) (stop kettle)) | ((stop kettle) (stop humidifier) (start ventilation)) | | PASS | [CONTAINERS-ARE-SPACES.04-MATCH-LIST-LIKE-SPACE.04](https://logicmoo.org/public/mettareports/_261628.metta.html#CONTAINERS-ARE-SPACES.04-MATCH-LIST-LIKE-SPACE.04) | (assertEqual (case (match (kb) ($rel B_List $x) ($rel $x)) (((SS-P_List $y) (P_List $y)) ((SS-Q_List $y) (Q_List $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26](https://logicmoo.org/public/mettareports/_261684.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26) | (assertEqual (let $z (Add Z Z) (eqa Z $z))) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08](https://logicmoo.org/public/mettareports/_261726.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08) | (assertEqualToResult (get-type (= SocratesIsHuman SocratesIsMortal))) | (Type) | () | | PASS | [COMMON.ORDEREDSETTEST.08](https://logicmoo.org/public/mettareports/_262288.metta.html#COMMON.ORDEREDSETTEST.08) | (assertEqual (insert 2 (insert 1 ∅))) | ((:: 1 (:: 2 ∅))) | ((:: 1 (:: 2 ∅))) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_262372.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05](https://logicmoo.org/public/mettareports/_26258.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_26262.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/_262862.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07](https://logicmoo.org/public/mettareports/_263116.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07) | (assertEqualToResult (pair (bin) (bin))) | ((A A) (A B) (B A) (B B)) | ((A A) (A B) (B A) (B B)) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_263586.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_263962.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.03) | (assertEqualToResult (add-atom &kb (: ModusPonens (-> (→ $p $q) (-> $p $q))))) | () | (()) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_264844.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_264894.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09](https://logicmoo.org/public/mettareports/_265094.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09) | (assertEqual (g 2)) | (102) | (102) | | PASS | [NEW.TESTS0.01](https://logicmoo.org/public/mettareports/_265100.metta.html#NEW.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.TYPES2.01](https://logicmoo.org/public/mettareports/_265170.metta.html#METTA-MORPH-TESTS.TYPES2.01) | (assertEqualToResult (get-type lion1)) | (Lion) | (Lion) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01](https://logicmoo.org/public/mettareports/_265266.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01) | (assertEqualToResult (add-atom &kb (SS-P_AS A_AS B_AS))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05](https://logicmoo.org/public/mettareports/_265418.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05) | (assertEqualToResult (match &self (:= ($color $who) $tv) ('It's' $tv that $who is $color))) | (('It's' T that Sam is Green) ('It's' T that Tom is White) ('It's' F that Tom is Green)) | (('It's' F that Tom is Green) ('It's' T that Sam is Green) ('It's' T that Tom is White)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://logicmoo.org/public/mettareports/_265938.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [COMMON.LISTTEST.09](https://logicmoo.org/public/mettareports/_266010.metta.html#COMMON.LISTTEST.09) | (assertEqualToResult (sort (Cons 3 (Cons 1 (Cons 2 Nil))))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02](https://logicmoo.org/public/mettareports/_266196.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27](https://logicmoo.org/public/mettareports/_266226.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27) | (assertEqual (sort (Cons 3 (Cons 1 (Cons 2 Nil))))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_266716.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12](https://logicmoo.org/public/mettareports/_266722.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12) | (assertEqualToResult (== (A B) (A (B C)))) | (False) | (False) | | PASS | [BASIC.HYPERPOSING-SHARED.09](https://logicmoo.org/public/mettareports/_266742.metta.html#BASIC.HYPERPOSING-SHARED.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [BASIC.HYPERPOSING-UNSHARED.09](https://logicmoo.org/public/mettareports/_266742.metta.html#BASIC.HYPERPOSING-UNSHARED.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12](https://logicmoo.org/public/mettareports/_266750.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12) | (assertEqualToResult (== (A B) (A (B C)))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12](https://logicmoo.org/public/mettareports/_266796.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12) | (assertEqualToResult (== (A B) (A (B C)))) | (False) | (False) | | PASS | [BASIC.KEY-LOOKUPS-MANY.09](https://logicmoo.org/public/mettareports/_266848.metta.html#BASIC.KEY-LOOKUPS-MANY.09) | (assertEqual (let $v (new-state v-8) (match &data (= (get-data $k) $v) $k))) | (k-8) | (k-8) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12](https://logicmoo.org/public/mettareports/_267918.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12) | (assertEqualToResult (== (A B) (A (B C)))) | (False) | (False) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_267950.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_267952.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.21](https://logicmoo.org/public/mettareports/_268216.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.21) | (assertEqual (depth-bc-continuor (: $prf $thm) Z)) | (False) | (False) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.14](https://logicmoo.org/public/mettareports/_268242.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.14) | (assertEqualToResult (fc_dtl (: a A) kb_dtl rb_dtl (fromNumber 2))) | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_268388.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_268404.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://logicmoo.org/public/mettareports/_268438.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.13](https://logicmoo.org/public/mettareports/_268720.metta.html#INFERENCE-CONTROL.INF-CTL-XP.13) | (assertEqual (bc td-updater td-updater td-terminator (MkTD (-> $p B) (fromNumber 2)) (: ($prfabs $prfarg) (-> $p B)))) | ((: (ModusPonens ab) (-> A B))) | ((: (ModusPonens ab) (-> A B))) | | PASS | [NARS-V0.TESTS0.05](https://logicmoo.org/public/mettareports/_268852.metta.html#NARS-V0.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [HOL.NATPARITYTEST.16](https://logicmoo.org/public/mettareports/_26894.metta.html#HOL.NATPARITYTEST.16) | (assertEqualToResult (add-atom &kb (: flip (-> (: $f (-> (: $x $a) (-> (: $y $b) $c))) (-> (: $y $b) (-> (: $x $a) $c)))))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03](https://logicmoo.org/public/mettareports/_269970.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03) | (assertEqualToResult (get-type (HumansAreMortal (Human Socrates)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21](https://logicmoo.org/public/mettareports/_270242.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21) | (assertEqual (let (S (S $r)) (Add (S Z) (S Z)) $r)) | (Z) | (Z) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21](https://logicmoo.org/public/mettareports/_270256.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21) | (assertEqual (let (S (S $r)) (Add (S Z) (S Z)) $r)) | (Z) | (Z) | | PASS | [METTA-MORPH-TESTS.TESTS0.01](https://logicmoo.org/public/mettareports/_270286.metta.html#METTA-MORPH-TESTS.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://logicmoo.org/public/mettareports/_270326.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | FAIL | [DEPENDENT-TYPES.MODUSPONENSDTLTEST.03](https://logicmoo.org/public/mettareports/_270430.metta.html#DEPENDENT-TYPES.MODUSPONENSDTLTEST.03) | (assertEqualToResult (synthesize (: $proof (≞ (chase cow dog) (STV $s $c))) kb rb (fromNumber 1))) | () | ((: (ModusPonens cow_is_big x_is_big_chases_dog) (≞ (chase cow dog) (STV 0.9821 0.99))) (let* (((: $_142956 (≞ (→ (big rabbit) (chase cow dog)) (STV $_143090 $_143112))) (synthesize (: $_142956 (≞ (→ (big rabbit) (chase cow dog)) (STV $_143090 $_143112))) kb rb Z))) (: (ModusPonens rabbit_is_big $_142956) (≞ (chase cow dog) (STV (+ (* $_143090 0.99) (* 0.2 (- 1 0.99))) (if (< (if (< $_143112 1) $_143112 1) 0.99) (if (< $_143112 1) $_143112 1) 0.99))))) (let* (((: $_142956 (≞ (→ (chase rabbit cow) (chase cow dog)) (STV $_143090 $_143112))) (synthesize (: $_142956 (≞ (→ (chase rabbit cow) (chase cow dog)) (STV $_143090 $_143112))) kb rb Z))) (: (ModusPonens rabbit_chases_cow $_142956) (≞ (chase cow dog) (STV (+ (* $_143090 0.99) (* 0.2 (- 1 0.99))) (if (< (if (< $_143112 1) $_143112 1) 0.99) (if (< $_143112 1) $_143112 1) 0.99))))) (let* (((: $_142956 (≞ (→ (chase rabbit dog) (chase cow dog)) (STV $_143090 $_143112))) (synthesize (: $_142956 (≞ (→ (chase rabbit dog) (chase cow dog)) (STV $_143090 $_143112))) kb rb Z))) (: (ModusPonens rabbit_chases_dog $_142956) (≞ (chase cow dog) (STV (+ (* $_143090 0.99) (* 0.2 (- 1 0.99))) (if (< (if (< $_143112 1) $_143112 1) 0.99) (if (< $_143112 1) $_143112 1) 0.99))))) (let* (((: $_142956 (≞ (→ (need cow dog) (chase cow dog)) (STV $_143090 $_143112))) (synthesize (: $_142956 (≞ (→ (need cow dog) (chase cow dog)) (STV $_143090 $_143112))) kb rb Z))) (: (ModusPonens cow_needs_dog $_142956) (≞ (chase cow dog) (STV (+ (* $_143090 0.99) (* 0.2 (- 1 0.99))) (if (< (if (< $_143112 1) $_143112 1) 0.99) (if (< $_143112 1) $_143112 1) 0.99))))) (let* (((: $_142956 (≞ (→ (see dog rabbit) (chase cow dog)) (STV $_143090 $_143112))) (synthesize (: $_142956 (≞ (→ (see dog rabbit) (chase cow dog)) (STV $_143090 $_143112))) kb rb Z))) (: (ModusPonens dog_sees_rabbit $_142956) (≞ (chase cow dog) (STV (+ (* $_143090 0.99) (* 0.2 (- 1 0.99))) (if (< (if (< $_143112 1) $_143112 1) 0.99) (if (< $_143112 1) $_143112 1) 0.99))))) (let* (((: $_142956 (≞ (→ (see rabbit dog) (chase cow dog)) (STV $_143090 $_143112))) (synthesize (: $_142956 (≞ (→ (see rabbit dog) (chase cow dog)) (STV $_143090 $_143112))) kb rb Z))) (: (ModusPonens rabbit_sees_dog $_142956) (≞ (chase cow dog) (STV (+ (* $_143090 0.99) (* 0.2 (- 1 0.99))) (if (< (if (< $_143112 1) $_143112 1) 0.99) (if (< $_143112 1) $_143112 1) 0.99))))) (let* (((: $_142956 (≞ (→ (→ (big $_149346) (chase $_149346 dog)) (chase cow dog)) (STV $_143090 $_143112))) (synthesize (: $_142956 (≞ (→ (→ (big $_149346) (chase $_149346 dog)) (chase cow dog)) (STV $_143090 $_143112))) kb rb Z))) (: (ModusPonens x_is_big_chases_dog $_142956) (≞ (chase cow dog) (STV (+ (* $_143090 0.99) (* 0.2 (- 1 0.99))) (if (< (if (< $_143112 1) $_143112 1) 0.99) (if (< $_143112 1) $_143112 1) 0.99))))) (let* (((: $_142956 (≞ (→ (→ (chase cow dog) (see cow rabbit)) (chase cow dog)) (STV $_143090 $_143112))) (synthesize (: $_142956 (≞ (→ (→ (chase cow dog) (see cow rabbit)) (chase cow dog)) (STV $_143090 $_143112))) kb rb Z))) (: (ModusPonens cow_chases_dog_sees_rabbit $_142956) (≞ (chase cow dog) (STV (+ (* $_143090 0.99) (* 0.2 (- 1 0.99))) (if (< (if (< $_143112 1) $_143112 1) 0.99) (if (< $_143112 1) $_143112 1) 0.99)))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09](https://logicmoo.org/public/mettareports/_270474.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09) | (assertEqual (g 2)) | (102) | (102) | | PASS | [COMMON.LISTTEST.14](https://logicmoo.org/public/mettareports/_270570.metta.html#COMMON.LISTTEST.14) | (assertEqualToResult (uniq (Cons 2 (Cons 3 (Cons 1 (Cons 2 Nil)))))) | ((Cons 2 (Cons 3 (Cons 1 Nil)))) | ((Cons 2 (Cons 3 (Cons 1 Nil)))) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://logicmoo.org/public/mettareports/_270878.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | () | () | | PASS | [COMMON.ORDEREDSETTEST.04](https://logicmoo.org/public/mettareports/_271718.metta.html#COMMON.ORDEREDSETTEST.04) | (assertEqual (elem 1 (insert 1 (insert 2 ∅)))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11](https://logicmoo.org/public/mettareports/_271940.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11) | (assertEqual (is (air wet))) | ((start ventilation) (stop humidifier) (stop kettle)) | ((stop kettle) (stop humidifier) (start ventilation)) | | PASS | [POLYWARD-CHAINING.PC-XP.14](https://logicmoo.org/public/mettareports/_272628.metta.html#POLYWARD-CHAINING.PC-XP.14) | (assertEqualToResult (frc (: a A) (fromNumber 1))) | ((: a A) (: (ModusPonens ab a) B)) | ((: a A) (: (ModusPonens ab a) B)) | | PASS | [ORIENTATION.ORIENTATION-TEST.01](https://logicmoo.org/public/mettareports/_272810.metta.html#ORIENTATION.ORIENTATION-TEST.01) | (assertEqualToResult (match &kb $x (add-atom &labelled-kb (: (WitnessOf $x) $x)))) | () | (()) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_272878.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_272880.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16](https://logicmoo.org/public/mettareports/_273300.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16) | (assertEqual (fmap (curry-a + 2) (Nothing))) | ((Nothing)) | ((Nothing)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16](https://logicmoo.org/public/mettareports/_273314.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16) | (assertEqual (fmap (curry-a + 2) (Nothing))) | ((Nothing)) | ((Nothing)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16](https://logicmoo.org/public/mettareports/_273318.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16) | (assertEqualToResult (sqr 4)) | (16) | (16) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16](https://logicmoo.org/public/mettareports/_273332.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16) | (assertEqualToResult (sqr 4)) | (16) | (16) | | PASS | [ITERATIVE-CHAINING.IFC-XP.14](https://logicmoo.org/public/mettareports/_273468.metta.html#ITERATIVE-CHAINING.IFC-XP.14) | (assertEqual (ic_bare A kb_bare rb_bare Z Z)) | (kb_bare) | (kb_bare) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21](https://logicmoo.org/public/mettareports/_273600.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC "5")))) | () | () | | PASS | [METTA-MORPH-TESTS.TESTS0.05](https://logicmoo.org/public/mettareports/_273702.metta.html#METTA-MORPH-TESTS.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03](https://logicmoo.org/public/mettareports/_273914.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03) | (assertEqualToResult (get-type (HumansAreMortal (Human Socrates)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06](https://logicmoo.org/public/mettareports/_27414.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06) | (assertEqualToResult (eq Green Blue)) | ((eq Green Blue)) | ((eq Green Blue)) | | PASS | [HOL.NATPARITYTEST.14](https://logicmoo.org/public/mettareports/_274164.metta.html#HOL.NATPARITYTEST.14) | (assertEqualToResult (add-atom &kb (: double_rec (-> (: $k Nat) (=== (double (S $k)) (S (S (double $k)))))))) | () | (()) | | PASS | [COMMON.NUMTEST.08](https://logicmoo.org/public/mettareports/_274616.metta.html#COMMON.NUMTEST.08) | (assertEqual (synthesize (: $proof (⍃ Z (S Z))) kb rb Z)) | ((: ZeroLTSucc (⍃ Z (S Z))) (: ZeroLTSucc (⍃ Z (S Z)))) | ((: ZeroLTSucc (⍃ Z (S Z)))) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.08](https://logicmoo.org/public/mettareports/_274632.metta.html#TRUTHVALUE.TRUTHVALUETEST.08) | (assertEqual (inc-neg-count (STV 1 0))) | ((STV 0.0 0.5)) | ((STV 0 0.5)) | | FAIL | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.01](https://logicmoo.org/public/mettareports/_275102.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.01) | (assertEqualToResult =====) | (=====) | ("===== Test synthesizer ====") | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.23](https://logicmoo.org/public/mettareports/_275178.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.23) | (assertEqual (get-closed-proof (bc &ctl-depth-kb depth-updater depth-updater depth-continuor (fromNumber 1) (: $prf (Continue $query (S Z)))))) | (CS) | (CS) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14](https://logicmoo.org/public/mettareports/_275462.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14) | (assertEqual (g 2)) | (102 102 102 102) | (102) | | FAIL | [CURRENT.TESTS3.07](https://logicmoo.org/public/mettareports/_275592.metta.html#CURRENT.TESTS3.07) | (assertEqual (AddGoalEvent (Outside (1.0 0.9)))) | () | ((^ open)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://logicmoo.org/public/mettareports/_275918.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://logicmoo.org/public/mettareports/_276062.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01](https://logicmoo.org/public/mettareports/_276128.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01) | (assertEqual (green Fritz)) | (T) | (T) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_276262.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [NARS-V0.TESTS4.01](https://logicmoo.org/public/mettareports/_276756.metta.html#NARS-V0.TESTS4.01) | (assertEqualToResult (AddBeliefEvent (({(garfield) } --> cat) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05](https://logicmoo.org/public/mettareports/_276998.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05) | (assertEqual (let $v (new-state 1) (get-type $v))) | ((StateMonad Number)) | ((StateMonad Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05](https://logicmoo.org/public/mettareports/_277012.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05) | (assertEqual (let $v (new-state 1) (get-type $v))) | ((StateMonad Number)) | ((StateMonad Number)) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_277176.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_277186.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [NARS-EXTRAS.NARS-BUILDTUPLECOUNTS.01](https://logicmoo.org/public/mettareports/_277218.metta.html#NARS-EXTRAS.NARS-BUILDTUPLECOUNTS.01) | (assertEqualToResult (BuildTupleCounts (1) 0 10)) | () | (()) | | FAIL | [COMPILER.DEFINE-IF-LIKE.02](https://logicmoo.org/public/mettareports/_27732.metta.html#COMPILER.DEFINE-IF-LIKE.02) | (assertEqual (get-state &pass)) | (:uncalled) | (:called) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.07](https://logicmoo.org/public/mettareports/_277588.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.07) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01](https://logicmoo.org/public/mettareports/_277958.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01) | (assertEqualToResult (get-type &self)) | (hyperon::space::DynSpace) | (hyperon::space::DynSpace) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/_278170.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/_278184.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | () | () | | PASS | [JOHN-CARRY-FLOWER.JOHN-CARRY-FLOWER-TEST.03](https://logicmoo.org/public/mettareports/_278384.metta.html#JOHN-CARRY-FLOWER.JOHN-CARRY-FLOWER-TEST.03) | (assertEqualToResult (synthesize (: $proof (∧ (instance JohnsCarry Transfer) (objectTransferred JohnsCarry JohnsVase) (orientation JohnsFlower JohnsVase Inside))) kb rb (fromNumber 3))) | ((: (TrinaryConjunctionIntroduction (ModusPonens (WitnessOf (⟹ (∧ (subclass Carrying Transfer) (... | ((: (TrinaryConjunctionIntroduction (ModusPonens (WitnessOf (⟹ (∧ (subclass Carrying Transfer) (instance JohnsCarry Carrying)) (instance JohnsCarry Transfer))) (BinaryConjunctionIntroduction (WitnessOf (subclass Carrying Transfer)) (WitnessOf (instance JohnsCarry Carrying)))) (WitnessOf (objectTransferred JohnsCarry JohnsVase)) (WitnessOf (orientation JohnsFlower JohnsVase Inside))) (∧ (instance JohnsCarry Transfer) (objectTransferred JohnsCarry JohnsVase) (orientation JohnsFlower JohnsVase Inside))) (let* (((: $_5010 (⟹ $_5040 (∧ (instance JohnsCarry Transfer) (objectTransferred JohnsCarry JohnsVase) (orientation JohnsFlower JohnsVase Inside)))) (synthesize (: $_5010 (⟹ $_5040 (∧ (instance JohnsCarry Transfer) (objectTransferred JohnsCarry JohnsVase) (orientation JohnsFlower JohnsVase Inside)))) kb rb (S (S Z)))) ((: $_5346 $_5040) (synthesize (: $_5346 $_5040) kb rb (S (S Z))))) (: (ModusPonens $_5010 $_5346) (∧ (instance JohnsCarry Transfer) (objectTransferred JohnsCarry JohnsVase) (orientation JohnsFlower JohnsVase Inside))))) | | PASS | [COMMON.LISTTEST.18](https://logicmoo.org/public/mettareports/_278388.metta.html#COMMON.LISTTEST.18) | (assertEqualToResult (insert_uniq 3 (insert_uniq 2 (insert_uniq 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.11](https://logicmoo.org/public/mettareports/_278520.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.11) | (assertEqualToResult (add-atom &kb (: ND (≼ Nov Dec)))) | (True) | (()) | | PASS | [ITERATIVE-CHAINING.IFC-XP.30](https://logicmoo.org/public/mettareports/_278554.metta.html#ITERATIVE-CHAINING.IFC-XP.30) | (assertEqualToResult (add-atom &rb (: ModusPonens (-> (→ $p $q) $p $q)))) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06](https://logicmoo.org/public/mettareports/_278822.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06) | (assertEqual (if (== (get-state (status (Goal $goal))) active) $goal (superpose ()))) | () | (lunch-order) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05](https://logicmoo.org/public/mettareports/_278864.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05) | (assertEqual (let $v (new-state 1) (get-type $v))) | ((StateMonad Number)) | ((StateMonad Number)) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.05](https://logicmoo.org/public/mettareports/_278928.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.05) | (assertEqualToResult (add-atom &kb (: MJ (≼ May Jun)))) | (True) | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://logicmoo.org/public/mettareports/_27904.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (match &belief_events $1 $1)) | (belief1) | (belief1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12](https://logicmoo.org/public/mettareports/_279640.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12) | (assertEqual (of-same-type Color Shape)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09](https://logicmoo.org/public/mettareports/_279768.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09) | (assertEqualToResult (nop (change-state! &state-token (C D)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01](https://logicmoo.org/public/mettareports/_279782.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01) | (assertEqualToResult (Frog Sam)) | ((Frog Sam)) | ((Frog Sam)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.02](https://logicmoo.org/public/mettareports/_279908.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.02) | (assertEqualToResult (fc_entail (⊢ A) kb_entail rb_entail (fromNumber 2))) | ((⊢ A) (⊢ B) (⊢ C)) | ((⊢ A) (⊢ B) (⊢ C)) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_280118.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_280792.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02](https://logicmoo.org/public/mettareports/_280802.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02) | (assertEqual (get-type ((curry +) 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [BACKWARD-CHAINING.BC-XP.14](https://logicmoo.org/public/mettareports/_281470.metta.html#BACKWARD-CHAINING.BC-XP.14) | (assertEqualToResult (add-atom &kb_bem (→ A B))) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.14](https://logicmoo.org/public/mettareports/_281496.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.14) | (assertEqualToResult (add-atom &kb_bem (→ A B))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01](https://logicmoo.org/public/mettareports/_281542.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01) | (assertEqual (green Fritz)) | (T) | (T) | | PASS | [EXPERIMENTS.UNIFY-VIA-LET.05](https://logicmoo.org/public/mettareports/_282382.metta.html#EXPERIMENTS.UNIFY-VIA-LET.05) | (assertEqualToResult (let* (($gy (g $y)) ($gy (Link $x B))) (Link $x $y))) | ((Link A B)) | ((Link A B)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05](https://logicmoo.org/public/mettareports/_282478.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_283350.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01](https://logicmoo.org/public/mettareports/_283358.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01) | (assertEqualToResult (get-type &self)) | (hyperon::space::DynSpace) | (hyperon::space::DynSpace) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_283434.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_283550.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_283610.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.03](https://logicmoo.org/public/mettareports/_283752.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.03) | (assertEqualToResult (superpose ((superpose (a b c)) (superpose (x y z))))) | (a b c x y z) | (a b c x y z) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.12](https://logicmoo.org/public/mettareports/_283808.metta.html#INFERENCE-CONTROL.INF-CTL-XP.12) | (assertEqual (bc td-updater td-updater td-terminator (MkTD (-> $pq (-> $p B)) (fromNumber 2)) (: $prfabs (-> $pq (-> $p B))))) | ((: ModusPonens (-> (→ $_280676 B) (-> $_280676 B)))) | ((: ModusPonens (-> (→ $_280676 B) (-> $_280676 B)))) | | PASS | [METTA-MORPH-TESTS.TYPES3.01](https://logicmoo.org/public/mettareports/_284582.metta.html#METTA-MORPH-TESTS.TYPES3.01) | (assertEqualToResult (match &self (GreaterThan $x $y) (If (and (== (get-type $x) Number) (== (get-type $y) Number)) (If (EqualOrGreater $x $y) yay)))) | (yay) | (yay) | | FAIL | [CONTAINERS-ARE-SPACES.04-MATCH-LIST-LIKE-SPACE.01](https://logicmoo.org/public/mettareports/_28462.metta.html#CONTAINERS-ARE-SPACES.04-MATCH-LIST-LIKE-SPACE.01) | (assertEqualToResult (match (kb) ($SS A_List $X) ($SS A_List $X))) | () | ((SS-P_List A_List B_List) (SS-Q_List A_List C_List)) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_284936.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_284944.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01](https://logicmoo.org/public/mettareports/_285182.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01) | (assertEqualToResult (Frog Sam)) | ((Frog Sam)) | ((Frog Sam)) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_285348.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05](https://logicmoo.org/public/mettareports/_285532.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05) | (assertEqualToResult (and (> 4 2) (< 4 3))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://logicmoo.org/public/mettareports/_285840.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $tv) $tv)) | (F) | (F) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://logicmoo.org/public/mettareports/_286098.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [BACKWARD-CHAINING.BC-XP.37](https://logicmoo.org/public/mettareports/_286210.metta.html#BACKWARD-CHAINING.BC-XP.37) | (assertEqualToResult (add-atom &kb_dem (: bc (→ B C)))) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.37](https://logicmoo.org/public/mettareports/_286252.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.37) | (assertEqualToResult (add-atom &kb_dem (: bc (→ B C)))) | () | (()) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.02](https://logicmoo.org/public/mettareports/_286618.metta.html#FORMULA.DEDUCTIONFORMULATEST.02) | (assertEqualToResult (min 3 4)) | (3 3) | (3) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.08](https://logicmoo.org/public/mettareports/_286660.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.08) | (assertEqual (case (+ 1 (superpose (1 2 3))) (($x (+ 1 $x))))) | (3 4 5) | (3 4 5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07](https://logicmoo.org/public/mettareports/_286932.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07) | (assertEqualToResult (> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | | PASS | [HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01](https://logicmoo.org/public/mettareports/_287192.metta.html#HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01) | (assertEqualToResult (collapse (superpose ((superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (4 5 6 4 5 6 4 5 6 4 5... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 ... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9)) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.04](https://logicmoo.org/public/mettareports/_287286.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.04) | (assertEqual (:? (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | () | (Prop) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03](https://logicmoo.org/public/mettareports/_28742.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03) | (assertEqualToResult (match &self (= ($p Fritz) T) $p)) | (croaks eat_flies) | (croaks eat_flies) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.05](https://logicmoo.org/public/mettareports/_287554.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.05) | (assertEqualToResult (bc &kb depth-updater depth-updater depth-bc-terminator (fromNumber 2) (: $prf (≼ Jan Feb)))) | ((: JF (≼ Jan Feb)) (: JPA (≼ Jan Feb))) | ((: JF (≼ Jan Feb)) (: JPA (≼ Jan Feb))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19](https://logicmoo.org/public/mettareports/_287692.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19) | (assertEqualToResult (dup 2)) | (102 102 102 102 102 102 102 102 102 12 12) | (12 102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10](https://logicmoo.org/public/mettareports/_287724.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10) | (assertEqual (get-type (LeftP 5))) | ((EitherP Number)) | ((EitherP Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01](https://logicmoo.org/public/mettareports/_28816.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01) | (assertEqual (get-type (Cons 0 (Cons 1 Nil)))) | ((Vec Number (S (S Z)))) | ((Vec Number (S (S Z)))) | | PASS | [METTA-MORPH-TESTS.TESTS0.07](https://logicmoo.org/public/mettareports/_288810.metta.html#METTA-MORPH-TESTS.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05](https://logicmoo.org/public/mettareports/_289648.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05) | (assertEqual (collapse (shape))) | (((shape))) | (((shape))) | | PASS | [HOL.NATSTANDALONETEST.10](https://logicmoo.org/public/mettareports/_289742.metta.html#HOL.NATSTANDALONETEST.10) | (assertEqual (bc (: $prf (=== (plus Z $y) $y)) Z)) | ((: plusBase (=== (plus Z $_286704) $_286704))) | ((: plusBase (=== (plus Z $_286704) $_286704))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10](https://logicmoo.org/public/mettareports/_290510.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10) | (assertEqual (get-type (LeftP 5))) | ((EitherP Number)) | ((EitherP Number)) | | FAIL | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.19](https://logicmoo.org/public/mettareports/_290660.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.19) | (assertEqualToResult (let $results (collapse (get-closed-proof (bc &ctl-depth-kb depth-updater depth-updater depth-continuor (fromNumber 1) (: $prf (Continue $query Z))))) $results)) | () | (((Error (get-closed-proof (bc GroundingSpace-0x559dcff42fb8 depth-updater depth-updater depth-continuor (fromNumber 1) (: $_3720 (Continue $_3758 Z)))) NoValidAlternatives))) | | PASS | [METTA-MORPH-TESTS.TYPES2.02](https://logicmoo.org/public/mettareports/_290812.metta.html#METTA-MORPH-TESTS.TYPES2.02) | (assertEqualToResult (reproduce lion1 lion2)) | (childlion) | (childlion) | | PASS | [HOL.NATSTANDALONETEST.11](https://logicmoo.org/public/mettareports/_29090.metta.html#HOL.NATSTANDALONETEST.11) | (assertEqual (bc (: $prf (=== (=== (plus Z Z) Z) (plusRightId Z))) (fromNumber 2))) | ((: (Sym plusRightIdProp) (=== (=== (plus Z Z) Z) (plusRightId Z)))) | ((: (Sym plusRightIdProp) (=== (=== (plus Z Z) Z) (plusRightId Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://logicmoo.org/public/mettareports/_291046.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $tv) $tv)) | (F) | (F) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://logicmoo.org/public/mettareports/_291060.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $tv) $tv)) | (F) | (F) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05](https://logicmoo.org/public/mettareports/_291284.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05) | (assertEqual (collapse (shape))) | (((shape))) | (((shape))) | | PASS | [ITERATIVE-CHAINING.IFC-XP.04](https://logicmoo.org/public/mettareports/_291324.metta.html#ITERATIVE-CHAINING.IFC-XP.04) | (assertEqualToResult (fc_bare (→ A B) kb_bare rb_bare (fromNumber 2))) | (C C) | (C) | | PASS | [LOCATED.LOCATED-TEST.02](https://logicmoo.org/public/mettareports/_291652.metta.html#LOCATED.LOCATED-TEST.02) | (assertEqualToResult (synthesize (: $proof (located John JohnsHouse)) kb rb (S Z))) | ((: (ModusPonens (WitnessOf (⟹ (orientation John JohnsHouse Inside) (located John JohnsHouse))) (W... | ((: (ModusPonens (WitnessOf (⟹ (orientation John JohnsHouse Inside) (located John JohnsHouse))) (WitnessOf (orientation John JohnsHouse Inside))) (located John JohnsHouse)) (let* (((: $_95830 (∧ (located John $_95892) (located $_95892 JohnsHouse))) (synthesize (: $_95830 (∧ (located John $_95892) (located $_95892 JohnsHouse))) kb rb Z))) (: (ModusPonens (WitnessOf (⟹ (∧ (located John $_95892) (located $_95892 JohnsHouse)) (located John JohnsHouse))) $_95830) (located John JohnsHouse)))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://logicmoo.org/public/mettareports/_291740.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://logicmoo.org/public/mettareports/_291750.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://logicmoo.org/public/mettareports/_291756.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_292024.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_292030.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_292036.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.04) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.02](https://logicmoo.org/public/mettareports/_292104.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.02) | (assertEqualToResult (add-atom &kb (: FM (≼ Feb Mar)))) | (True) | (()) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_292120.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08](https://logicmoo.org/public/mettareports/_292172.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | PASS | [NEW.TESTS4.04](https://logicmoo.org/public/mettareports/_292388.metta.html#NEW.TESTS4.04) | (assertEqualToResult (AddBeliefEvent (((({(garfield) } * ([(blue) ])) --> like) ==> ({(garfield) } --> artist)) (1.0 0.9)))) | () | () | | PASS | [ITERATORS.COMBINED.02](https://logicmoo.org/public/mettareports/_292702.metta.html#ITERATORS.COMBINED.02) | (assertEqualToResult (add-atom &iter1 1)) | () | (()) | | PASS | [POLYWARD-CHAINING.PC-XP.06](https://logicmoo.org/public/mettareports/_293018.metta.html#POLYWARD-CHAINING.PC-XP.06) | (assertEqualToResult (add-atom &rb (: Deduction (-> (→ $p $q) (→ $q $r) (→ $p $r))))) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08](https://logicmoo.org/public/mettareports/_293572.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08) | (assertEqualToResult (get-type (= SocratesIsHuman SocratesIsMortal))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08](https://logicmoo.org/public/mettareports/_293574.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08) | (assertEqualToResult (get-type (= SocratesIsHuman SocratesIsMortal))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08](https://logicmoo.org/public/mettareports/_293588.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08) | (assertEqualToResult (get-type (= SocratesIsHuman SocratesIsMortal))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08](https://logicmoo.org/public/mettareports/_293600.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08) | (assertEqualToResult (get-type (= SocratesIsHuman SocratesIsMortal))) | (Type) | () | | FAIL | [RESOLVE.R.13](https://logicmoo.org/public/mettareports/_293834.metta.html#RESOLVE.R.13) | (assertEqualToResult (r::call_func r::fact 6)) | ((r::call_func r::fact 6)) | (720) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12](https://logicmoo.org/public/mettareports/_294814.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12) | (assertEqual ((lambda $x (+ $x 1)) 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15](https://logicmoo.org/public/mettareports/_294954.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15) | (assertEqual (f 2)) | (103 103 103 103) | (103) | | PASS | [BACKWARD-CHAINING.BC-XP.02](https://logicmoo.org/public/mettareports/_29500.metta.html#BACKWARD-CHAINING.BC-XP.02) | (assertEqual (bc_bare A kb_bare rb_bare Z)) | (A) | (A) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.02](https://logicmoo.org/public/mettareports/_29508.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.02) | (assertEqual (bc_bare A kb_bare rb_bare Z)) | (A) | (A) | | PASS | [FORWARD-CHAINING.FC-XP.08](https://logicmoo.org/public/mettareports/_295380.metta.html#FORWARD-CHAINING.FC-XP.08) | (assertEqualToResult (let (→ $x $y) (kb_bare) (fc_bare (→ $x $y) kb_bare rb_bare (fromNumber 2)))) | ((→ A B) B C (→ B C)) | (B C (→ A B) (→ B C)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.08](https://logicmoo.org/public/mettareports/_295386.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.08) | (assertEqualToResult (let (→ $x $y) (kb_bare) (fc_bare (→ $x $y) kb_bare rb_bare (fromNumber 2)))) | ((→ A B) B C (→ B C)) | (B C (→ A B) (→ B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13](https://logicmoo.org/public/mettareports/_295406.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13) | (assertEqual (of-same-type Green Red)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01](https://logicmoo.org/public/mettareports/_295644.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.03](https://logicmoo.org/public/mettareports/_295830.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.03) | (assertEqualToResult (get-type base_prf)) | ((≞ (→ P Q) (ETV (:: (S (S Z)) ∅) (STV 0 0.5))) (≞ (→ P Q) (ETV (:: (S (S Z)) ∅) (STV 0 ... | ((≞ (→ P Q) (ETV (:: (S (S Z)) ∅) (STV 0 0.5)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22](https://logicmoo.org/public/mettareports/_29604.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC (Null) 5)))) | () | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06](https://logicmoo.org/public/mettareports/_296302.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06) | (assertEqual (if (== (get-state (status (Goal $goal))) active) $goal (superpose ()))) | () | (lunch-order) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06](https://logicmoo.org/public/mettareports/_296328.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06) | (assertEqual (get-type &state-token)) | ((StateMonad Expression)) | ((StateMonad Expression)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09](https://logicmoo.org/public/mettareports/_296490.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09) | (assertEqualToResult (nop (change-state! &state-token (C D)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13](https://logicmoo.org/public/mettareports/_296650.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13) | (assertEqualToResult (== 4 (+ ln 2))) | (False) | (False) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.11](https://logicmoo.org/public/mettareports/_296822.metta.html#INFERENCE-CONTROL.INF-CTL-XP.11) | (assertEqual (bc td-updater td-updater td-terminator (MkTD A (fromNumber 2)) (: $prf A))) | ((: a A)) | ((: a A)) | | PASS | [NARS-V0.TESTS3.03](https://logicmoo.org/public/mettareports/_297736.metta.html#NARS-V0.TESTS3.03) | (assertEqualToResult (AddBeliefEvent (((doorAt &/ (^ open)) =/> Outside) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01](https://logicmoo.org/public/mettareports/_297912.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01) | (assertEqualToResult (match &self (:= (S K K x) $r) $r)) | ((K x (K x))) | ((K x (K x))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://logicmoo.org/public/mettareports/_298030.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15](https://logicmoo.org/public/mettareports/_298132.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15) | (assertEqual (f 2)) | (103 103 103 103) | (103) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://logicmoo.org/public/mettareports/_298268.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02](https://logicmoo.org/public/mettareports/_29838.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02) | (assertEqualToResult (match &self ($who is a $what) ($who the $what))) | ((Sam the frog) (Tom the cat) (Sophia the robot)) | ((Sam the frog) (Sophia the robot) (Tom the cat)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06](https://logicmoo.org/public/mettareports/_298538.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06) | (assertEqual (if (== (get-state (status (Goal $goal))) active) $goal (superpose ()))) | () | (lunch-order) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06](https://logicmoo.org/public/mettareports/_298552.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06) | (assertEqual (if (== (get-state (status (Goal $goal))) active) $goal (superpose ()))) | () | (lunch-order) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://logicmoo.org/public/mettareports/_298578.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | (T) | (T) | | FAIL | [NEW.TESTS0.06](https://logicmoo.org/public/mettareports/_299308.metta.html#NEW.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | FAIL | [NARS-V0.TESTS5.07](https://logicmoo.org/public/mettareports/_299582.metta.html#NARS-V0.TESTS5.07) | (assertEqual (EternalQuestion (sheep --> ([(see) ])))) | ((Event (None (0.5 0.0)) (eternal Nil 0.0))) | ((Event ((sheep --> ([(see) ])) (1.0 0.28712091374556914)) (eternal (5 4 3) (0 0.0)))) | | PASS | [COMMON.LISTTEST.10](https://logicmoo.org/public/mettareports/_299620.metta.html#COMMON.LISTTEST.10) | (assertEqualToResult ("============ Test elem ============")) | (("============ Test elem ============")) | (("============ Test elem ============")) | | PASS | [ITERATIVE-CHAINING.IBC-XP.23](https://logicmoo.org/public/mettareports/_299672.metta.html#ITERATIVE-CHAINING.IBC-XP.23) | (assertEqual (isyn (: a A) Z Z)) | ((: a A)) | ((: a A)) | | FAIL | [CURRENT.TESTS5.10](https://logicmoo.org/public/mettareports/_299756.metta.html#CURRENT.TESTS5.10) | (assertEqual (EternalQuestion (sheep --> ([(see) ])))) | ((Event (None (0.5 0.0)) (eternal Nil 0.0))) | ((Event ((sheep --> ([(see) ])) (1.0 0.28712091374556914)) (eternal (5 4 3) (0 0.0)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02](https://logicmoo.org/public/mettareports/_299830.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02) | (assertEqualToResult (match &self (implies ($P $x) (Green Sam)) ($x might be $P))) | ((Sam might be Frog)) | ((Sam might be Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05](https://logicmoo.org/public/mettareports/_300002.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05) | (assertEqual (get-type (ConsN "1" (ConsN "2" NilN)))) | ((VecN String 2)) | ((VecN String 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09](https://logicmoo.org/public/mettareports/_300092.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09) | (assertEqual (g 2)) | (102) | (102) | | FAIL | [BACKWARD-CHAINING.BC-XP.25](https://logicmoo.org/public/mettareports/_300144.metta.html#BACKWARD-CHAINING.BC-XP.25) | (assertEqualToResult ===) | (===) | ("=== Equality Match ===") | | FAIL | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.25](https://logicmoo.org/public/mettareports/_300168.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.25) | (assertEqualToResult ===) | (===) | ("=== Equality Match ===") | | FAIL | [CURRENT.TESTS0.08](https://logicmoo.org/public/mettareports/_300334.metta.html#CURRENT.TESTS0.08) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [HOL.NATSTANDALONETEST.08](https://logicmoo.org/public/mettareports/_300392.metta.html#HOL.NATSTANDALONETEST.08) | (assertEqualToResult (add-atom &kb (: plusRightIdProp (=== (plusRightId $x) (=== (plus $x Z) $x))))) | () | (()) | | PASS | [POLYWARD-CHAINING.PC-XP.11](https://logicmoo.org/public/mettareports/_300450.metta.html#POLYWARD-CHAINING.PC-XP.11) | (assertEqualToResult (bc (: $prf C) (fromNumber 2))) | ((: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deduction ab bc) a) C)) | ((: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deduction ab bc) a) C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.06](https://logicmoo.org/public/mettareports/_30066.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.06) | (assertEqual (case 5 ((6 OK)))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02](https://logicmoo.org/public/mettareports/_300674.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02) | (assertEqualToResult (add-atom &kb (SS-Q_AS A_AS C_AS))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01](https://logicmoo.org/public/mettareports/_301044.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://logicmoo.org/public/mettareports/_301398.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $tv) $tv)) | (F) | (F) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08](https://logicmoo.org/public/mettareports/_301522.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08) | (assertEqual ((curry-a + 2) 3)) | (5) | (5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08](https://logicmoo.org/public/mettareports/_301536.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08) | (assertEqual ((curry-a + 2) 3)) | (5) | (5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08](https://logicmoo.org/public/mettareports/_301550.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08) | (assertEqual ((curry-a + 2) 3)) | (5) | (5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06](https://logicmoo.org/public/mettareports/_301742.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06) | (assertEqualToResult (shape)) | ((shape)) | ((shape)) | | PASS | [METTA-MORPH-TESTS.COLLAPSE.01](https://logicmoo.org/public/mettareports/_301942.metta.html#METTA-MORPH-TESTS.COLLAPSE.01) | (assertEqualToResult (collapse (1 2 3))) | (((1 2 3))) | (((1 2 3))) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.01](https://logicmoo.org/public/mettareports/_302538.metta.html#METTA-MORPH-TESTS.STATES-SPACES.01) | (assertEqualToResult (get-state &FIFO)) | (45) | (45) | | FAIL | [HOL.NATSTANDALONETEST.14](https://logicmoo.org/public/mettareports/_303160.metta.html#HOL.NATSTANDALONETEST.14) | (assertEqualToResult (bc (: $prf (-> (plusRightId $x) (plusRightId (S $x)))) (fromNumber 4))) | () | ((: (Replace0 (Cong (Cong ((Trans (Sym plusBase)) ((Trans plusBase) plusBase))))) (-> (plusRightId (S $_14482)) (plusRightId (S (S $_14482))))) (: (Replace0 (Cong (Cong ((Trans (Sym plusBase)) ((Trans plusBase) plusRec))))) (-> (plusRightId (S (plus $_14704 $_14722))) (plusRightId (S (S (plus $_14704 $_14722)))))) (: (Replace0 (Cong (Cong ((Trans (Sym plusBase)) ((Trans plusBase) (Cong plusBase)))))) (-> (plusRightId (S $_14482)) (plusRightId (S (S $_14482))))) (: (Replace0 (Cong (Cong ((Trans (Sym plusBase)) ((Trans plusBase) (Cong plusRec)))))) (-> (plusRightId (S (S (plus $_13918 $_13936)))) (plusRightId (S (S (S (plus $_13918 $_13936))))))) (: (Replace0 (Cong (Cong ((Trans (Sym plusBase)) ((Trans plusBase) (Cong plusRightIdProp)))))) (-> (plusRightId (S (=== (plus $_14212 Z) $_14212))) (plusRightId (S (S (=== (plus $_14212 Z) $_14212)))))) (: (Replace0 (Cong ((Trans plusBase) ((Trans (Sym plusBase)) ((Trans plusBase) plusBase))))) (-> (plusRightId (plus Z $_13222)) (plusRightId (S (plus Z $_13222))))) (: (Replace0 (Cong ((Trans plusBase) ((Trans (Sym plusBase)) ((Trans plusBase) plusRec))))) (-> (plusRightId (plus Z $_13222)) (plusRightId (S (plus Z $_13222))))) (: (Replace0 (Cong ((Trans plusBase) ((Trans (Sym plusBase)) ((Trans plusBase) (Cong plusBase)))))) (-> (plusRightId (plus Z $_13222)) (plusRightId (S (plus Z $_13222))))) (: (Replace0 (Cong ((Trans plusRec) (Cong ((Trans plusBase) plusBase))))) (-> (plusRightId (plus (S Z) $_12742)) (plusRightId (S (plus (S Z) $_12742))))) (: (Replace0 (Cong ((Trans plusRec) (Cong ((Trans plusBase) (Sym plusRec)))))) (-> (plusRightId (plus (S Z) $_12742)) (plusRightId (S (plus (S Z) $_12742))))) (: (Replace0 (Cong ((Trans plusRec) ((Trans (Cong plusBase)) (Cong plusBase))))) (-> (plusRightId (plus (S Z) $_12016)) (plusRightId (S (plus (S Z) $_12016))))) (: (Replace0 (Cong ((Trans plusRec) ((Trans (Cong plusBase)) (Cong (Sym plusRec)))))) (-> (plusRightId (plus (S Z) $_12016)) (plusRightId (S (plus (S Z) $_12016))))) (: (Replace0 (Cong ((Trans plusRec) ((Trans (Cong plusBase)) (Sym (Cong plusRec)))))) (-> (plusRightId (plus (S Z) $_12016)) (plusRightId (S (plus (S Z) $_12016))))) (: (Replace0 (Cong ((Trans (Sym plusBase)) ((Trans plusBase) plusBase)))) (-> (plusRightId $_15652) (plusRightId (S $_15652)))) (: (Replace0 (Cong ((Trans (Sym plusBase)) ((Trans plusBase) plusRec)))) (-> (plusRightId (plus $_15838 $_15856)) (plusRightId (S (plus $_15838 $_15856))))) (: (Replace0 (Cong ((Trans (Sym plusBase)) ((Trans plusBase) (Cong plusBase))))) (-> (plusRightId $_15652) (plusRightId (S $_15652)))) (: (Replace0 (Cong ((Trans (Sym plusBase)) ((Trans plusBase) (Cong plusRec))))) (-> (plusRightId (S (plus $_15160 $_15178))) (plusRightId (S (S (plus $_15160 $_15178)))))) (: (Replace0 (Cong ((Trans (Sym plusBase)) ((Trans plusBase) (Cong plusRightIdProp))))) (-> (plusRightId (=== (plus $_15418 Z) $_15418)) (plusRightId (S (=== (plus $_15418 Z) $_15418))))) (: ((. (Replace0 (Sym plusRightIdProp))) ((. (Trans plusRec)) ((. Cong) (Replace0 plusRightIdProp)))) (-> (plusRightId $_11764) (plusRightId (S $_11764))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01](https://logicmoo.org/public/mettareports/_303316.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01) | (assertEqualToResult (match &self (:= (S K K x) $r) $r)) | ((K x (K x))) | ((K x (K x))) | | PASS | [BASIC.KEY-LOOKUPS-MANY.10](https://logicmoo.org/public/mettareports/_303578.metta.html#BASIC.KEY-LOOKUPS-MANY.10) | (assertEqual (let $v (new-state v-9) (match &data (= (get-data $k) $v) $k))) | (k-9) | (k-9) | | PASS | [BACKWARD-CHAINING.BC-XP.42](https://logicmoo.org/public/mettareports/_303642.metta.html#BACKWARD-CHAINING.BC-XP.42) | (assertEqualToResult (bc_dem (: $prf C) (fromNumber 2))) | ((: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deduction ab bc) a) C)) | ((: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deduction ab bc) a) C)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.42](https://logicmoo.org/public/mettareports/_303682.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.42) | (assertEqualToResult (bc_dem (: $prf C) (fromNumber 2))) | ((: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deduction ab bc) a) C)) | ((: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deduction ab bc) a) C)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.01](https://logicmoo.org/public/mettareports/_303802.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.01) | (assertEqualToResult (TupleConcat (a b c) (e f g))) | ((a b c e f g)) | ((a b c e f g)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://logicmoo.org/public/mettareports/_303902.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | PASS | [METTA-MORPH-TESTS.TYPES.01](https://logicmoo.org/public/mettareports/_304090.metta.html#METTA-MORPH-TESTS.TYPES.01) | (assertEqualToResult (f 42)) | (42) | (42) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.03](https://logicmoo.org/public/mettareports/_304184.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.03) | (assertEqualToResult (filter even (Cons 2 (Cons 3 (Cons 1 Nil))))) | ((Cons 2 Nil)) | ((Cons 2 Nil)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14](https://logicmoo.org/public/mettareports/_304756.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14) | (assertEqual (g 2)) | (102 102 102 102) | (102) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05](https://logicmoo.org/public/mettareports/_304806.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | FAIL | [EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.03](https://logicmoo.org/public/mettareports/_304948.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.03) | (assertEqualToResult (record synthesize ((: $term (-> String Number Number)) kb rb (S Z)))) | ((⊷ synthesize ((: $_302570 (-> String Number Number)) kb rb (S Z)) (: $_302648 (-> String Number ... | ((: f (-> Number String))) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://logicmoo.org/public/mettareports/_305040.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [CURRENT.TESTS5.08](https://logicmoo.org/public/mettareports/_305140.metta.html#CURRENT.TESTS5.08) | (assertEqualToResult (AddBeliefEvent (({(instance1) } --> ([(see) ])) (1.0 0.9)))) | () | () | | PASS | [NARS-V0.TESTS5.05](https://logicmoo.org/public/mettareports/_305146.metta.html#NARS-V0.TESTS5.05) | (assertEqualToResult (AddBeliefEvent (({(instance1) } --> ([(see) ])) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02](https://logicmoo.org/public/mettareports/_305230.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02) | (assertEqualToResult (match &self (implies ($P $x) (Green Sam)) ($x might be $P))) | ((Sam might be Frog)) | ((Sam might be Frog)) | | PASS | [EXTEND.EXAMPLE2.01](https://logicmoo.org/public/mettareports/_30538.metta.html#EXTEND.EXAMPLE2.01) | (assertEqualToResult (extend-py! mettamorph)) | () | () | | FAIL | [ITERATORS.COMBINED.04](https://logicmoo.org/public/mettareports/_305678.metta.html#ITERATORS.COMBINED.04) | (assertEqualToResult (let $stream (open! "neg1_pos1.txt" read) (collapse (read-metta! $stream)))) | ((-1)) | (((read-metta! (open! "neg1_pos1.txt" read)))) | | PASS | [PREV.TESTS3.01](https://logicmoo.org/public/mettareports/_305848.metta.html#PREV.TESTS3.01) | (assertEqualToResult (AddBeliefEvent (((corridorIn &/ (^ forward)) =/> doorAt) (1.0 0.9)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://logicmoo.org/public/mettareports/_305892.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02](https://logicmoo.org/public/mettareports/_306406.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02) | (assertEqual (get-type ((curry +) 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03](https://logicmoo.org/public/mettareports/_306416.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03) | (assertEqualToResult (get-type (HumansAreMortal (Human Socrates)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03](https://logicmoo.org/public/mettareports/_306430.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03) | (assertEqualToResult (get-type (HumansAreMortal (Human Socrates)))) | () | () | | FAIL | [EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.09](https://logicmoo.org/public/mettareports/_306670.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.09) | (assertEqualToResult (record synthesize ((: (. $g h) (-> $in String)) (fromNumber 3)))) | ((⊷ synthesize ((: (. $_304286 h) (-> $_304310 String)) (S (S (S Z)))) (synthesize (: (. $_304286 ... | ((: (. f h) (-> Bool String)) (: (. (. (. f h) (. g f)) h) (-> Bool String))) | | PASS | [PREV.TESTS0.05](https://logicmoo.org/public/mettareports/_306826.metta.html#PREV.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.TESTS0.05](https://logicmoo.org/public/mettareports/_306942.metta.html#METTA-MORPH-TESTS.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://logicmoo.org/public/mettareports/_307024.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://logicmoo.org/public/mettareports/_307054.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02](https://logicmoo.org/public/mettareports/_308440.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02) | (assertEqual (TV (FA))) | ((stv 0.4 0.8)) | ((stv 0.4 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://logicmoo.org/public/mettareports/_308606.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $color color) $color)) | (red green blue) | (blue green red) | | PASS | [EXAMPLES.EXPRESSION.05](https://logicmoo.org/public/mettareports/_308618.metta.html#EXAMPLES.EXPRESSION.05) | (assertEqualToResult (match &self (= (expand $X) $Y) $X)) | ((1p $_281218) (2t $_281256) (Fix $_281120)) | ((1p $_281218) (2t $_281256) (Fix $_281120)) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_309038.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_309214.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_309220.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01](https://logicmoo.org/public/mettareports/_30934.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01) | (assertEqual (get-type (Cons 0 (Cons 1 Nil)))) | ((Vec Number (S (S Z)))) | ((Vec Number (S (S Z)))) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_309784.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19](https://logicmoo.org/public/mettareports/_309836.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19) | (assertEqualToResult (dup 2)) | (102 102 102 102 102 102 102 102 102 12 12) | (12 102) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_309840.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://logicmoo.org/public/mettareports/_310054.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [DEPENDENT-TYPES.MINERCURRIEDDTL.06](https://logicmoo.org/public/mettareports/_310066.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTL.06) | (assertEqualToResult (add-atom &kb (: ms_Threshold (ms_threshold (msNat))))) | () | (()) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_310232.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://logicmoo.org/public/mettareports/_310274.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $x) $y) $y)) | ((* 2 $_292882)) | ((* 2 $_292882)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24](https://logicmoo.org/public/mettareports/_310418.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24) | (assertEqual (fmap-i (curry-a * 2) (Cons 3 (Cons 4 Nil)))) | ((Cons 6 (Cons 8 Nil))) | ((Cons 6 (Cons 8 Nil))) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.09](https://logicmoo.org/public/mettareports/_310540.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.09) | (assertEqualToResult (add-atom &kb (: SO (≼ Sep Oct)))) | () | (()) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.12](https://logicmoo.org/public/mettareports/_310582.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.12) | (assertEqualToResult (add-atom &kb (: Refl (≼ $x $x)))) | () | (()) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.13](https://logicmoo.org/public/mettareports/_310846.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.13) | (assertEqualToResult (add-atom &kb (: Trans (-> (≼ $x $y) (-> (≼ $y $z) (≼ $x $z)))))) | (True) | (()) | | PASS | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_310860.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [NEW.TESTS4.02](https://logicmoo.org/public/mettareports/_31088.metta.html#NEW.TESTS4.02) | (assertEqualToResult (AddBeliefEvent (((cat * sky) --> like) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02](https://logicmoo.org/public/mettareports/_31110.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02) | (assertEqualToResult (match &kb (Green $x) $x)) | (Fritz Sam) | (Fritz Sam) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09](https://logicmoo.org/public/mettareports/_311452.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09) | (assertEqual (eq (Add Z Z) Z)) | (T) | (T) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.06](https://logicmoo.org/public/mettareports/_311872.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.06) | (assertEqualToResult (add-atom &kb (: JJ (≼ Jun Jul)))) | () | (()) | | PASS | [COMPARISONS.ADD-ATOM-NAIVE-FIB.03](https://logicmoo.org/public/mettareports/_312040.metta.html#COMPARISONS.ADD-ATOM-NAIVE-FIB.03) | (assertEqualToResult (match &other (= (fib 2) $code) $code)) | ((+ (fib 1) (fib 0))) | ((+ (fib 1) (fib 0))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04](https://logicmoo.org/public/mettareports/_312088.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04) | (assertEqual (((curry +) 2) 3)) | (5) | (5) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.08](https://logicmoo.org/public/mettareports/_312498.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.08) | (assertEqual (case (+ 1 (superpose (1 2 3))) (($x (+ 1 $x))))) | (3 4 5) | (3 4 5) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.17](https://logicmoo.org/public/mettareports/_312880.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.17) | (assertEqual (depth-continuor (: $prf $thm) (S Z))) | (True) | (True) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.03](https://logicmoo.org/public/mettareports/_312994.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.03) | (assertEqualToResult (add-atom &kb (: MA (≼ Mar Apr)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05](https://logicmoo.org/public/mettareports/_313120.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05) | (assertEqualToResult (and (> 4 2) (< 4 3))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12](https://logicmoo.org/public/mettareports/_31320.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12) | (assertEqual (== (let* (($x (collapse (get-atoms &m))) ($y (car-atom $x))) (get-type $y)) (get-type &self))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10](https://logicmoo.org/public/mettareports/_313636.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10) | (assertEqual (get-state (get-token))) | ((C D)) | ((C D)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02](https://logicmoo.org/public/mettareports/_313854.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02) | (assertEqual (TV (FA))) | ((stv 0.4 0.8)) | ((stv 0.4 0.8)) | | PASS | [HOL.NATPARITYTEST.10](https://logicmoo.org/public/mettareports/_313900.metta.html#HOL.NATPARITYTEST.10) | (assertEqualToResult (add-atom &kb (: Cong (-> (: $f (-> (: $_ $a) $b)) (-> (: $x $a) (-> (: $x' $a) (-> (: $prf (=== $x $x')) (=== ($f $x) ($f $x'))))))))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.01](https://logicmoo.org/public/mettareports/_313978.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.01) | (assertEqual (maybe-inc Nothing)) | (Nothing) | (Nothing) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02](https://logicmoo.org/public/mettareports/_314428.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02) | (assertEqual (get-type ((curry +) 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [BASIC.CML-UNSHARED.10](https://logicmoo.org/public/mettareports/_314756.metta.html#BASIC.CML-UNSHARED.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [BASIC.HYPERPOSING.10](https://logicmoo.org/public/mettareports/_314756.metta.html#BASIC.HYPERPOSING.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17](https://logicmoo.org/public/mettareports/_314772.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17) | (assertEqual (+ (superpose (1 2 3)) 1)) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17](https://logicmoo.org/public/mettareports/_314786.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17) | (assertEqual (+ (superpose (1 2 3)) 1)) | (2 3 4) | (2 3 4) | | PASS | [TRUTHVALUE.EVIDENTIALTRUTHVALUETEST.02](https://logicmoo.org/public/mettareports/_315048.metta.html#TRUTHVALUE.EVIDENTIALTRUTHVALUETEST.02) | (assertEqualToResult (mean (ETV (Singleton 42) (STV 0.1 0.9)))) | (0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.14... | (0.14) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.08](https://logicmoo.org/public/mettareports/_315092.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.08) | (assertEqual (case (+ 1 (superpose (1 2 3))) (($x (+ 1 $x))))) | (3 4 5) | (3 4 5) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.08](https://logicmoo.org/public/mettareports/_315106.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.08) | (assertEqual (case (+ 1 (superpose (1 2 3))) (($x (+ 1 $x))))) | (3 4 5) | (3 4 5) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.09](https://logicmoo.org/public/mettareports/_315378.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.09) | (assertEqualToResult (superpose ())) | () | () | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.04](https://logicmoo.org/public/mettareports/_315760.metta.html#INFERENCE-CONTROL.INF-CTL-XP.04) | (assertEqual (bc depth-updater depth-updater depth-terminator (fromNumber 2) (: ($prfabs $prfarg) (-> $p B)))) | ((: (ModusPonens ab) (-> A B))) | ((: (ModusPonens ab) (-> A B))) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.04](https://logicmoo.org/public/mettareports/_315846.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.04) | (assertEqualToResult (superpose ((superpose (a b c)) x y z))) | (a b c x y z) | (a b c x y z) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02](https://logicmoo.org/public/mettareports/_316026.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02) | (assertEqual (get-type ((curry +) 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.03](https://logicmoo.org/public/mettareports/_316092.metta.html#FORMULA.DEDUCTIONFORMULATEST.03) | (assertEqualToResult (and True True)) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09](https://logicmoo.org/public/mettareports/_316130.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09) | (assertEqual (g 2)) | (102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05](https://logicmoo.org/public/mettareports/_316164.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05) | (assertEqualToResult (and (> 4 2) (< 4 3))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05](https://logicmoo.org/public/mettareports/_316178.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05) | (assertEqualToResult (and (> 4 2) (< 4 3))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21](https://logicmoo.org/public/mettareports/_316192.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21) | (assertEqual (fact 5)) | (120) | (120) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10](https://logicmoo.org/public/mettareports/_31626.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10) | (assertEqual (is (air dry))) | ((start humidifier) (start kettle) (stop ventilation)) | ((stop ventilation) (start kettle) (start humidifier)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04](https://logicmoo.org/public/mettareports/_316332.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.IF.01](https://logicmoo.org/public/mettareports/_316376.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [METTA-MORPH-TESTS.TYPES2.03](https://logicmoo.org/public/mettareports/_316920.metta.html#METTA-MORPH-TESTS.TYPES2.03) | (assertEqualToResult (get-type Lion)) | (Cat) | (Cat) | | FAIL | [ITERATIVE-CHAINING.IBC-XP.15](https://logicmoo.org/public/mettareports/_317362.metta.html#ITERATIVE-CHAINING.IBC-XP.15) | (assertEqualToResult (syn (: $prf (-> (→ $r $s) (-> (→ $q $r) (-> (→ $p $q) (→ $p $s))))) (fromNumber 4))) | () | ((: ((. (. Deduction)) Deduction) (-> (→ $_3964 $_3982) (-> (→ $_4024 $_3964) (-> (→ $_4072 $_4024) (→ $_4072 $_3982))))) (: ((((. .) .) Deduction) Deduction) (-> (→ $_3964 $_3982) (-> (→ $_4024 $_3964) (-> (→ $_4072 $_4024) (→ $_4072 $_3982)))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25](https://logicmoo.org/public/mettareports/_317380.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25) | (assertEqualToResult (fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05](https://logicmoo.org/public/mettareports/_317486.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02](https://logicmoo.org/public/mettareports/_317658.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02) | (assertEqual (frog Sam)) | (T) | (T) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.08](https://logicmoo.org/public/mettareports/_31776.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.08) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.LETLET.01](https://logicmoo.org/public/mettareports/_317816.metta.html#METTA-MORPH-TESTS.LETLET.01) | (assertEqualToResult (let $T (1.0 0.9) (let* ((($f1 $c1) $T)) ($f1 $c1)))) | ((1.0 0.9)) | ((1.0 0.9)) | | PASS | [NEW.TESTS4.01](https://logicmoo.org/public/mettareports/_317880.metta.html#NEW.TESTS4.01) | (assertEqualToResult (AddBeliefEvent (({(garfield) } --> cat) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01](https://logicmoo.org/public/mettareports/_317892.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01) | (assertEqualToResult (match &self (($x leaf2) leaf3) $x)) | (leaf1 (leaf0 leaf1)) | (leaf1 (leaf0 leaf1)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06](https://logicmoo.org/public/mettareports/_318150.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06) | (assertEqual (get-type &state-token)) | ((StateMonad Expression)) | ((StateMonad Expression)) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_318276.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.02](https://logicmoo.org/public/mettareports/_318428.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.02) | (assertEqual (synthesize (: $proof (≞ (→ P Q) $tv)) kb rb Z)) | ((: PQm (≞ (→ P Q) (STV 0.8 0.4)))) | ((: PQm (≞ (→ P Q) (STV 0.8 0.4)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05](https://logicmoo.org/public/mettareports/_318624.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05) | (assertEqualToResult (and (> 4 2) (< 4 3))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05](https://logicmoo.org/public/mettareports/_318638.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05) | (assertEqualToResult (and (> 4 2) (< 4 3))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://logicmoo.org/public/mettareports/_318862.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_318950.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | FAIL | [SYNTHESIS.UNIFYTEST.03](https://logicmoo.org/public/mettareports/_319120.metta.html#SYNTHESIS.UNIFYTEST.03) | (assertEqualToResult (unify* (((: $ructor (-> $premise1 $premise2 $conclusion)) (: -> (-> $b $c) (-> $a $b) (-> $a $c))) ((: ($ructor $proof1 $proof2) $conclusion) (: $term (-> Number Bool))) ((: $pro... | () | ((: (. $_4044 $_4062) (-> Number Bool))) | | PASS | [CURRENT.TESTS5.02](https://logicmoo.org/public/mettareports/_319298.metta.html#CURRENT.TESTS5.02) | (assertEqualToResult (AddBeliefEvent ((((sheep --> ([(see) ])) &/ (^ count)) =/> (sheep --> ([(counted) ]))) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17](https://logicmoo.org/public/mettareports/_319486.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17) | (assertEqual (get-type (fmap (curry-a + 1) (Left 5)))) | ((Either Number)) | ((Either Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17](https://logicmoo.org/public/mettareports/_319500.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17) | (assertEqual (get-type (fmap (curry-a + 1) (Left 5)))) | ((Either Number)) | ((Either Number)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://logicmoo.org/public/mettareports/_319636.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://logicmoo.org/public/mettareports/_320122.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [BASIC.HYPERPOSING-SHARED.10](https://logicmoo.org/public/mettareports/_320424.metta.html#BASIC.HYPERPOSING-SHARED.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [BASIC.HYPERPOSING-UNSHARED.10](https://logicmoo.org/public/mettareports/_320424.metta.html#BASIC.HYPERPOSING-UNSHARED.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19](https://logicmoo.org/public/mettareports/_320994.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19) | (assertEqual (fmap (curry-a + 2) (UntypedC 5 (UntypedC 8 (Null))))) | ((UntypedC 7 (UntypedC 10 (Null)))) | ((UntypedC 7 (UntypedC 10 (Null)))) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_321882.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_321932.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [FORWARD-CHAINING.FC-XP.19](https://logicmoo.org/public/mettareports/_322720.metta.html#FORWARD-CHAINING.FC-XP.19) | (assertEqualToResult (fc_bem (→ A B) (fromNumber 2))) | ((→ A B) B C) | (B C (→ A B)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://logicmoo.org/public/mettareports/_322954.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.19](https://logicmoo.org/public/mettareports/_323000.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.19) | (assertEqualToResult (fc_bem (→ A B) (fromNumber 2))) | ((→ A B) B C) | (B C (→ A B)) | | PASS | [FORWARD-CHAINING.FC-XP.25](https://logicmoo.org/public/mettareports/_323020.metta.html#FORWARD-CHAINING.FC-XP.25) | (assertEqualToResult (fc_em A (fromNumber 2))) | (A B C) | (A B C) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02](https://logicmoo.org/public/mettareports/_323058.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02) | (assertEqual (frog Sam)) | (T) | (T) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.25](https://logicmoo.org/public/mettareports/_323068.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.25) | (assertEqualToResult (fc_em A (fromNumber 2))) | (A B C) | (A B C) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01](https://logicmoo.org/public/mettareports/_323292.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01) | (assertEqualToResult (match &self (($x leaf2) leaf3) $x)) | (leaf1 (leaf0 leaf1)) | (leaf1 (leaf0 leaf1)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10](https://logicmoo.org/public/mettareports/_323512.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10) | (assertEqual (f 2)) | (103) | (103) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.12](https://logicmoo.org/public/mettareports/_324082.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.12) | (assertEqualToResult (add-atom &kb (: Refl (≼ $x $x)))) | (True) | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://logicmoo.org/public/mettareports/_324276.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [EXTRA.PMQUERY.01](https://logicmoo.org/public/mettareports/_32428.metta.html#EXTRA.PMQUERY.01) | (assertEqualToResult (query "chr16_10000_T_A_GRCh38")) | (("ENSG00000227868" "ENSG00000004487" "ENSG00000169641" "ENSG00000179546" "ENSG00000125944" "ENSG000... | (("ENSG00000227868" "ENSG00000004487" "ENSG00000169641" "ENSG00000179546" "ENSG00000125944" "ENSG00000125945" "ENSG00000204219" "ENSG00000088280" "ENSG00000007968" "ENSG00000117318" "ENSG00000142676" "ENSG00000011007" "ENSG00000057757" "ENSG00000011009" "ENSG00000117308")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08](https://logicmoo.org/public/mettareports/_324514.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08](https://logicmoo.org/public/mettareports/_324542.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | PASS | [METTA-MORPH-TESTS.COLLAPSE.01](https://logicmoo.org/public/mettareports/_324792.metta.html#METTA-MORPH-TESTS.COLLAPSE.01) | (assertEqualToResult (collapse (1 2 3))) | (((1 2 3))) | (((1 2 3))) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_324854.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_324856.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01](https://logicmoo.org/public/mettareports/_325112.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01) | (assertEqual (get-type 5)) | (Number) | (Number) | | PASS | [BASIC.STATE-TYPES.15](https://logicmoo.org/public/mettareports/_325410.metta.html#BASIC.STATE-TYPES.15) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24](https://logicmoo.org/public/mettareports/_325410.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24) | (assertEqual (fmap-i (curry-a * 2) (Cons 3 (Cons 4 Nil)))) | ((Cons 6 (Cons 8 Nil))) | ((Cons 6 (Cons 8 Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08](https://logicmoo.org/public/mettareports/_325470.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08](https://logicmoo.org/public/mettareports/_325484.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05](https://logicmoo.org/public/mettareports/_325504.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05) | (assertEqual (get-type (ConsN "1" (ConsN "2" NilN)))) | ((VecN String 2)) | ((VecN String 2)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://logicmoo.org/public/mettareports/_326012.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | ((= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04](https://logicmoo.org/public/mettareports/_326018.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04) | (assertEqual (deduce (Evaluation (mortal Plato)))) | (T) | (T) | | FAIL | [INFERENCE-CONTROL.INF-CTL-XP.09](https://logicmoo.org/public/mettareports/_326022.metta.html#INFERENCE-CONTROL.INF-CTL-XP.09) | (assertEqualToResult (bc depth-updater depth-updater depth-terminator (fromNumber 4) (: $prf (-> A C)))) | ((: (ModusPonens ((Deduction bc) ab)) (-> A C))) | ((: (ModusPonens ((Deduction bc) ab)) (-> A C)) (: ((. (ModusPonens bc)) (ModusPonens ab)) (-> A C)) (: (((. ModusPonens) (Deduction bc)) ab) (-> A C))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02](https://logicmoo.org/public/mettareports/_326084.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02) | (assertEqual (ift (green $x) $x)) | (Fritz) | (Fritz) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14](https://logicmoo.org/public/mettareports/_326140.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14) | (assertEqual ((inc) 5)) | (6) | (6) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09](https://logicmoo.org/public/mettareports/_326350.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09) | (assertEqualToResult (get-type (isLeft 5))) | (Bool) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13](https://logicmoo.org/public/mettareports/_326490.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13) | (assertEqualToResult (== 4 (+ ln 2))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13](https://logicmoo.org/public/mettareports/_326518.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13) | (assertEqualToResult (== 4 (+ ln 2))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13](https://logicmoo.org/public/mettareports/_326564.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13) | (assertEqualToResult (== 4 (+ ln 2))) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://logicmoo.org/public/mettareports/_326964.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [PREV.TESTS2.03](https://logicmoo.org/public/mettareports/_327064.metta.html#PREV.TESTS2.03) | (assertEqualToResult (AddBeliefEvent (ballhit (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06](https://logicmoo.org/public/mettareports/_327258.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06) | (assertEqual (match &m (= (f 2) $x) $x)) | ((g 3)) | ((g 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23](https://logicmoo.org/public/mettareports/_327332.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23) | (assertEqualToResult (let $t (gen 3) (if (== (subsum (:: 3 (:: 7 (:: 5 nil))) $t) 8) $t (superpose ())))) | ((:: 1 (:: 0 (:: 1 nil)))) | ((:: 1 (:: 0 (:: 1 nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13](https://logicmoo.org/public/mettareports/_327686.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13) | (assertEqualToResult (== 4 (+ ln 2))) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://logicmoo.org/public/mettareports/_327732.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $1 $1)) | (1) | (1) | | FAIL | [EXPERIMENTS.UNIFY-VIA-CASE.05](https://logicmoo.org/public/mettareports/_327928.metta.html#EXPERIMENTS.UNIFY-VIA-CASE.05) | (assertEqualToResult (case (superpose ((Link $x B) (Node A) (Link $x C))) (((Link A $y) (Link $x $y))))) | ((Link $_325642 B) (Link $_325618 C)) | ((Link A B) (Link A C)) | | PASS | [CURRENT.TESTS0.03](https://logicmoo.org/public/mettareports/_328324.metta.html#CURRENT.TESTS0.03) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [ITERATIVE-CHAINING.IBC-XP.08](https://logicmoo.org/public/mettareports/_328736.metta.html#ITERATIVE-CHAINING.IBC-XP.08) | (assertEqual (syn (: a A) Z)) | ((: a A)) | ((: a A)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.11](https://logicmoo.org/public/mettareports/_328850.metta.html#ITERATIVE-CHAINING.IFC-XP.11) | (assertEqualToResult (add-atoms-nodup &space-test (A B C A))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10](https://logicmoo.org/public/mettareports/_328892.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10) | (assertEqual (f 2)) | (103) | (103) | | PASS | [CURRENT.TESTS4.04](https://logicmoo.org/public/mettareports/_328984.metta.html#CURRENT.TESTS4.04) | (assertEqualToResult (AddBeliefEvent (((({(garfield) } * ([(blue) ])) --> like) ==> ({(garfield) } --> artist)) (1.0 0.9)))) | () | () | | PASS | [METTA-MORPH-TESTS.TYPES.01](https://logicmoo.org/public/mettareports/_329274.metta.html#METTA-MORPH-TESTS.TYPES.01) | (assertEqualToResult (f 42)) | (42) | (42) | | PASS | [SUBTYPING.SUBTYPING-TEST.05](https://logicmoo.org/public/mettareports/_3294460.metta.html#SUBTYPING.SUBTYPING-TEST.05) | (assertEqualToResult (synthesize (: (coerce $proof felix) Animal) kb rb (fromNumber 2))) | ((: (coerce (STTrans CM MA) felix) Animal)) | ((: (coerce (STTrans CM MA) felix) Animal) (let* (((: felix Animal) (synthesize (: felix Animal) kb rb (S Z)))) (: (coerce STRefl felix) Animal)) (let* (((: felix Animal) (synthesize (: felix Animal) kb rb (S Z)))) (: (coerce (STTrans STRefl STRefl) felix) Animal)) (let* (((: felix Animal) (synthesize (: felix Animal) kb rb (S Z)))) (: (coerce (coerce STRefl STRefl) felix) Animal)) (let* (((: felix Mammal) (synthesize (: felix Mammal) kb rb (S Z)))) (: (coerce MA felix) Animal)) (let* (((: felix Mammal) (synthesize (: felix Mammal) kb rb (S Z)))) (: (coerce (STTrans MA STRefl) felix) Animal)) (let* (((: felix Mammal) (synthesize (: felix Mammal) kb rb (S Z)))) (: (coerce (STTrans STRefl MA) felix) Animal)) (let* (((: felix Mammal) (synthesize (: felix Mammal) kb rb (S Z)))) (: (coerce (coerce STRefl MA) felix) Animal))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13](https://logicmoo.org/public/mettareports/_329470.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13) | (assertEqual (of-same-type Green Red)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://logicmoo.org/public/mettareports/_329598.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://logicmoo.org/public/mettareports/_329616.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.05](https://logicmoo.org/public/mettareports/_32962.metta.html#METTA-MORPH-TESTS.STATES-SPACES.05) | (assertEqualToResult (remove-atom &WU a)) | () | (()) | | PASS | [CONTAINERS-ARE-SPACES.05-MATCH-SUPERPOSE-ELEMENT-LIKE-SPACE.04](https://logicmoo.org/public/mettareports/_329784.metta.html#CONTAINERS-ARE-SPACES.05-MATCH-SUPERPOSE-ELEMENT-LIKE-SPACE.04) | (assertEqual (case (match (kb) ($rel B_Each $x) ($rel $x)) (((SS-P_Each $y) (P_Each $y)) ((SS-Q_Each $y) (Q_Each $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://logicmoo.org/public/mettareports/_329906.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06](https://logicmoo.org/public/mettareports/_329948.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06) | (assertEqualToResult (Add Z Ten)) | ((Add Z Ten)) | ((Add Z Ten)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01](https://logicmoo.org/public/mettareports/_32994.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01) | (assertEqual (get-state (get-token))) | ((A B)) | ((A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06](https://logicmoo.org/public/mettareports/_330002.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06) | (assertEqual (match &m (= (f 2) $x) $x)) | ((g 3)) | ((g 3)) | | PASS | [BACKWARD-CHAINING.BC-XP.38](https://logicmoo.org/public/mettareports/_330120.metta.html#BACKWARD-CHAINING.BC-XP.38) | (assertEqualToResult (add-atom &kb_dem (: a A))) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.38](https://logicmoo.org/public/mettareports/_330178.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.38) | (assertEqualToResult (add-atom &kb_dem (: a A))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01](https://logicmoo.org/public/mettareports/_330178.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01) | (assertEqual (S K K x)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04](https://logicmoo.org/public/mettareports/_330198.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://logicmoo.org/public/mettareports/_330326.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10](https://logicmoo.org/public/mettareports/_330358.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10) | (assertEqual (get-state (get-token))) | ((C D)) | ((C D)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.25](https://logicmoo.org/public/mettareports/_330440.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.25) | (assertEqualToResult (bc &kb depth-updater depth-updater depth-bc-continuor (fromNumber 2) (: $prf (≼ Jan Jan)))) | ((: Refl (≼ Jan Jan)) (: JPA (≼ Jan Jan))) | ((: JPA (≼ Jan Jan)) (: Refl (≼ Jan Jan))) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.27](https://logicmoo.org/public/mettareports/_330442.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.27) | (assertEqualToResult (bc &kb depth-updater depth-updater depth-bc-continuor (fromNumber 2) (: $prf (≼ Jan Feb)))) | ((: JF (≼ Jan Feb)) (: JPA (≼ Jan Feb))) | ((: JF (≼ Jan Feb)) (: JPA (≼ Jan Feb))) | | FAIL | [FORWARD-CHAINING.FC-XP.28](https://logicmoo.org/public/mettareports/_33044.metta.html#FORWARD-CHAINING.FC-XP.28) | (assertEqualToResult Entail) | (Entail) | ("=== DTL ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01](https://logicmoo.org/public/mettareports/_330512.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01) | (assertEqual (get-type 5)) | (Number) | (Number) | | FAIL | [FORWARD-CHAINER.FORWARD-CHAINER-XP.28](https://logicmoo.org/public/mettareports/_33056.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.28) | (assertEqualToResult Entail) | (Entail) | ("=== DTL ===") | | PASS | [BACKWARD-CHAINING.BC-XP.20](https://logicmoo.org/public/mettareports/_330796.metta.html#BACKWARD-CHAINING.BC-XP.20) | (assertEqual (bc_bem B (fromNumber 1))) | (B) | (B) | | FAIL | [HOL.NATSTANDALONETEST.15](https://logicmoo.org/public/mettareports/_330816.metta.html#HOL.NATSTANDALONETEST.15) | (assertEqual (bc (: ((NatInd $basecase) $indstep) (plusRightId $x)) (fromNumber 5))) | () | ((: ((NatInd ((Replace0 (Sym plusRightIdProp)) plusBase)) ((. (Replace0 (Sym plusRightIdProp))) ((. (Trans plusRec)) ((. Cong) (Replace0 plusRightIdProp))))) (plusRightId $_328554))) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.20](https://logicmoo.org/public/mettareports/_330844.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.20) | (assertEqual (bc_bem B (fromNumber 1))) | (B) | (B) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05](https://logicmoo.org/public/mettareports/_331464.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05) | (assertEqual (get-type (ConsN "1" (ConsN "2" NilN)))) | ((VecN String 2)) | ((VecN String 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02](https://logicmoo.org/public/mettareports/_331498.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02) | (assertEqual (ift (green $x) $x)) | (Fritz) | (Fritz) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/_331574.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_325944 (get-atoms &self) (get-type $_325944)))) | ((hyperon::space::DynSpace)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21](https://logicmoo.org/public/mettareports/_331868.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21) | (assertEqual (fact 5)) | (120) | (120) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.18](https://logicmoo.org/public/mettareports/_332154.metta.html#INFERENCE-CONTROL.INF-CTL-XP.18) | (assertEqualToResult (bc td-updater td-updater td-terminator (MkTD (-> A C) (fromNumber 4)) (: $prf (-> A C)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.01](https://logicmoo.org/public/mettareports/_332202.metta.html#METTA-MORPH-TESTS.MATCH-VOID.01) | (assertEqualToResult (match &belief_events $1 $1)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://logicmoo.org/public/mettareports/_332348.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $r) $r)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://logicmoo.org/public/mettareports/_332558.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://logicmoo.org/public/mettareports/_332572.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.02](https://logicmoo.org/public/mettareports/_333198.metta.html#METTA-MORPH-TESTS.STATES-SPACES.02) | (assertEqualToResult (add-atom &WU a)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05](https://logicmoo.org/public/mettareports/_333582.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05) | (assertEqual (get-type (ConsN "1" (ConsN "2" NilN)))) | ((VecN String 2)) | ((VecN String 2)) | | FAIL | [NARS-V0.TESTS5.08](https://logicmoo.org/public/mettareports/_334060.metta.html#NARS-V0.TESTS5.08) | (assertEqual (AddGoalEvent ((sheep --> ([(counted) ])) (1.0 0.9)))) | () | ((^ count)) | | FAIL | [EQUAL.DEDUCTIONEQUALTEST.02](https://logicmoo.org/public/mettareports/_334346.metta.html#EQUAL.DEDUCTIONEQUALTEST.02) | (assertEqualToResult (let $PR (, (≞ P (STV 1 0.1)) (≞ Q (STV 1 0.1)) (≞ R (STV 1 0.1)) (≞ (→ P Q) (STV 1 0.5)) (≞ (→ Q R) (STV 1 0.5))) (, (≞ P (STV 1 0.1)) (≞ R (STV 1 0.1)) (≞ S ... | ((≞ (→ R S) (STV 1 0.5))) | ((≞ (→ P S) (deduction-formula ((STV 1 0.1) (STV 1 0.1) (STV 1 0.1) (deduction-formula ((STV 1 0.1) (STV 1 0.1) (STV 1 0.1) (STV 1 0.5) (STV 1 0.5))) (STV 1 0.5))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15](https://logicmoo.org/public/mettareports/_334476.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15) | (assertEqual (f 2)) | (103 103 103 103) | (103) | | PASS | [CURRENT.TESTS5.07](https://logicmoo.org/public/mettareports/_334536.metta.html#CURRENT.TESTS5.07) | (assertEqualToResult (AddBeliefEvent (({(instance1) } --> ([(white) ])) (1.0 0.9)))) | () | () | | PASS | [NARS-V0.TESTS5.04](https://logicmoo.org/public/mettareports/_334542.metta.html#NARS-V0.TESTS5.04) | (assertEqualToResult (AddBeliefEvent (({(instance1) } --> ([(white) ])) (1.0 0.9)))) | () | () | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://logicmoo.org/public/mettareports/_334702.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.01](https://logicmoo.org/public/mettareports/_334810.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.01) | (assertEqualToResult (superpose (a b c))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://logicmoo.org/public/mettareports/_33490.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case belief1 ((%void% 42)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://logicmoo.org/public/mettareports/_334946.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $color color) $color)) | (red green blue) | (blue green red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01](https://logicmoo.org/public/mettareports/_335010.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01) | (assertEqualToResult (ift (green $x) (add-atom &kb (Green $x)))) | () | (()) | | PASS | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.02](https://logicmoo.org/public/mettareports/_335086.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.02) | (assertEqual (synthesize (: $proof (≞ (→ P Q) $tv)) kb rb Z)) | ((: PQm (≞ (→ P Q) (STV 0.8 0.4)))) | ((: PQm (≞ (→ P Q) (STV 0.8 0.4)))) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://logicmoo.org/public/mettareports/_335122.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_33514.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://logicmoo.org/public/mettareports/_335460.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $x) $y) $y)) | ((* 2 $_318068)) | ((* 2 $_318068)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.01](https://logicmoo.org/public/mettareports/_335490.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.01) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://logicmoo.org/public/mettareports/_335568.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01](https://logicmoo.org/public/mettareports/_335582.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01) | (assertEqual (S K K x)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06](https://logicmoo.org/public/mettareports/_335946.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06) | (assertEqualToResult (shape)) | ((shape)) | ((shape)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04](https://logicmoo.org/public/mettareports/_336472.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04) | (assertEqual (TV (frog Fritz))) | ((stv 0.783 0.68)) | ((stv 0.783 0.68)) | | FAIL | [CURRIED-CHAINING.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_336526.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [ITERATIVE-CHAINING.IBC-XP.04](https://logicmoo.org/public/mettareports/_336916.metta.html#ITERATIVE-CHAINING.IBC-XP.04) | (assertEqualToResult (add-atom &kb (: ModusPonens (-> (→ $p $q) (-> $p $q))))) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/_336974.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_331344 (get-atoms &self) (get-type $_331344)))) | ((hyperon::space::DynSpace)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16](https://logicmoo.org/public/mettareports/_337150.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16) | (assertEqual (Green $who)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16](https://logicmoo.org/public/mettareports/_337164.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16) | (assertEqual (Green $who)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.COLLAPSE.01](https://logicmoo.org/public/mettareports/_337368.metta.html#METTA-MORPH-TESTS.COLLAPSE.01) | (assertEqualToResult (collapse (1 2 3))) | (((1 2 3))) | (((1 2 3))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06](https://logicmoo.org/public/mettareports/_337582.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06) | (assertEqualToResult (shape)) | ((shape)) | ((shape)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://logicmoo.org/public/mettareports/_337752.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $r) $r)) | (x) | (x) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.17](https://logicmoo.org/public/mettareports/_337782.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.17) | (assertEqual (superpose ((P B) (Q C)))) | ((P B) (Q C)) | ((P B) (Q C)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://logicmoo.org/public/mettareports/_337810.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | FAIL | [RESOLVE.R.05](https://logicmoo.org/public/mettareports/_33842.metta.html#RESOLVE.R.05) | (assertEqualToResult (r::fact 5)) | ((r::fact 5)) | (120) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12](https://logicmoo.org/public/mettareports/_338446.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12) | (assertEqual (== (let* (($x (collapse (get-atoms &m))) ($y (car-atom $x))) (get-type $y)) (get-type &self))) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.TYPES.01](https://logicmoo.org/public/mettareports/_338776.metta.html#METTA-MORPH-TESTS.TYPES.01) | (assertEqualToResult (f 42)) | (42) | (42) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.01](https://logicmoo.org/public/mettareports/_339264.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.01) | (assertEqual (maybe-inc Nothing)) | (Nothing) | (Nothing) | | PASS | [NEW.TESTS0.04](https://logicmoo.org/public/mettareports/_339450.metta.html#NEW.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.09](https://logicmoo.org/public/mettareports/_339562.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.09) | (assertEqualToResult (add-atom &kb (: SO (≼ Sep Oct)))) | (True) | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/_33970.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_28564)) | ((State 2 $_28564)) | | PASS | [BASIC.KEY-LOOKUPS-MANY.11](https://logicmoo.org/public/mettareports/_339710.metta.html#BASIC.KEY-LOOKUPS-MANY.11) | (assertEqual (let $k k-1 (match &data (= (get-data $k) $v) (get-state $v)))) | (v-1) | (v-1) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://logicmoo.org/public/mettareports/_339828.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.18](https://logicmoo.org/public/mettareports/_339936.metta.html#ITERATIVE-CHAINING.IFC-XP.18) | (assertEqualToResult (ic_bare A kb_bare rb_bare (fromNumber 1) (fromNumber 2))) | (kb_bare (lambda0 C)) | (kb_bare (lambda0 C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12](https://logicmoo.org/public/mettareports/_340004.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12) | (assertEqual (== (let* (($x (collapse (get-atoms &m))) ($y (car-atom $x))) (get-type $y)) (get-type &self))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://logicmoo.org/public/mettareports/_340166.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $color color) $color)) | (red green blue) | (blue green red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://logicmoo.org/public/mettareports/_340180.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $color color) $color)) | (red green blue) | (blue green red) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_34020.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [COMMON.NUMTEST.04](https://logicmoo.org/public/mettareports/_340212.metta.html#COMMON.NUMTEST.04) | (assertEqual (abs -10)) | (10 10) | (10) | | PASS | [FORWARD-CHAINING.FC-XP.14](https://logicmoo.org/public/mettareports/_340292.metta.html#FORWARD-CHAINING.FC-XP.14) | (assertEqualToResult (add-atom &kb_bem (→ A B))) | () | (()) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.02](https://logicmoo.org/public/mettareports/_340382.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.02) | (assertEqualToResult (TupleConcat () (e f g))) | ((e f g)) | ((e f g)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_340388.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.14](https://logicmoo.org/public/mettareports/_340410.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.14) | (assertEqualToResult (add-atom &kb_bem (→ A B))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01](https://logicmoo.org/public/mettareports/_340410.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01) | (assertEqualToResult (ift (green $x) (add-atom &kb (Green $x)))) | () | (()) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_340588.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_340648.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01](https://logicmoo.org/public/mettareports/_341060.metta.html#HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01) | (assertEqualToResult ((inc) 2)) | (3) | (3) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.09](https://logicmoo.org/public/mettareports/_341216.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.09) | (assertEqualToResult (superpose ())) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06](https://logicmoo.org/public/mettareports/_341302.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06) | (assertEqual (get-type &state-token)) | ((StateMonad Expression)) | ((StateMonad Expression)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06](https://logicmoo.org/public/mettareports/_341316.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06) | (assertEqual (get-type &state-token)) | ((StateMonad Expression)) | ((StateMonad Expression)) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://logicmoo.org/public/mettareports/_341556.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.IF.01](https://logicmoo.org/public/mettareports/_341576.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://logicmoo.org/public/mettareports/_341584.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05](https://logicmoo.org/public/mettareports/_341598.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22](https://logicmoo.org/public/mettareports/_341704.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22) | (assertEqual (let* (($r1 (Add Z Z)) ($r2 (Add $r1 (S Z))) ($r3 (Add $r2 (S Z)))) (match &self (= (eq (S (S Z)) $r3) $tv) $tv))) | (T) | (T) | | PASS | [BACKWARD-CHAINING.BC-XP.15](https://logicmoo.org/public/mettareports/_341732.metta.html#BACKWARD-CHAINING.BC-XP.15) | (assertEqualToResult (add-atom &kb_bem (→ B C))) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.15](https://logicmoo.org/public/mettareports/_341774.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.15) | (assertEqualToResult (add-atom &kb_bem (→ B C))) | () | (()) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.05](https://logicmoo.org/public/mettareports/_342018.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.05) | (assertEqual (:check (= (Mortal Plato) (Mortal Socrates)) Prop)) | () | (T) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.04](https://logicmoo.org/public/mettareports/_342040.metta.html#FORMULA.DEDUCTIONFORMULATEST.04) | (assertEqualToResult (or True False)) | (True) | (True) | | PASS | [FORWARD-CHAINING.FC-XP.29](https://logicmoo.org/public/mettareports/_342226.metta.html#FORWARD-CHAINING.FC-XP.29) | (assertEqualToResult (fc_dtl (: a A) kb_dtl rb_dtl (fromNumber 2))) | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.29](https://logicmoo.org/public/mettareports/_342264.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.29) | (assertEqualToResult (fc_dtl (: a A) kb_dtl rb_dtl (fromNumber 2))) | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | PASS | [HOL.NATPARITYTEST.12](https://logicmoo.org/public/mettareports/_34242.metta.html#HOL.NATPARITYTEST.12) | (assertEqualToResult (add-atom &kb (: double (-> (: $k Nat) Nat)))) | () | (()) | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://logicmoo.org/public/mettareports/_342478.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://logicmoo.org/public/mettareports/_342520.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | () | () | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://logicmoo.org/public/mettareports/_342574.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.04](https://logicmoo.org/public/mettareports/_342752.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.04) | (assertEqualToResult (interleave Nil Nil)) | (Nil) | (Nil) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.03](https://logicmoo.org/public/mettareports/_342988.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.03) | (assertEqualToResult (add-atom &kb (: MA (≼ Mar Apr)))) | (True) | (()) | | PASS | [METTA-MORPH-TESTS.LETLET.01](https://logicmoo.org/public/mettareports/_343000.metta.html#METTA-MORPH-TESTS.LETLET.01) | (assertEqualToResult (let $T (1.0 0.9) (let* ((($f1 $c1) $T)) ($f1 $c1)))) | ((1.0 0.9)) | ((1.0 0.9)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://logicmoo.org/public/mettareports/_343068.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04](https://logicmoo.org/public/mettareports/_343132.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04) | (assertEqual (TV (frog Fritz))) | ((stv 0.783 0.68)) | ((stv 0.783 0.68)) | | FAIL | [BASIC.STATE-TYPES.08](https://logicmoo.org/public/mettareports/_343144.metta.html#BASIC.STATE-TYPES.08) | (assertEqualToResult ("(get-type B-first)=" (get-type (get-state &b-first)))) | (("(get-type B-first)=" ABType)) | (("(get-type B-first)=" Symbol)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06](https://logicmoo.org/public/mettareports/_343168.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06) | (assertEqual (get-type &state-token)) | ((StateMonad Expression)) | ((StateMonad Expression)) | | FAIL | [ITERATIVE-CHAINING.IFC-XP.36](https://logicmoo.org/public/mettareports/_343498.metta.html#ITERATIVE-CHAINING.IFC-XP.36) | (assertEqualToResult ===) | (===) | ("=== Test Iterative Chainer Wrapped Around Forward Revertant (collapse) ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03](https://logicmoo.org/public/mettareports/_34354.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03) | (assertEqual (get-type +)) | ((-> Number Number Number)) | ((-> Number Number Number)) | | PASS | [NARS-V0.TESTS4.03](https://logicmoo.org/public/mettareports/_343604.metta.html#NARS-V0.TESTS4.03) | (assertEqualToResult (AddBeliefEvent ((sky --> ([(blue) ])) (1.0 0.9)))) | () | () | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_343802.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.PEANO.01](https://logicmoo.org/public/mettareports/_343806.metta.html#METTA-MORPH-TESTS.PEANO.01) | (assertEqualToResult (Add (S (S Z)) (S (S (S Z))))) | ((S (S (S (S (S Z)))))) | ((S (S (S (S (S Z)))))) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.09](https://logicmoo.org/public/mettareports/_343810.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.09) | (assertEqualToResult (superpose ())) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.09](https://logicmoo.org/public/mettareports/_343824.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.09) | (assertEqualToResult (superpose ())) | () | () | | PASS | [HOL.NATSTANDALONETEST.04](https://logicmoo.org/public/mettareports/_344280.metta.html#HOL.NATSTANDALONETEST.04) | (assertEqualToResult (add-atom &kb (: Replace0 (-> (=== $x $x') (-> $x $x'))))) | () | (()) | | PASS | [ITERATIVE-CHAINING.IFC-XP.25](https://logicmoo.org/public/mettareports/_344722.metta.html#ITERATIVE-CHAINING.IFC-XP.25) | (assertEqualToResult (ic_bare_collapse A kb_bare rb_bare (fromNumber 1) (fromNumber 2))) | (kb_bare (lambda0 C)) | (kb_bare (lambda0 C) (let* (($_3338 (superpose ())) ($_3380 (lambda0 $_3338)) ($_3422 (superpose ((lambda0 B) $_3380)))) (ic_bare_collapse $_3338 $_3422 rb_bare (S Z) Z))) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://logicmoo.org/public/mettareports/_344958.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $x) $y) $y)) | ((* 2 $_327566)) | ((* 2 $_327566)) | | FAIL | [HYPERON-METTALOG-SANITY.00-LANG-CASE.13](https://logicmoo.org/public/mettareports/_345282.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.13) | (assertEqual (match &self $1 $1)) | ((Rel-P A B) (Rel-Q A C)) | ((= (Rel-P P P P) 10) (Rel-P A B) (Rel-Q A C)) | | PASS | [METTA-MORPH-TESTS.TYPES2.04](https://logicmoo.org/public/mettareports/_345382.metta.html#METTA-MORPH-TESTS.TYPES2.04) | (assertEqualToResult (match &self (: Lion $1) $1)) | (Cat) | (Cat) | | PASS | [HOL.NATPARITYTEST.08](https://logicmoo.org/public/mettareports/_34604.metta.html#HOL.NATPARITYTEST.08) | (assertEqualToResult (add-atom &kb (: Trans (-> (: $prf1 (=== $x $y)) (-> (: $prf2 (=== $y $z)) (=== $x $z)))))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17](https://logicmoo.org/public/mettareports/_346128.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17) | (assertEqual (g 2)) | (102 102 102 102 102 102 102 102 102) | (102) | | FAIL | [QUERY.GENE-QUERY.02](https://logicmoo.org/public/mettareports/_346284.metta.html#QUERY.GENE-QUERY.02) | (assertEqualToResult (match &self ($pred $s $t) (: (W $pred $s $t) ($pred ($pred $s $t))))) | ((: (W in-tad (tad chr16_1000_2000_GRCh38) (gene w)) (in-tad (in-tad (tad chr16_1000_2000_GRCh38) (g... | ((: (W : Error (-> Atom Atom ErrorType)) (: (: Error (-> Atom Atom ErrorType)))) (: (W : empty (-> %Undefined%)) (: (: empty (-> %Undefined%)))) (: (W : if (-> Bool Atom Atom $_331520)) (: (: if (-> Bool Atom Atom $_331520)))) (: (W : quote (-> Atom Atom)) (: (: quote (-> Atom Atom)))) (: (W : unify (-> Atom Atom Atom Atom %Undefined%)) (: (: unify (-> Atom Atom Atom Atom %Undefined%)))) (: (W : unify-or-empty (-> Atom Atom Atom)) (: (: unify-or-empty (-> Atom Atom Atom)))) (: (W = $_330188 $_330188) (= (= $_330188 $_330188))) (: (W = unified unified) (= (= unified unified))) (: (W alt (sequence_variant rs1000) C) (alt (alt (sequence_variant rs1000) C))) (: (W chr (sequence_variant rs1000) chr16) (chr (chr (sequence_variant rs1000) chr16))) (: (W in-tad (tad chr16_1000_2000_GRCh38) (gene w)) (in-tad (in-tad (tad chr16_1000_2000_GRCh38) (gene w)))) (: (W pos (sequence_variant rs1000) 1200) (pos (pos (sequence_variant rs1000) 1200))) (: (W ref (sequence_variant rs1000) A) (ref (ref (sequence_variant rs1000) A))) (: (W rsid (sequence_variant rs1000) rs1000) (rsid (rsid (sequence_variant rs1000) rs1000)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04](https://logicmoo.org/public/mettareports/_34638.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04) | (assertEqualToResult (get-type (drop Nil))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.10](https://logicmoo.org/public/mettareports/_346436.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.10) | (assertEqualToResult (collapse (superpose ()))) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://logicmoo.org/public/mettareports/_34674.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | (EmptyType) | ((StateMonad String)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02](https://logicmoo.org/public/mettareports/_34678.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02) | (assertEqual (insert 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05](https://logicmoo.org/public/mettareports/_34692.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05) | (assertEqual (match &self (= (status (Goal $goal)) &state-active) $goal)) | () | (meditation) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.03](https://logicmoo.org/public/mettareports/_34728.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.03) | (assertEqualToResult (TupleConcat (a b c) ())) | ((a b c)) | ((a b c)) | | FAIL | [JANUS.METTA-CALLS-PYTHON-IN-JANUS.01](https://logicmoo.org/public/mettareports/_347570.metta.html#JANUS.METTA-CALLS-PYTHON-IN-JANUS.01) | (assertEqual rand) | (rand) | (4) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.14](https://logicmoo.org/public/mettareports/_347960.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.14) | (assertEqualToResult (add-atom &kb (: JPA (≼ Jan $x)))) | (True) | (()) | | PASS | [METTA-MORPH-TESTS.AND-OR.01](https://logicmoo.org/public/mettareports/_348634.metta.html#METTA-MORPH-TESTS.AND-OR.01) | (assertEqualToResult (If (or (and True False) True) 1 2)) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17](https://logicmoo.org/public/mettareports/_348708.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17) | (assertEqual (g 2)) | (102 102 102 102 102 102 102 102 102) | (102) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.01](https://logicmoo.org/public/mettareports/_348762.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.01) | (assertEqual (maybe-inc Nothing)) | (Nothing) | (Nothing) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_349074.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.05) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [PREV.TESTS5.01](https://logicmoo.org/public/mettareports/_349086.metta.html#PREV.TESTS5.01) | (assertEqualToResult (AddBeliefEvent ((((sheep --> ([(see) ])) &/ (^ count)) =/> (sheep --> ([(counted) ]))) (1.0 0.9)))) | () | () | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://logicmoo.org/public/mettareports/_349122.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | PASS | [DISTRIBUTED-PROCESSING.CREATE-SERVER.01](https://logicmoo.org/public/mettareports/_349290.metta.html#DISTRIBUTED-PROCESSING.CREATE-SERVER.01) | (assertEqual (match &self A-Self :Pass)) | (:Pass) | (:Pass) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06](https://logicmoo.org/public/mettareports/_349680.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06) | (assertEqualToResult (ln (+ 2 2))) | ((ln 4)) | ((ln 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04](https://logicmoo.org/public/mettareports/_349726.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04) | (assertEqual (deduce (Evaluation (mortal Plato)))) | (T) | (T) | | PASS | [CURRENT.TESTS5.03](https://logicmoo.org/public/mettareports/_349904.metta.html#CURRENT.TESTS5.03) | (assertEqualToResult ("current time")) | (("current time")) | (("current time")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03](https://logicmoo.org/public/mettareports/_350118.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03) | (assertEqualToResult ((curry +) 2)) | (((curry +) 2)) | (((curry +) 2)) | | FAIL | [FORWARD-CHAINING.FC-XP.09](https://logicmoo.org/public/mettareports/_350262.metta.html#FORWARD-CHAINING.FC-XP.09) | (assertEqualToResult ===) | (===) | ("=== Equality ===") | | FAIL | [FORWARD-CHAINER.FORWARD-CHAINER-XP.09](https://logicmoo.org/public/mettareports/_350280.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.09) | (assertEqualToResult ===) | (===) | ("=== Equality ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://logicmoo.org/public/mettareports/_350504.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $color color) $color)) | (red green blue) | (blue green red) | | PASS | [BACKWARD-CHAINING.BC-XP.43](https://logicmoo.org/public/mettareports/_350572.metta.html#BACKWARD-CHAINING.BC-XP.43) | (assertEqual (bc_dem (: $prf (→ A B)) (fromNumber 0))) | ((: ab (→ A B))) | ((: ab (→ A B))) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.43](https://logicmoo.org/public/mettareports/_350628.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.43) | (assertEqual (bc_dem (: $prf (→ A B)) (fromNumber 0))) | ((: ab (→ A B))) | ((: ab (→ A B))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23](https://logicmoo.org/public/mettareports/_350658.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23) | (assertEqualToResult (let $t (gen 3) (if (== (subsum (:: 3 (:: 7 (:: 5 nil))) $t) 8) $t (superpose ())))) | ((:: 1 (:: 0 (:: 1 nil)))) | ((:: 1 (:: 0 (:: 1 nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23](https://logicmoo.org/public/mettareports/_350666.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23) | (assertEqualToResult (let $t (gen 3) (if (== (subsum (:: 3 (:: 7 (:: 5 nil))) $t) 8) $t (superpose ())))) | ((:: 1 (:: 0 (:: 1 nil)))) | ((:: 1 (:: 0 (:: 1 nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12](https://logicmoo.org/public/mettareports/_350876.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12) | (assertEqual ((lambda $x (+ $x 1)) 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.IF.01](https://logicmoo.org/public/mettareports/_351062.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [METTA-MORPH-TESTS.IF.01](https://logicmoo.org/public/mettareports/_351076.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [CURRENT.TESTS1.02](https://logicmoo.org/public/mettareports/_35186.metta.html#CURRENT.TESTS1.02) | (assertEqualToResult (" (get-type ¤tTime) => " (get-type ¤tTime))) | ((" (get-type ¤tTime) => " (StateMonad Number))) | ((" (get-type ¤tTime) => " (StateMonad Number))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03](https://logicmoo.org/public/mettareports/_352214.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03) | (assertEqualToResult (match &self (= ($p Fritz) T) $p)) | (croaks eat_flies) | (croaks eat_flies) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://logicmoo.org/public/mettareports/_352420.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $1 $1)) | (2) | (2) | | PASS | [METTA-MORPH-TESTS.LETLET.01](https://logicmoo.org/public/mettareports/_352506.metta.html#METTA-MORPH-TESTS.LETLET.01) | (assertEqualToResult (let $T (1.0 0.9) (let* ((($f1 $c1) $T)) ($f1 $c1)))) | ((1.0 0.9)) | ((1.0 0.9)) | | PASS | [CURRENT.TESTS2.04](https://logicmoo.org/public/mettareports/_352552.metta.html#CURRENT.TESTS2.04) | (assertEqualToResult (AddBeliefEvent (ballleft (1.0 0.9)))) | () | () | | PASS | [NARS-V0.TESTS2.04](https://logicmoo.org/public/mettareports/_352558.metta.html#NARS-V0.TESTS2.04) | (assertEqualToResult (AddBeliefEvent (ballleft (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08](https://logicmoo.org/public/mettareports/_35294.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03](https://logicmoo.org/public/mettareports/_35310.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03) | (assertEqual (get-type +)) | ((-> Number Number Number)) | ((-> Number Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/_354104.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_331354 2))) | ((> 4 (+ $_331354 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04](https://logicmoo.org/public/mettareports/_35430.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04) | (assertEqualToResult (match &self (, (implies ($P $x) (Green $x)) (implies ($P $x) (Eats-flies $x))) (Then it is definitely $P))) | ((Then it is definitely Frog)) | ((Then it is definitely Frog)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.31](https://logicmoo.org/public/mettareports/_354404.metta.html#ITERATIVE-CHAINING.IFC-XP.31) | (assertEqualToResult (add-atom &rb (: Deduction (-> (→ $p $q) (→ $q $r) (→ $p $r))))) | () | (()) | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://logicmoo.org/public/mettareports/_354788.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03](https://logicmoo.org/public/mettareports/_354956.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03) | (assertEqualToResult (match &kb ($SS A_AS $X) ($SS A_AS $X))) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_355030.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23](https://logicmoo.org/public/mettareports/_35512.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23) | (assertEqual (fmap-i (curry-a - 7) (Right 3))) | ((Right 4)) | ((Right 4)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://logicmoo.org/public/mettareports/_35528.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (match &belief_events $1 $1)) | (belief1) | (belief1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23](https://logicmoo.org/public/mettareports/_355414.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23) | (assertEqualToResult (let $t (gen 3) (if (== (subsum (:: 3 (:: 7 (:: 5 nil))) $t) 8) $t (superpose ())))) | ((:: 1 (:: 0 (:: 1 nil)))) | ((:: 1 (:: 0 (:: 1 nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05](https://logicmoo.org/public/mettareports/_355464.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://logicmoo.org/public/mettareports/_35636.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [ITERATIVE-CHAINING.IFC-XP.08](https://logicmoo.org/public/mettareports/_356656.metta.html#ITERATIVE-CHAINING.IFC-XP.08) | (assertEqualToResult (add-atom-nodup &space-test A)) | () | (()) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_35716.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01](https://logicmoo.org/public/mettareports/_357502.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01) | (assertEqualToResult (match &self (EvaluationLink (PredicateNode "eats") (ListLink $x (ConceptNode "flies"))) $x)) | ((ConceptNode "Sam") (ConceptNode "Fritz")) | ((ConceptNode "Fritz") (ConceptNode "Sam")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/_357552.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_353080)) | ((State 2 $_353080)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03](https://logicmoo.org/public/mettareports/_357628.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03) | (assertEqualToResult (match &self (= ($p Fritz) T) $p)) | (croaks eat_flies) | (croaks eat_flies) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02](https://logicmoo.org/public/mettareports/_35762.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02) | (assertEqualToResult (match &kb (Green $x) $x)) | (Fritz Sam) | (Fritz Sam) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://logicmoo.org/public/mettareports/_357858.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | ((= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://logicmoo.org/public/mettareports/_357886.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | ((= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25](https://logicmoo.org/public/mettareports/_358176.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25) | (assertEqualToResult (fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10](https://logicmoo.org/public/mettareports/_358510.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10) | (assertEqual (f 2)) | (103) | (103) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://logicmoo.org/public/mettareports/_358544.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03](https://logicmoo.org/public/mettareports/_358680.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03) | (assertEqualToResult (frog Fritz)) | () | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09](https://logicmoo.org/public/mettareports/_358692.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09) | (assertEqualToResult (get-type (isLeft 5))) | (Bool) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09](https://logicmoo.org/public/mettareports/_358720.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09) | (assertEqualToResult (get-type (isLeft 5))) | (Bool) | () | | FAIL | [ITERATIVE-CHAINING.IFC-XP.20](https://logicmoo.org/public/mettareports/_358880.metta.html#ITERATIVE-CHAINING.IFC-XP.20) | (assertEqualToResult Bare) | (Bare) | ("=== Test Iterative Chainer Wrapped Around Forward Bare Entail (collapse) ===") | | PASS | [HOL.NATPARITYTEST.03](https://logicmoo.org/public/mettareports/_358962.metta.html#HOL.NATPARITYTEST.03) | (assertEqualToResult (add-atom &kb (: S (-> (: $x Nat) Nat)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03](https://logicmoo.org/public/mettareports/_359064.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03) | (assertEqualToResult (match &self (, (Frog $x) (implies (Frog $x) $y)) $y)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21](https://logicmoo.org/public/mettareports/_359074.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21) | (assertEqual (fact 5)) | (120) | (120) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21](https://logicmoo.org/public/mettareports/_359080.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21) | (assertEqual (fact 5)) | (120) | (120) | | PASS | [FORWARD-CHAINING.FC-XP.07](https://logicmoo.org/public/mettareports/_359280.metta.html#FORWARD-CHAINING.FC-XP.07) | (assertEqualToResult (fc_bare (→ A B) kb_bare rb_bare (fromNumber 2))) | ((→ A B) B C) | (B C (→ A B)) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_359280.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.07](https://logicmoo.org/public/mettareports/_359298.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.07) | (assertEqualToResult (fc_bare (→ A B) kb_bare rb_bare (fromNumber 2))) | ((→ A B) B C) | (B C (→ A B)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.03](https://logicmoo.org/public/mettareports/_359304.metta.html#METTA-MORPH-TESTS.STATES-SPACES.03) | (assertEqualToResult (match &WU $1 $1)) | (a) | (a) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04](https://logicmoo.org/public/mettareports/_359326.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04) | (assertEqual (deduce (Evaluation (mortal Plato)))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02](https://logicmoo.org/public/mettareports/_359468.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02) | (assertEqualToResult (match &kb (Green $x) $x)) | (Fritz Sam) | (Fritz Sam) | | PASS | [ORIENTATION.ORIENTATION-TEST.03](https://logicmoo.org/public/mettareports/_359560.metta.html#ORIENTATION.ORIENTATION-TEST.03) | (assertEqualToResult (synthesize (: $proof (orientation A C Right)) kb rb (fromNumber 2))) | ((: (ModusPonens (WitnessOf (⟹ (∧ (orientation A B Right) (orientation C B Left)) (orientation A... | ((: (ModusPonens (WitnessOf (⟹ (∧ (orientation A B Right) (orientation C B Left)) (orientation A C Right))) (BinaryConjunctionIntroduction (WitnessOf (orientation A B Right)) (WitnessOf (orientation C B Left)))) (orientation A C Right))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02](https://logicmoo.org/public/mettareports/_359570.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02) | (assertEqual (get-type (HumansAreMortal SocratesIsHuman))) | ((Mortal Socrates)) | ((Mortal Socrates)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09](https://logicmoo.org/public/mettareports/_359648.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09) | (assertEqualToResult (get-type (isLeft 5))) | (Bool) | () | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_359876.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22](https://logicmoo.org/public/mettareports/_359930.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22) | (assertEqual (let* (($r1 (Add Z Z)) ($r2 (Add $r1 (S Z))) ($r3 (Add $r2 (S Z)))) (match &self (= (eq (S (S Z)) $r3) $tv) $tv))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22](https://logicmoo.org/public/mettareports/_359944.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22) | (assertEqual (let* (($r1 (Add Z Z)) ($r2 (Add $r1 (S Z))) ($r3 (Add $r2 (S Z)))) (match &self (= (eq (S (S Z)) $r3) $tv) $tv))) | (T) | (T) | | FAIL | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.04](https://logicmoo.org/public/mettareports/_359968.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.04) | (assertEqualToResult Test) | (Test) | ("===== Test recursive rule (built-in type checker) =====") | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.17](https://logicmoo.org/public/mettareports/_359986.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.17) | (assertEqual (superpose ((P B) (Q C)))) | ((P B) (Q C)) | ((P B) (Q C)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_360056.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_360106.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.01](https://logicmoo.org/public/mettareports/_360196.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.01) | (assertEqualToResult (superpose (a b c))) | (a b c) | (a b c) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://logicmoo.org/public/mettareports/_360228.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | ((= (+ 1 1) (- 3 1))) | (T) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://logicmoo.org/public/mettareports/_360408.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [EXAMPLES.EXPRESSION.06](https://logicmoo.org/public/mettareports/_360752.metta.html#EXAMPLES.EXPRESSION.06) | (assertEqualToResult ((futu mapExpr expand) (2t (1p (Fix (Var X)))))) | ((Fix (Plus (Fix (Plus (Fix (Const 1)) (Fix (Var X)))) (Fix (Plus (Fix (Const 1)) (Fix (Var X))))))) | ((Fix (Plus (Fix (Plus (Fix (Const 1)) (Fix (Var X)))) (Fix (Plus (Fix (Const 1)) (Fix (Var X))))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://logicmoo.org/public/mettareports/_360822.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $x) $x)) | (Socrates Plato) | (Plato Socrates) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://logicmoo.org/public/mettareports/_360828.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $x) $x)) | (Socrates Plato) | (Plato Socrates) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04](https://logicmoo.org/public/mettareports/_361126.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04) | (assertEqual (deduce (Evaluation (mortal Plato)))) | (T) | (T) | | PASS | [BASIC.STATE-TYPES.01](https://logicmoo.org/public/mettareports/_361230.metta.html#BASIC.STATE-TYPES.01) | (assertEqualToResult ("Bind A-first with A")) | (("Bind A-first with A")) | (("Bind A-first with A")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02](https://logicmoo.org/public/mettareports/_361290.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02) | (assertEqual (get-type (+ 5 7))) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21](https://logicmoo.org/public/mettareports/_361672.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21) | (assertEqual (fact 5)) | (120) | (120) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21](https://logicmoo.org/public/mettareports/_361686.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21) | (assertEqual (fact 5)) | (120) | (120) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.17](https://logicmoo.org/public/mettareports/_361862.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.17) | (assertEqual (superpose ((P B) (Q C)))) | ((P B) (Q C)) | ((P B) (Q C)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01](https://logicmoo.org/public/mettareports/_361888.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01) | (assertEqual (Cons 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [BASIC.KEY-LOOKUPS-MANY.03](https://logicmoo.org/public/mettareports/_36278.metta.html#BASIC.KEY-LOOKUPS-MANY.03) | (assertEqual (let $v (new-state v-2) (match &data (= (get-data $k) $v) $k))) | (k-2) | (k-2) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_363048.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15](https://logicmoo.org/public/mettareports/_363770.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15) | (assertEqual (f 2)) | (103 103 103 103) | (103) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16](https://logicmoo.org/public/mettareports/_363782.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16) | (assertEqualToResult (dup 2)) | (102 102 102 102 12) | (12 102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02](https://logicmoo.org/public/mettareports/_363852.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02) | (assertEqualToResult (expression without known equalities)) | ((expression without known equalities)) | ((expression without known equalities)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03](https://logicmoo.org/public/mettareports/_364094.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03) | (assertEqualToResult (frog Fritz)) | () | () | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://logicmoo.org/public/mettareports/_364284.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://logicmoo.org/public/mettareports/_364304.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | PASS | [BACKWARD-CHAINING.BC-XP.09](https://logicmoo.org/public/mettareports/_364350.metta.html#BACKWARD-CHAINING.BC-XP.09) | (assertEqualToResult (bc_eq C kb_eq (fromNumber 2))) | (C C) | (C) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.09](https://logicmoo.org/public/mettareports/_364358.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.09) | (assertEqualToResult (bc_eq C kb_eq (fromNumber 2))) | (C C) | (C) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_364392.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03](https://logicmoo.org/public/mettareports/_364464.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03) | (assertEqualToResult (match &self (, (Frog $x) (implies (Frog $x) $y)) $y)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13](https://logicmoo.org/public/mettareports/_364488.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13) | (assertEqual ((lambda ($x $y) (+ $x $y)) (2 7))) | (9) | (9) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://logicmoo.org/public/mettareports/_364496.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqualToResult (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02](https://logicmoo.org/public/mettareports/_364868.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02) | (assertEqualToResult (match &kb (Green $x) $x)) | (Fritz Sam) | (Fritz Sam) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.02](https://logicmoo.org/public/mettareports/_364958.metta.html#METTA-MORPH-TESTS.MATCH-VOID.02) | (assertEqualToResult (add-atom &belief_events belief1)) | () | (()) | | FAIL | [INFERENCE-CONTROL.INF-CTL-XP.07](https://logicmoo.org/public/mettareports/_365084.metta.html#INFERENCE-CONTROL.INF-CTL-XP.07) | (assertEqualToResult (bc depth-updater depth-updater depth-terminator (fromNumber 5) (: $prf C))) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C) (: ((ModusPonens ((Deduction bc) ab)) a) C)) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C) (: ((ModusPonens ((Deduction bc) ab)) a) C) (: (((. (ModusPonens bc)) (ModusPonens ab)) a) C) (: ((((. ModusPonens) (Deduction bc)) ab) a) C)) | | PASS | [BASIC.CML-UNSHARED.04](https://logicmoo.org/public/mettareports/_36514.metta.html#BASIC.CML-UNSHARED.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [BASIC.HYPERPOSING.04](https://logicmoo.org/public/mettareports/_36514.metta.html#BASIC.HYPERPOSING.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [PLN.GENE-PLN-XP.03](https://logicmoo.org/public/mettareports/_365374.metta.html#PLN.GENE-PLN-XP.03) | (assertEqualToResult (fc (: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $p) (codes_for (gene a) $p))) (fromNumber 1))) | ((: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_308222) (codes_for... | ((: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_308222) (codes_for (gene a) $_308222))) (: ((gene-codes-protein transcribed_to-a-t1) translates_to-t1-p1) (codes_for (gene a) (protein p1)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09](https://logicmoo.org/public/mettareports/_365936.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09) | (assertEqual (eq (Add Z Z) Z)) | (T) | (T) | | PASS | [BASIC.STATE-TYPES.16](https://logicmoo.org/public/mettareports/_365960.metta.html#BASIC.STATE-TYPES.16) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04](https://logicmoo.org/public/mettareports/_365990.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01](https://logicmoo.org/public/mettareports/_366244.metta.html#HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01) | (assertEqualToResult ((inc) 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02](https://logicmoo.org/public/mettareports/_366690.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02) | (assertEqual (get-type (+ 5 7))) | (Number) | (Number) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://logicmoo.org/public/mettareports/_366820.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | FAIL | [ITERATIVE-CHAINING.IBC-XP.24](https://logicmoo.org/public/mettareports/_366836.metta.html#ITERATIVE-CHAINING.IBC-XP.24) | (assertEqualToResult (get-atoms &kb)) | ((: ab (→ A B)) (: bc (→ B C)) (: a A) (: ModusPonens (-> (→ $_364394 $_364400) (-> $_364394 $... | ((: -> (-> $_354412 $_354560) (-> (-> $_354390 $_354412) (-> $_354390 $_354560))) (: Deduction (-> (→ $_354412 $_354560) (-> (→ $_354390 $_354412) (→ $_354390 $_354560)))) (: ModusPonens (-> (→ $_354390 $_354412) (-> $_354390 $_354412))) (: a A) (: ab (→ A B)) (: bc (→ B C))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16](https://logicmoo.org/public/mettareports/_366960.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16) | (assertEqualToResult (dup 2)) | (102 102 102 102 12) | (12 102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://logicmoo.org/public/mettareports/_367870.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.05](https://logicmoo.org/public/mettareports/_367890.metta.html#FORMULA.DEDUCTIONFORMULATEST.05) | (assertEqualToResult (<= 5 4)) | (False) | (False) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_36814.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.02) | (assertEqualToResult (add-atom &kb (: ab (→ A B)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03](https://logicmoo.org/public/mettareports/_368396.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03) | (assertEqualToResult (match &self (:= (S K K x) $r) (match &self (:= $r $r2) $r2))) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://logicmoo.org/public/mettareports/_368418.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | PASS | [COMMON.LISTTEST.11](https://logicmoo.org/public/mettareports/_368584.metta.html#COMMON.LISTTEST.11) | (assertEqualToResult (elem 1 (Cons 3 (Cons 1 (Cons 2 Nil))))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08](https://logicmoo.org/public/mettareports/_36866.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.01](https://logicmoo.org/public/mettareports/_368858.metta.html#INFERENCE-CONTROL.INF-CTL-XP.01) | (assertEqualToResult (bc depth-updater depth-updater depth-terminator (fromNumber 0) (: $prf A))) | () | () | | PASS | [DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-530.01](https://logicmoo.org/public/mettareports/_368860.metta.html#DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-530.01) | (assertEqualToResult (match &self (A $x $y) (A $x $y))) | ((A $_352340 $_352340)) | ((A $_352340 $_352340)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04](https://logicmoo.org/public/mettareports/_368930.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18](https://logicmoo.org/public/mettareports/_368986.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18) | (assertEqual (fmap (curry-a + 2) (UntypedC 5))) | ((UntypedC 7)) | ((UntypedC 7)) | | PASS | [METTA-MORPH-TESTS.PEANO.01](https://logicmoo.org/public/mettareports/_368998.metta.html#METTA-MORPH-TESTS.PEANO.01) | (assertEqualToResult (Add (S (S Z)) (S (S (S Z))))) | ((S (S (S (S (S Z)))))) | ((S (S (S (S (S Z)))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18](https://logicmoo.org/public/mettareports/_369000.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18) | (assertEqual (fmap (curry-a + 2) (UntypedC 5))) | ((UntypedC 7)) | ((UntypedC 7)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02](https://logicmoo.org/public/mettareports/_369256.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02) | (assertEqualToResult (expression without known equalities)) | ((expression without known equalities)) | ((expression without known equalities)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.02](https://logicmoo.org/public/mettareports/_369424.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.02) | (assertEqualToResult (superpose ((superpose (a b c))))) | (a b c) | (a b c) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://logicmoo.org/public/mettareports/_369474.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://logicmoo.org/public/mettareports/_369476.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | (T) | | PASS | [BASIC.COINS.03](https://logicmoo.org/public/mettareports/_369478.metta.html#BASIC.COINS.03) | (assertEqual (count-change 51)) | (50) | (50) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://logicmoo.org/public/mettareports/_369490.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.01](https://logicmoo.org/public/mettareports/_369698.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.01) | (assertEqualToResult (superpose (a b c))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://logicmoo.org/public/mettareports/_369910.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/_369958.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.04](https://logicmoo.org/public/mettareports/_37014.metta.html#METTA-MORPH-TESTS.STATES-SPACES.04) | (assertEqualToResult (add-atom &WU b)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10](https://logicmoo.org/public/mettareports/_370266.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10) | (assertEqualToResult (eq Z (S Z))) | ((eq Z (S Z))) | ((eq Z (S Z))) | | PASS | [BASIC.KEY-LOOKUPS-MANY.12](https://logicmoo.org/public/mettareports/_370752.metta.html#BASIC.KEY-LOOKUPS-MANY.12) | (assertEqual (get-state (match &data (= (get-data k-7) $v) $v))) | (v-7) | (v-7) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11](https://logicmoo.org/public/mettareports/_370798.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11) | (assertEqual (get-type (pair (LeftP 5) "String"))) | ((Pair (EitherP Number) String)) | ((Pair (EitherP Number) String)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13](https://logicmoo.org/public/mettareports/_371094.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [NEW.TESTS3.04](https://logicmoo.org/public/mettareports/_372166.metta.html#NEW.TESTS3.04) | (assertEqualToResult (AddBeliefEvent (corridorIn (1.0 0.9)))) | () | () | | PASS | [CURRENT.TESTS3.04](https://logicmoo.org/public/mettareports/_372170.metta.html#CURRENT.TESTS3.04) | (assertEqualToResult (AddBeliefEvent (corridorIn (1.0 0.9)))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.10](https://logicmoo.org/public/mettareports/_372274.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.10) | (assertEqualToResult (collapse (superpose ()))) | () | (()) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/_372514.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/_372522.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/_372528.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13](https://logicmoo.org/public/mettareports/_372652.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.17](https://logicmoo.org/public/mettareports/_372942.metta.html#INFERENCE-CONTROL.INF-CTL-XP.17) | (assertEqual (bc td-updater td-updater td-terminator (MkTD (→ A C) (fromNumber 4)) (: $prf (→ A C)))) | ((: ((Deduction bc) ab) (→ A C))) | ((: ((Deduction bc) ab) (→ A C))) | | FAIL | [DISTRIBUTED-PROCESSING.CREATE-SERVER.02](https://logicmoo.org/public/mettareports/_373498.metta.html#DISTRIBUTED-PROCESSING.CREATE-SERVER.02) | (assertEqual (match &share1 A-Share1 :Pass)) | () | (:Pass) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11](https://logicmoo.org/public/mettareports/_373584.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11) | (assertEqual (get-type (pair (LeftP 5) "String"))) | ((Pair (EitherP Number) String)) | ((Pair (EitherP Number) String)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03](https://logicmoo.org/public/mettareports/_373800.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03) | (assertEqualToResult (match &self (:= (S K K x) $r) (match &self (:= $r $r2) $r2))) | (x) | (x) | | PASS | [METTA-MORPH-TESTS.AND-OR.01](https://logicmoo.org/public/mettareports/_373816.metta.html#METTA-MORPH-TESTS.AND-OR.01) | (assertEqualToResult (If (or (and True False) True) 1 2)) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/_374274.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_369802)) | ((State 2 $_369802)) | | PASS | [METTA-MORPH-TESTS.TYPES2.05](https://logicmoo.org/public/mettareports/_374370.metta.html#METTA-MORPH-TESTS.TYPES2.05) | (assertEqualToResult (match &self (: reproduce $1) $1)) | ((-> Lion Lion Lion)) | ((-> Lion Lion Lion)) | | PASS | [DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-516-REDDUCED.01](https://logicmoo.org/public/mettareports/_374434.metta.html#DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-516-REDDUCED.01) | (assertEqualToResult (foo Z $a)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10](https://logicmoo.org/public/mettareports/_374548.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10) | (assertEqual (f 2)) | (103) | (103) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.10](https://logicmoo.org/public/mettareports/_374868.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.10) | (assertEqualToResult (collapse (superpose ()))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.10](https://logicmoo.org/public/mettareports/_374882.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.10) | (assertEqualToResult (collapse (superpose ()))) | () | (()) | | PASS | [HOL.NATTEST.04](https://logicmoo.org/public/mettareports/_375050.metta.html#HOL.NATTEST.04) | (assertEqual (synthesize (: $prf (ZRID_plus Z)) kb rb (fromNumber 2))) | ((: (Repl0 (EqSym PropZRID_plus) Base_plus) (ZRID_plus Z))) | ((: (Repl0 (EqSym PropZRID_plus) Base_plus) (ZRID_plus Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01](https://logicmoo.org/public/mettareports/_375428.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (inactive) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03](https://logicmoo.org/public/mettareports/_375722.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03) | (assertEqualToResult ((curry +) 2)) | (((curry +) 2)) | (((curry +) 2)) | | PASS | [HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01](https://logicmoo.org/public/mettareports/_375750.metta.html#HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01) | (assertEqualToResult ((inc) 2)) | (3) | (3) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_376032.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_376058.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.22](https://logicmoo.org/public/mettareports/_37636.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.22) | (assertEqual (depth-bc-continuor (: $prf $thm) (S Z))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08](https://logicmoo.org/public/mettareports/_376536.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08) | (assertEqual (find-equal (color) (foo))) | (red) | (red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18](https://logicmoo.org/public/mettareports/_376554.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18) | (assertEqual (f 2)) | (103 103 103 103 103 103 103 103 103) | (103) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_376706.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.03](https://logicmoo.org/public/mettareports/_376776.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.03) | (assertEqualToResult (TupleConcat (a b c) ())) | ((a b c)) | ((a b c)) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/_376994.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://logicmoo.org/public/mettareports/_377048.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://logicmoo.org/public/mettareports/_377062.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06](https://logicmoo.org/public/mettareports/_377268.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06) | (assertEqualToResult (ln (+ 2 2))) | ((ln 4)) | ((ln 4)) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/_377420.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.11](https://logicmoo.org/public/mettareports/_377586.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.11) | (assertEqualToResult (superpose ((nop 1)))) | () | () | | PASS | [ORIENTATION.ORIENTATION-TEST.02](https://logicmoo.org/public/mettareports/_377692.metta.html#ORIENTATION.ORIENTATION-TEST.02) | (assertEqualToResult (synthesize (: $proof (orientation A B Right)) kb rb Z)) | ((: (WitnessOf (orientation A B Right)) (orientation A B Right))) | ((: (WitnessOf (orientation A B Right)) (orientation A B Right))) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.02](https://logicmoo.org/public/mettareports/_377910.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.02) | (assertEqual (maybe-inc (Just 2))) | ((Just 3)) | ((Just 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11](https://logicmoo.org/public/mettareports/_37806.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11) | (assertEqual (get-type (pair (LeftP 5) "String"))) | ((Pair (EitherP Number) String)) | ((Pair (EitherP Number) String)) | | PASS | [METTA-MORPH-TESTS.PEANO.01](https://logicmoo.org/public/mettareports/_378500.metta.html#METTA-MORPH-TESTS.PEANO.01) | (assertEqualToResult (Add (S (S Z)) (S (S (S Z))))) | ((S (S (S (S (S Z)))))) | ((S (S (S (S (S Z)))))) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_378562.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.06](https://logicmoo.org/public/mettareports/_378576.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.06) | (assertEqualToResult (range 2 6)) | ((2 3 4 5)) | ((2 3 4 5)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_378762.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_378822.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18](https://logicmoo.org/public/mettareports/_379134.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18) | (assertEqual (f 2)) | (103 103 103 103 103 103 103 103 103) | (103) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03](https://logicmoo.org/public/mettareports/_37914.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03) | (assertEqualToResult (match &self (= ($p Fritz) T) $p)) | (croaks eat_flies) | (croaks eat_flies) | | PASS | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.03](https://logicmoo.org/public/mettareports/_379330.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.03) | (assertEqual (synthesize (: $proof (≞ (→ Q R) $tv)) kb rb Z)) | ((: QRm (≞ (→ Q R) (STV 0.9 0.5)))) | ((: QRm (≞ (→ Q R) (STV 0.9 0.5)))) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://logicmoo.org/public/mettareports/_379810.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (add-atom &attentional_focus 1)) | () | (()) | | PASS | [ITERATIVE-CHAINING.IFC-XP.37](https://logicmoo.org/public/mettareports/_379976.metta.html#ITERATIVE-CHAINING.IFC-XP.37) | (assertEqual (ifc (: a A) Z Z)) | ((: a A)) | ((: a A)) | | PASS | [COMMON.LISTTEST.04](https://logicmoo.org/public/mettareports/_380310.metta.html#COMMON.LISTTEST.04) | (assertEqualToResult (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06](https://logicmoo.org/public/mettareports/_380312.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06) | (assertEqualToResult (ln (+ 2 2))) | ((ln 4)) | ((ln 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06](https://logicmoo.org/public/mettareports/_380326.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06) | (assertEqualToResult (ln (+ 2 2))) | ((ln 4)) | ((ln 4)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.15](https://logicmoo.org/public/mettareports/_380774.metta.html#ITERATIVE-CHAINING.IFC-XP.15) | (assertEqualToResult ((ic_bare A kb_bare rb_bare Z Z))) | ((→ A B) (→ B C) A) | (A (→ A B) (→ B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01](https://logicmoo.org/public/mettareports/_380846.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (inactive) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://logicmoo.org/public/mettareports/_380950.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $1 $1)) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18](https://logicmoo.org/public/mettareports/_381104.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18) | (assertEqualToResult (bin)) | (0 1) | (0 1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18](https://logicmoo.org/public/mettareports/_381118.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18) | (assertEqualToResult (bin)) | (0 1) | (0 1) | | PASS | [ITERATIVE-CHAINING.IFC-XP.03](https://logicmoo.org/public/mettareports/_381174.metta.html#ITERATIVE-CHAINING.IFC-XP.03) | (assertEqual (fc_bare A kb_bare rb_bare (fromNumber 2))) | (C) | (C) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08](https://logicmoo.org/public/mettareports/_381600.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08) | (assertEqual (find-equal (color) (foo))) | (red) | (red) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.02](https://logicmoo.org/public/mettareports/_382072.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.02) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [TRUTHVALUE.EVIDENTIALTRUTHVALUETEST.03](https://logicmoo.org/public/mettareports/_382080.metta.html#TRUTHVALUE.EVIDENTIALTRUTHVALUETEST.03) | (assertEqualToResult (confidence (ETV (Singleton 42) (STV 0.1 0.2)))) | (0.2) | (0.2) | | PASS | [ITERATIVE-CHAINING.IFC-XP.23](https://logicmoo.org/public/mettareports/_382496.metta.html#ITERATIVE-CHAINING.IFC-XP.23) | (assertEqualToResult (ic_bare_collapse A kb_bare rb_bare (fromNumber 1) (fromNumber 1))) | (kb_bare (lambda0 B)) | (kb_bare (lambda0 B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01](https://logicmoo.org/public/mettareports/_382692.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01) | (assertEqualToResult (match &self (EvaluationLink (PredicateNode "eats") (ListLink $x (ConceptNode "flies"))) $x)) | ((ConceptNode "Sam") (ConceptNode "Fritz")) | ((ConceptNode "Fritz") (ConceptNode "Sam")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06](https://logicmoo.org/public/mettareports/_382772.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06) | (assertEqualToResult (ln (+ 2 2))) | ((ln 4)) | ((ln 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06](https://logicmoo.org/public/mettareports/_382786.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06) | (assertEqualToResult (ln (+ 2 2))) | ((ln 4)) | ((ln 4)) | | PASS | [METTA-MORPH-TESTS.AND-OR.01](https://logicmoo.org/public/mettareports/_383340.metta.html#METTA-MORPH-TESTS.AND-OR.01) | (assertEqualToResult (If (or (and True False) True) 1 2)) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03](https://logicmoo.org/public/mettareports/_383744.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03) | (assertEqualToResult ((curry +) 2)) | (((curry +) 2)) | (((curry +) 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25](https://logicmoo.org/public/mettareports/_383832.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25) | (assertEqualToResult (fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17](https://logicmoo.org/public/mettareports/_383926.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17) | (assertEqual (match &self (Green $who) $who)) | (Sam) | (Sam) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17](https://logicmoo.org/public/mettareports/_383940.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17) | (assertEqual (match &self (Green $who) $who)) | (Sam) | (Sam) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.18](https://logicmoo.org/public/mettareports/_384116.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.18) | (assertEqual (case (match &self ($rel B $x) ($rel $x)) (((Rel-P $y) (P $y)) ((Rel-Q $y) (Q $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [PREV.TESTS0.01](https://logicmoo.org/public/mettareports/_384586.metta.html#PREV.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.TESTS0.01](https://logicmoo.org/public/mettareports/_384614.metta.html#METTA-MORPH-TESTS.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01](https://logicmoo.org/public/mettareports/_384678.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01) | (assertEqualToResult (match &self (implies (Frog Sam) $what) $what)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [METTA-MORPH-TESTS.TYPES2.01](https://logicmoo.org/public/mettareports/_384794.metta.html#METTA-MORPH-TESTS.TYPES2.01) | (assertEqualToResult (get-type lion1)) | (Lion) | (Lion) | | PASS | [EXPERIMENTS.UNIFY-VIA-LET.06](https://logicmoo.org/public/mettareports/_384846.metta.html#EXPERIMENTS.UNIFY-VIA-LET.06) | (assertEqualToResult (let (Link A $y) (superpose ((Link $x B) (Node A) (Link $x C))) (Link $x $y))) | ((Link A B) (Link A C)) | ((Link A B) (Link A C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06](https://logicmoo.org/public/mettareports/_384890.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06) | (assertEqual (get-type (dropN (ConsN "1" NilN)))) | ((VecN String 0)) | ((VecN String 0)) | | FAIL | [ITERATIVE-CHAINING.IBC-XP.33](https://logicmoo.org/public/mettareports/_385068.metta.html#ITERATIVE-CHAINING.IBC-XP.33) | (assertEqualToResult (isyn (: $prf F) (fromNumber 3) (fromNumber 1))) | () | ((: (((((. (. ModusPonens)) Deduction) ef) de) ((ModusPonens cd) ((ModusPonens bc) ((ModusPonens ab) a)))) F) (: (((((((. .) .) ModusPonens) Deduction) ef) de) ((ModusPonens cd) ((ModusPonens bc) ((ModusPonens ab) a)))) F) (let* (((: $_145192 E) (syn (: $_145192 E) (S (S Z))))) (: ((ModusPonens ef) $_145192) F))) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.09](https://logicmoo.org/public/mettareports/_385098.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.09) | (assertEqualToResult (prodWith * (Cons 1 (Cons 2 Nil)) (Cons 3 (Cons 4 Nil)))) | ((Cons 3 (Cons 4 (Cons 6 (Cons 8 Nil))))) | ((Cons 3 (Cons 4 (Cons 6 (Cons 8 Nil))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03](https://logicmoo.org/public/mettareports/_385342.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03) | (assertEqualToResult ((curry +) 2)) | (((curry +) 2)) | (((curry +) 2)) | | FAIL | [HOL.NATSIMPLETEST~OLD.04](https://logicmoo.org/public/mettareports/_3856260.metta.html#HOL.NATSIMPLETEST~OLD.04) | (assertEqualToResult (synthesize (: $proof (=== (plus (fromNumber 1) (fromNumber 10)) (fromNumber 11))) kb rb (fromNumber 2))) | () | ((: (EqTrans Rec_plus (UnaryEqStruct Base_plus)) (=== (plus (S Z) (S (S (S (S (S (S (S (S (S (S Z))))))))))) (S (S (S (S (S (S (S (S (S (S (S Z))))))))))))) (: (EqTrans (EqTrans EqRefl Rec_plus) (UnaryEqStruct Base_plus)) (=== (plus (S Z) (S (S (S (S (S (S (S (S (S (S Z))))))))))) (S (S (S (S (S (S (S (S (S (S (S Z))))))))))))) (: (EqTrans (EqTrans Rec_plus EqRefl) (UnaryEqStruct Base_plus)) (=== (plus (S Z) (S (S (S (S (S (S (S (S (S (S Z))))))))))) (S (S (S (S (S (S (S (S (S (S (S Z)))))))))))))) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-5.01](https://logicmoo.org/public/mettareports/_385754.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-5.01) | (assertEqualToResult (add-atom &kb (: JF (≼ Jan Feb)))) | () | ((Error (add-atom &kb (: JF (≼ Jan Feb))) add-atom expects a space as the first argument)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01](https://logicmoo.org/public/mettareports/_385838.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01) | (assertEqualToResult (add-atom &kb (SS-P_AS A_AS B_AS))) | () | (()) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/_386160.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-1.01](https://logicmoo.org/public/mettareports/_386278.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-1.01) | (assertEqualToResult (add-atom &kb (: JF (≼ Jan Feb)))) | () | ((Error (add-atom &kb (: JF (≼ Jan Feb))) add-atom expects a space as the first argument)) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-6.01](https://logicmoo.org/public/mettareports/_386278.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-6.01) | (assertEqualToResult (add-atom &kb (: JF (≼ Jan Feb)))) | () | ((Error (add-atom &kb (: JF (≼ Jan Feb))) add-atom expects a space as the first argument)) | | PASS | [BASIC.STATE-TYPES.09](https://logicmoo.org/public/mettareports/_386452.metta.html#BASIC.STATE-TYPES.09) | (assertEqualToResult ("Bind False-first with False")) | (("Bind False-first with False")) | (("Bind False-first with False")) | | PASS | [BACKWARD-CHAINING.BC-XP.26](https://logicmoo.org/public/mettareports/_386726.metta.html#BACKWARD-CHAINING.BC-XP.26) | (assertEqualToResult (add-atom &kb_em (→ A B))) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.26](https://logicmoo.org/public/mettareports/_386766.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.26) | (assertEqualToResult (add-atom &kb_em (→ A B))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06](https://logicmoo.org/public/mettareports/_386928.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06) | (assertEqualToResult (Add Z Ten)) | ((Add Z Ten)) | ((Add Z Ten)) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.10](https://logicmoo.org/public/mettareports/_387202.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.10) | (assertEqualToResult (add-atom &kb (: ON (≼ Oct Nov)))) | (True) | (()) | | FAIL | [EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.10](https://logicmoo.org/public/mettareports/_387202.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.10) | (assertEqualToResult (record synthesize ((: (. $g h) (-> Number $out)) (fromNumber 3)))) | ((⊷ synthesize ((: (. $_384830 h) (-> Number $_384860)) (S (S (S Z)))) (synthesize (: (. $_384830 ... | () | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.06](https://logicmoo.org/public/mettareports/_387248.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.06) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://logicmoo.org/public/mettareports/_38774.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | PASS | [NEW.TESTS0.05](https://logicmoo.org/public/mettareports/_38806.metta.html#NEW.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/_388086.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_383614)) | ((State 1 $_383614)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01](https://logicmoo.org/public/mettareports/_388494.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01) | (assertEqual (get-state (get-token))) | ((A B)) | ((A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09](https://logicmoo.org/public/mettareports/_388730.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09) | (assertEqualToResult (is-socrates)) | ((curry-a is Socrates)) | ((curry-a is Socrates)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09](https://logicmoo.org/public/mettareports/_388744.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09) | (assertEqualToResult (is-socrates)) | ((curry-a is Socrates)) | ((curry-a is Socrates)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02](https://logicmoo.org/public/mettareports/_388746.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02) | (assertEqual (insert 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [NARS-V0.TESTS0.01](https://logicmoo.org/public/mettareports/_388966.metta.html#NARS-V0.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | PASS | [ITERATIVE-CHAINING.IFC-XP.02](https://logicmoo.org/public/mettareports/_389002.metta.html#ITERATIVE-CHAINING.IFC-XP.02) | (assertEqual (fc_bare A kb_bare rb_bare (fromNumber 1))) | (B) | (B) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01](https://logicmoo.org/public/mettareports/_389006.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01) | (assertEqual (get-type (Cons 0 (Cons 1 Nil)))) | ((Vec Number (S (S Z)))) | ((Vec Number (S (S Z)))) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/_389148.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/_389160.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/_389174.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/_389196.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://logicmoo.org/public/mettareports/_389490.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.04](https://logicmoo.org/public/mettareports/_389742.metta.html#METTA-MORPH-TESTS.STATES-SPACES.04) | (assertEqualToResult (add-atom &WU b)) | () | (()) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://logicmoo.org/public/mettareports/_389776.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqualToResult (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/_389818.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | (1764 1764) | (1764) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01](https://logicmoo.org/public/mettareports/_389976.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01) | (assertEqualToResult (match &self (EvaluationLink (PredicateNode "eats") (ListLink $x (ConceptNode "flies"))) $x)) | ((ConceptNode "Sam") (ConceptNode "Fritz")) | ((ConceptNode "Fritz") (ConceptNode "Sam")) | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://logicmoo.org/public/mettareports/_390202.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($A mortal) (mortal $A))))) | ((mortal man)) | ((mortal man)) | | PASS | [PREV.TESTS1.01](https://logicmoo.org/public/mettareports/_390412.metta.html#PREV.TESTS1.01) | (assertEqual (TupleCount (get-atoms &belief_events))) | (0) | (0) | | PASS | [HOL.NATTEST.02](https://logicmoo.org/public/mettareports/_39074.metta.html#HOL.NATTEST.02) | (assertEqual (synthesize (: $prf (=== (plus Z Z) Z)) kb rb Z)) | ((: Base_plus (=== (plus Z Z) Z))) | ((: Base_plus (=== (plus Z Z) Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05](https://logicmoo.org/public/mettareports/_391256.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | FAIL | [HOL.NATSIMPLETEST.04](https://logicmoo.org/public/mettareports/_3913858.metta.html#HOL.NATSIMPLETEST.04) | (assertEqualToResult (synthesize (: $proof (=== (plus (fromNumber 1) (fromNumber 5)) (fromNumber 6))) kb rb (fromNumber 2))) | () | ((: (EqTrans Rec_plus (EqStruct1 Base_plus)) (=== (plus (S Z) (S (S (S (S (S Z)))))) (S (S (S (S (S (S Z)))))))) (: (EqTrans (EqTrans EqRefl Rec_plus) (EqStruct1 Base_plus)) (=== (plus (S Z) (S (S (S (S (S Z)))))) (S (S (S (S (S (S Z)))))))) (: (EqTrans (EqTrans Rec_plus EqRefl) (EqStruct1 Base_plus)) (=== (plus (S Z) (S (S (S (S (S Z)))))) (S (S (S (S (S (S Z))))))))) | | FAIL | [PREV.TESTS3.05](https://logicmoo.org/public/mettareports/_391790.metta.html#PREV.TESTS3.05) | (assertEqual (AddGoalEvent (Outside (1.0 0.9)))) | () | (None) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11](https://logicmoo.org/public/mettareports/_39184.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11) | (assertEqual (get-type (pair (LeftP 5) "String"))) | ((Pair (EitherP Number) String)) | ((Pair (EitherP Number) String)) | | FAIL | [NARS-EXTRAS.NARS-BUILDTUPLECOUNTS.02](https://logicmoo.org/public/mettareports/_392070.metta.html#NARS-EXTRAS.NARS-BUILDTUPLECOUNTS.02) | (assertEqualToResult (get-atoms &self)) | ((: If (-> Bool Atom Atom)) (= (If True $_389504) $_389504) (= (If False $_389462) ()) (: If (-> Boo... | (GroundingSpace-0x555b9c5de458 GroundingSpace-0x555b9c5e5048 (: CollapseCardinality (-> Expression Number)) (: CountElement (-> Expression Number)) (: If (-> Bool Atom Atom)) (: If (-> Bool Atom Atom Atom)) (: do (-> Expression %Undefined%)) (: sequential (-> Expression %Undefined%)) (= $_367402 $_367402) (= $_367634 $_367634) (= 0 0) (= 1 1) (= 2 2) (= 3 3) (= 4 4) (= 5 5) (= 6 6) (= 7 7) (= 8 8) (= 9 9) (= 10 10) (= 11 11) (= 12 12) (= () ()) (= () (If (< $_369394 $_369416) (BuildTupleCounts (1 (Error (superpose $_369502) superpose expects single expression as an argument)) (+ $_369394 1) $_369416))) (= (Error (superpose $_368238) superpose expects single expression as an argument) (Error (superpose $_368238) superpose expects single expression as an argument)) (= (If (< $_369394 $_369416) (BuildTupleCounts (1 (Error (superpose $_369502) superpose expects single expression as an argument)) (+ $_369394 1) $_369416)) ()) (= (If (< $_369394 $_369416) (BuildTupleCounts (1 (Error (superpose $_369502) superpose expects single expression as an argument)) (+ $_369394 1) $_369416)) (If (< $_369394 $_369416) (BuildTupleCounts (1 (Error (superpose $_369502) superpose expects single expression as an argument)) (+ $_369394 1) $_369416))) (= (if (< $_368238 $_368260) $_368238 $_368260) (if (< $_368238 $_368260) $_368238 $_368260)) (= (if (< $_368694 0) (- 0 $_368694) $_368694) (if (< $_368694 0) (- 0 $_368694) $_368694)) (= (if (> $_368238 $_368260) $_368238 $_368260) (if (> $_368238 $_368260) $_368238 $_368260)) (= ((Error (superpose $_367782) superpose expects single expression as an argument) (Error (superpose $_367892) superpose expects single expression as an argument)) ((Error (superpose $_367782) superpose expects single expression as an argument) (Error (superpose $_367892) superpose expects single expression as an argument)))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://logicmoo.org/public/mettareports/_392074.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | ((= (+ 1 1) (- 3 1))) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://logicmoo.org/public/mettareports/_392102.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | ((= (+ 1 1) (- 3 1))) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01](https://logicmoo.org/public/mettareports/_392192.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01) | (assertEqualToResult (match &self (EvaluationLink (PredicateNode "eats") (ListLink $x (ConceptNode "flies"))) $x)) | ((ConceptNode "Sam") (ConceptNode "Fritz")) | ((ConceptNode "Fritz") (ConceptNode "Sam")) | | FAIL | [NARS-V0.TESTS3.06](https://logicmoo.org/public/mettareports/_392382.metta.html#NARS-V0.TESTS3.06) | (assertEqual (GoalCycle (get-state ¤tTime))) | ((BestDecision 7 Nil ((Event (corridorIn (1.0 0.9)) (4 (4) (4 1.0))) (Event (((doorAt &/ (^ open)) =... | ((^ forward)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19](https://logicmoo.org/public/mettareports/_392818.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19) | (assertEqual (fmap (curry-a + 2) (UntypedC 5 (UntypedC 8 (Null))))) | ((UntypedC 7 (UntypedC 10 (Null)))) | ((UntypedC 7 (UntypedC 10 (Null)))) | | FAIL | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.20](https://logicmoo.org/public/mettareports/_393316.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.20) | (assertEqualToResult test) | (True) | ("~~~ test depth-bc-continuor ~~~") | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02](https://logicmoo.org/public/mettareports/_393396.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [BACKWARD-CHAINING.BC-XP.44](https://logicmoo.org/public/mettareports/_393404.metta.html#BACKWARD-CHAINING.BC-XP.44) | (assertEqual (bc_dem (: $prf (→ B C)) (fromNumber 0))) | ((: bc (→ B C))) | ((: bc (→ B C))) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.44](https://logicmoo.org/public/mettareports/_393476.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.44) | (assertEqual (bc_dem (: $prf (→ B C)) (fromNumber 0))) | ((: bc (→ B C))) | ((: bc (→ B C))) | | PASS | [FORWARD-CHAINING.FC-XP.11](https://logicmoo.org/public/mettareports/_393540.metta.html#FORWARD-CHAINING.FC-XP.11) | (assertEqualToResult (fc_eq (→ A B) kb_eq (fromNumber 2))) | ((→ A B) B C) | (B C (→ A B)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.11](https://logicmoo.org/public/mettareports/_393564.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.11) | (assertEqualToResult (fc_eq (→ A B) kb_eq (fromNumber 2))) | ((→ A B) B C) | (B C (→ A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01](https://logicmoo.org/public/mettareports/_393894.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01) | (assertEqual (get-state (get-token))) | ((A B)) | ((A B)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04](https://logicmoo.org/public/mettareports/_39406.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04) | (assertEqualToResult (get-type (+ 5 "4"))) | (Number) | () | | PASS | [FORWARD-CHAINING.FC-XP.15](https://logicmoo.org/public/mettareports/_394128.metta.html#FORWARD-CHAINING.FC-XP.15) | (assertEqualToResult (add-atom &kb_bem (→ B C))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05](https://logicmoo.org/public/mettareports/_394196.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.15](https://logicmoo.org/public/mettareports/_394272.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.15) | (assertEqualToResult (add-atom &kb_bem (→ B C))) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://logicmoo.org/public/mettareports/_394298.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (match &belief_events $1 $1)) | (belief1) | (belief1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01](https://logicmoo.org/public/mettareports/_394406.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01) | (assertEqual (get-type (Cons 0 (Cons 1 Nil)))) | ((Vec Number (S (S Z)))) | ((Vec Number (S (S Z)))) | | FAIL | [ITERATIVE-CHAINING.IBC-XP.14](https://logicmoo.org/public/mettareports/_394416.metta.html#ITERATIVE-CHAINING.IBC-XP.14) | (assertEqualToResult (syn (: $prf (-> (→ $q $r) (-> (→ $p $q) (-> $p $r)))) (fromNumber 4))) | () | ((: ((. (. ModusPonens)) Deduction) (-> (→ $_72586 $_72608) (-> (→ $_72662 $_72586) (-> $_72662 $_72608)))) (: ((((. .) .) ModusPonens) Deduction) (-> (→ $_72586 $_72608) (-> (→ $_72662 $_72586) (-> $_72662 $_72608))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02](https://logicmoo.org/public/mettareports/_394496.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02) | (assertEqual (get-type (HumansAreMortal SocratesIsHuman))) | ((Mortal Socrates)) | ((Mortal Socrates)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.02](https://logicmoo.org/public/mettareports/_394824.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.02) | (assertEqualToResult (superpose ((superpose (a b c))))) | (a b c) | (a b c) | | PASS | [HOL.NATSIMPLETEST~OLD.02](https://logicmoo.org/public/mettareports/_3948388.metta.html#HOL.NATSIMPLETEST~OLD.02) | (assertEqualToResult (synthesize (: $proof (=== (plus (S Z) Z) (S Z))) kb rb (fromNumber 2))) | ((: (EqTrans Rec_plus (UnaryEqStruct Base_plus)) (=== (plus (S Z) Z) (S Z))) (: (EqTrans (EqTrans Eq... | ((: (EqTrans Rec_plus (UnaryEqStruct Base_plus)) (=== (plus (S Z) Z) (S Z))) (: (EqTrans (EqTrans EqRefl Rec_plus) (UnaryEqStruct Base_plus)) (=== (plus (S Z) Z) (S Z))) (: (EqTrans (EqTrans Rec_plus EqRefl) (UnaryEqStruct Base_plus)) (=== (plus (S Z) Z) (S Z)))) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-SUPERPOSE.04](https://logicmoo.org/public/mettareports/_39504.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-SUPERPOSE.04) | (assertEqualToResult ((. g f) 42)) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02](https://logicmoo.org/public/mettareports/_395302.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02) | (assertEqual (get-type (HumansAreMortal SocratesIsHuman))) | ((Mortal Socrates)) | ((Mortal Socrates)) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_395476.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.NALIFIER.01](https://logicmoo.org/public/mettareports/_395664.metta.html#METTA-MORPH-TESTS.NALIFIER.01) | (assertEqualToResult (let ($S $EV) (choiceQuery (((ExtSet sam) --> duck) ((ExtSet sam) --> swan) ((ExtSet sam) --> dog))) $S)) | ((((ExtSet sam) --> duck) (1.0 0.6183206106870229))) | ((((ExtSet sam) --> duck) (1.0 0.618320610687023))) | | PASS | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.03](https://logicmoo.org/public/mettareports/_395988.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.03) | (assertEqual (synthesize (: $proof (≞ (→ Q R) $tv)) kb rb Z)) | ((: QRm (≞ (→ Q R) (STV 0.9 0.5)))) | ((: QRm (≞ (→ Q R) (STV 0.9 0.5)))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://logicmoo.org/public/mettareports/_396092.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03](https://logicmoo.org/public/mettareports/_396420.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03) | (assertEqual (TV (croaks Fritz))) | ((stv 0.95 0.85)) | ((stv 0.95 0.85)) | | FAIL | [DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-481.01](https://logicmoo.org/public/mettareports/_396648.metta.html#DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-481.01) | (assertEqualToResult (== () (collapse (let* (($L ()) ($x (superpose $L))) $x)))) | (True) | (False) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.06](https://logicmoo.org/public/mettareports/_397008.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.06) | (assertEqual (:check (= (Human Socrates) (Mortal Socrates)) Prop)) | () | (T) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04](https://logicmoo.org/public/mettareports/_397028.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04) | (assertEqual (match &kb ($rel A_AS $x) ($rel $x))) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | | FAIL | [FORWARD-CHAINING.FC-XP.01](https://logicmoo.org/public/mettareports/_397308.metta.html#FORWARD-CHAINING.FC-XP.01) | (assertEqualToResult ===) | (===) | ("=== Entail ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01](https://logicmoo.org/public/mettareports/_397442.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01) | (assertEqualToResult (get-type &self)) | (hyperon::space::DynSpace) | (hyperon::space::DynSpace) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04](https://logicmoo.org/public/mettareports/_39746.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04) | (assertEqualToResult (get-type (drop Nil))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03](https://logicmoo.org/public/mettareports/_397896.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03) | (assertEqual (get-type +)) | ((-> Number Number Number)) | ((-> Number Number Number)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.15](https://logicmoo.org/public/mettareports/_397988.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.15) | (assertEqualToResult (add-atom &ctl-depth-kb (: CS (Continue $query (S $k))))) | () | (()) | | FAIL | [FORWARD-CHAINER.FORWARD-CHAINER-XP.01](https://logicmoo.org/public/mettareports/_398190.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.01) | (assertEqualToResult ===) | (===) | ("=== Entail ===") | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.01](https://logicmoo.org/public/mettareports/_398428.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.01) | (assertEqualToResult (add-atom &kb (: JF (≼ Jan Feb)))) | () | (()) | | PASS | [POSSIBLY-WRONG.TOO-EAGER-MATH.01](https://logicmoo.org/public/mettareports/_398854.metta.html#POSSIBLY-WRONG.TOO-EAGER-MATH.01) | (assertEqualToResult (plus-got 1 (+ 2 2))) | (5 (got 1 4)) | (5 (got 1 4)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://logicmoo.org/public/mettareports/_39890.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://logicmoo.org/public/mettareports/_398990.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | PASS | [HOL.NATSIMPLETEST.02](https://logicmoo.org/public/mettareports/_3991654.metta.html#HOL.NATSIMPLETEST.02) | (assertEqualToResult (synthesize (: $proof (=== (plus (S Z) Z) (S Z))) kb rb (fromNumber 2))) | ((: (EqTrans Rec_plus (EqStruct1 Base_plus)) (=== (plus (S Z) Z) (S Z))) (: (EqTrans (EqTrans EqRefl... | ((: (EqTrans Rec_plus (EqStruct1 Base_plus)) (=== (plus (S Z) Z) (S Z))) (: (EqTrans (EqTrans EqRefl Rec_plus) (EqStruct1 Base_plus)) (=== (plus (S Z) Z) (S Z))) (: (EqTrans (EqTrans Rec_plus EqRefl) (EqStruct1 Base_plus)) (=== (plus (S Z) Z) (S Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09](https://logicmoo.org/public/mettareports/_399252.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09) | (assertEqualToResult (== 4 (+ 2 2))) | (True) | (True) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://logicmoo.org/public/mettareports/_399280.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqualToResult (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.07](https://logicmoo.org/public/mettareports/_399822.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.07) | (assertEqualToResult (add-atom &kb (: JA (≼ Jul Aug)))) | (True) | (()) | | PASS | [SANITY.DOWNLOAD-FILE.01](https://logicmoo.org/public/mettareports/_400208.metta.html#SANITY.DOWNLOAD-FILE.01) | (assertEqualToResult ("MettaLog Test")) | (("MettaLog Test")) | (("MettaLog Test")) | | PASS | [BACKWARD-CHAINING.BC-XP.16](https://logicmoo.org/public/mettareports/_400350.metta.html#BACKWARD-CHAINING.BC-XP.16) | (assertEqualToResult (add-atom &kb_bem A)) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.16](https://logicmoo.org/public/mettareports/_400408.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.16) | (assertEqualToResult (add-atom &kb_bem A)) | () | (()) | | PASS | [DEPENDENT-TYPES.MINERCURRIEDDTL.02](https://logicmoo.org/public/mettareports/_40072.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTL.02) | (assertEqualToResult (add-atom &db (Inheritance C A))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04](https://logicmoo.org/public/mettareports/_400872.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04) | (assertEqualToResult (match &self (, (implies ($P $x) (Green $x)) (implies ($P $x) (Eats-flies $x))) (Then it is definitely $P))) | ((Then it is definitely Frog)) | ((Then it is definitely Frog)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.06](https://logicmoo.org/public/mettareports/_400894.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.06) | (assertEqualToResult (bc &kb depth-updater depth-updater depth-bc-terminator (fromNumber 3) (: $prf (≼ Jan Mar)))) | ((: JPA (≼ Jan Mar)) (: ((Trans JF) FM) (≼ Jan Mar)) (: ((Trans Refl) JPA) (≼ Jan Mar)) (: ((T... | ((: JPA (≼ Jan Mar)) (: ((Trans JF) FM) (≼ Jan Mar)) (: ((Trans JPA) FM) (≼ Jan Mar)) (: ((Trans JPA) JPA) (≼ Jan Mar)) (: ((Trans JPA) Refl) (≼ Jan Mar)) (: ((Trans Refl) JPA) (≼ Jan Mar))) | | PASS | [CURRENT.TESTS1.01](https://logicmoo.org/public/mettareports/_400916.metta.html#CURRENT.TESTS1.01) | (assertEqualToResult (" (get-type &belief_events) => " (get-type &belief_events))) | ((" (get-type &belief_events) => " hyperon::space::DynSpace)) | ((" (get-type &belief_events) => " hyperon::space::DynSpace)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.07](https://logicmoo.org/public/mettareports/_40100.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.07) | (assertEqual (bc &kb depth-updater depth-updater depth-terminator (fromNumber 4) (: $prf (≼ Feb May)))) | ((: ((Trans FM) ((Trans MA) AM)) (≼ Feb May))) | ((: ((Trans FM) ((Trans MA) AM)) (≼ Feb May))) | | PASS | [FORWARD-CHAINING.FC-XP.26](https://logicmoo.org/public/mettareports/_401076.metta.html#FORWARD-CHAINING.FC-XP.26) | (assertEqualToResult (fc_em (→ A B) (fromNumber 2))) | ((→ A B) B C) | (B C (→ A B)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05](https://logicmoo.org/public/mettareports/_40112.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05) | (assertEqual (match &self (= (status (Goal $goal)) &state-active) $goal)) | () | (meditation) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.26](https://logicmoo.org/public/mettareports/_401136.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.26) | (assertEqualToResult (fc_em (→ A B) (fromNumber 2))) | ((→ A B) B C) | (B C (→ A B)) | | PASS | [NARS-V0.TESTS1.01](https://logicmoo.org/public/mettareports/_401304.metta.html#NARS-V0.TESTS1.01) | (assertEqual (TupleCount (get-atoms &belief_events))) | (0) | (0) | | PASS | [BASIC.KEY-LOOKUPS-MANY.13](https://logicmoo.org/public/mettareports/_401524.metta.html#BASIC.KEY-LOOKUPS-MANY.13) | (assertEqual (match &data (= (get-data k-7) $v) (get-state $v))) | (v-7) | (v-7) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03](https://logicmoo.org/public/mettareports/_401834.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03) | (assertEqual (TV (croaks Fritz))) | ((stv 0.95 0.85)) | ((stv 0.95 0.85)) | | PASS | [COMMON.ORDEREDSETTEST.05](https://logicmoo.org/public/mettareports/_401894.metta.html#COMMON.ORDEREDSETTEST.05) | (assertEqual (elem 1 (insert 2 (insert 3 ∅)))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01](https://logicmoo.org/public/mettareports/_402000.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01) | (assertEqualToResult (Frog Sam)) | ((Frog Sam)) | ((Frog Sam)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04](https://logicmoo.org/public/mettareports/_40218.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (sequential ((increment) (increment) (increment)))))) | (10 11 12 13 14 15) | (10 11 12 13 14 15) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://logicmoo.org/public/mettareports/_402398.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://logicmoo.org/public/mettareports/_402412.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | FAIL | [CURRIED-CHAINING.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_402662.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [HOL.NATPARITYTEST.15](https://logicmoo.org/public/mettareports/_402898.metta.html#HOL.NATPARITYTEST.15) | (assertEqualToResult (add-atom &kb (: -> (: $g (-> (: $y $b) $c)) (-> (: $f (-> (: $x $a) $b)) (-> (: $x $a) $c))))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/_403134.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | (T) | (T) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.02](https://logicmoo.org/public/mettareports/_403196.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.02) | (assertEqual (maybe-inc (Just 2))) | ((Just 3)) | ((Just 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04](https://logicmoo.org/public/mettareports/_403228.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04) | (assertEqual (get-type (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16](https://logicmoo.org/public/mettareports/_403304.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16) | (assertEqualToResult (dup 2)) | (102 102 102 102 12) | (12 102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03](https://logicmoo.org/public/mettareports/_403310.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03) | (assertEqual (get-type +)) | ((-> Number Number Number)) | ((-> Number Number Number)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.11](https://logicmoo.org/public/mettareports/_403438.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.11) | (assertEqualToResult (superpose ((nop 1)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/_403682.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.02](https://logicmoo.org/public/mettareports/_404312.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.02) | (assertEqualToResult (superpose ((superpose (a b c))))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://logicmoo.org/public/mettareports/_40454.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/_404808.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_400336)) | ((State 1 $_400336)) | | PASS | [HOL.NATSTANDALONETEST.09](https://logicmoo.org/public/mettareports/_405044.metta.html#HOL.NATSTANDALONETEST.09) | (assertEqualToResult (add-atom &kb (: -> (-> $b $c) (-> (-> $a $b) (-> $a $c))))) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://logicmoo.org/public/mettareports/_405280.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (add-atom &attentional_focus 1)) | () | (()) | | PASS | [MATCH.DEDUCTIONMATCHTEST.01](https://logicmoo.org/public/mettareports/_405288.metta.html#MATCH.DEDUCTIONMATCHTEST.01) | (assertEqualToResult (deduction_match &self)) | ((≞ (→ P R) (ded_formula (STV 1 0.1) (STV 1 0.1) (STV 1 0.1) (STV 1 0.5) (STV 1 0.5)))) | ((≞ (→ P R) (ded_formula (STV 1 0.1) (STV 1 0.1) (STV 1 0.1) (STV 1 0.5) (STV 1 0.5)))) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.11](https://logicmoo.org/public/mettareports/_406032.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.11) | (assertEqualToResult (superpose ((nop 1)))) | () | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11](https://logicmoo.org/public/mettareports/_406128.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11) | (assertEqual &m) | (&m) | ((: g (-> Number Numer))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04](https://logicmoo.org/public/mettareports/_406272.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04) | (assertEqualToResult (match &self (, (implies ($P $x) (Green $x)) (implies ($P $x) (Eats-flies $x))) (Then it is definitely $P))) | ((Then it is definitely Frog)) | ((Then it is definitely Frog)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.18](https://logicmoo.org/public/mettareports/_406320.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.18) | (assertEqual (case (match &self ($rel B $x) ($rel $x)) (((Rel-P $y) (P $y)) ((Rel-Q $y) (Q $y)) (%void% no-match)))) | (no-match) | (no-match) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.01](https://logicmoo.org/public/mettareports/_406384.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.01) | (assertEqualToResult (add-atom &kb (: JF (≼ Jan Feb)))) | (True) | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13](https://logicmoo.org/public/mettareports/_40652.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [CURRENT.TESTS5.01](https://logicmoo.org/public/mettareports/_406688.metta.html#CURRENT.TESTS5.01) | (assertEqualToResult ("sheep see")) | (("sheep see")) | (("sheep see")) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://logicmoo.org/public/mettareports/_406692.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.06](https://logicmoo.org/public/mettareports/_407022.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.06) | (assertEqualToResult (range 2 6)) | ((2 3 4 5)) | ((2 3 4 5)) | | PASS | [SANITY.LOAD-ALL-OF-FLYBASE.01](https://logicmoo.org/public/mettareports/_407048.metta.html#SANITY.LOAD-ALL-OF-FLYBASE.01) | (assertEqualToResult ("MettaLog Test")) | (("MettaLog Test")) | (("MettaLog Test")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04](https://logicmoo.org/public/mettareports/_407172.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04) | (assertEqual (get-type (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22](https://logicmoo.org/public/mettareports/_407208.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC (Null) 5)))) | () | () | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.15](https://logicmoo.org/public/mettareports/_407436.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.15) | (assertEqualToResult (fc_dtl (: ab (→ A B)) kb_dtl rb_dtl (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | ((: ab (→ A B)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | PASS | [BASIC.TEST-LIST-CONCATENATION.01](https://logicmoo.org/public/mettareports/_407546.metta.html#BASIC.TEST-LIST-CONCATENATION.01) | (assertEqual (Concat (lst1) (lst2))) | ((Cons a1 (Cons a2 (Cons b1 (Cons b2 Nil))))) | ((Cons a1 (Cons a2 (Cons b1 (Cons b2 Nil))))) | | PASS | [ITERATIVE-CHAINING.IBC-XP.09](https://logicmoo.org/public/mettareports/_408132.metta.html#ITERATIVE-CHAINING.IBC-XP.09) | (assertEqual (syn (: $prf (-> $prms (-> A B))) Z)) | ((: ModusPonens (-> (→ A B) (-> A B)))) | ((: ModusPonens (-> (→ A B) (-> A B)))) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.18](https://logicmoo.org/public/mettareports/_408196.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.18) | (assertEqual (case (match &self ($rel B $x) ($rel $x)) (((Rel-P $y) (P $y)) ((Rel-Q $y) (Q $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://logicmoo.org/public/mettareports/_408864.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://logicmoo.org/public/mettareports/_408866.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://logicmoo.org/public/mettareports/_408880.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | (T) | (T) | | FAIL | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.18](https://logicmoo.org/public/mettareports/_408916.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.18) | (assertEqualToResult ===) | (===) | ("=== test depth-bc-continuor ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02](https://logicmoo.org/public/mettareports/_409094.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02) | (assertEqualToResult (match &self ($who is a $what) ($who the $what))) | ((Sam the frog) (Tom the cat) (Sophia the robot)) | ((Sam the frog) (Sophia the robot) (Tom the cat)) | | PASS | [METTA-MORPH-TESTS.MINNARS.01](https://logicmoo.org/public/mettareports/_409446.metta.html#METTA-MORPH-TESTS.MINNARS.01) | (assertEqualToResult (Question ((Sentence (((ExtSet garfield) --> cat) (1.0 0.9)) (1)) (Sentence (((cat x sky) --> like) (1.0 0.9)) (2)) (Sentence ((sky --> (IntSet blue)) (1.0 0.9)) (3)) (Sentence ((... | (((1.0 0.37946790052053214) (2 1 3 4))) | (((1.0 0.37946790052053214) (2 1 3 4))) | | PASS | [NARS-EXTRAS.RUN-MINNARS-TRIMMED.01](https://logicmoo.org/public/mettareports/_409456.metta.html#NARS-EXTRAS.RUN-MINNARS-TRIMMED.01) | (assertEqualToResult (Question ((Sentence (((ExtSet garfield) --> cat) (1.0 0.9)) (1)) (Sentence (((cat x sky) --> like) (1.0 0.9)) (2)) (Sentence ((sky --> (IntSet blue)) (1.0 0.9)) (3)) (Sentence ((... | (((1.0 0.37946790052053214) (2 1 3 4))) | (((1.0 0.37946790052053214) (2 1 3 4))) | | PASS | [COMPARISONS.NILS-IF-CONTROL-TEST-2.01](https://logicmoo.org/public/mettareports/_409782.metta.html#COMPARISONS.NILS-IF-CONTROL-TEST-2.01) | (assertEqualToResult (add-atom &kb (: AK (-> (: $x $a) (-> (: $y $b) $a))))) | () | (()) | | PASS | [ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.06](https://logicmoo.org/public/mettareports/_40990.metta.html#ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.06) | (assertEqualToResult (let* (($pa (≞ (P 42) (Bl True))) ($qa (≞ (Q 42) (Bl False))) ($pq (≞ (→ P Q) (ETV (STV 1 0)))) ($an (∉ 42 ))) (match &self (⊢ $pa $qa $pq $an $conclusion) $conclusio... | ((≞ (→ P Q) (ETV (insert 42 ) (idi_formula (Bl True) $_4122 (STV 1 0))))) | ((≞ (→ P Q) (ETV (insert 42 ) (idi_formula (Bl True) $_4122 (STV 1 0))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01](https://logicmoo.org/public/mettareports/_410064.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01) | (assertEqualToResult (match &self (implies (Frog Sam) $what) $what)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23](https://logicmoo.org/public/mettareports/_410132.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23) | (assertEqual (eqa (Add Z Z) (Add Z Z))) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.TYPES2.01](https://logicmoo.org/public/mettareports/_410180.metta.html#METTA-MORPH-TESTS.TYPES2.01) | (assertEqualToResult (get-type lion1)) | (Lion) | (Lion) | | FAIL | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.05](https://logicmoo.org/public/mettareports/_41026.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.05) | (assertEqualToResult Entail) | (Entail) | ("=== Bare entail ===") | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.03](https://logicmoo.org/public/mettareports/_410314.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.03) | (assertEqualToResult (superpose ((superpose (a b c)) (superpose (x y z))))) | (a b c x y z) | (a b c x y z) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06](https://logicmoo.org/public/mettareports/_410392.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06) | (assertEqual (get-type (dropN (ConsN "1" NilN)))) | ((VecN String 0)) | ((VecN String 0)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03](https://logicmoo.org/public/mettareports/_410900.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01](https://logicmoo.org/public/mettareports/_411310.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01) | (assertEqualToResult (add-atom &kb (SS-P_AS A_AS B_AS))) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/_411334.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | ((= (Mortal Socrates) T)) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11](https://logicmoo.org/public/mettareports/_411508.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11) | (assertEqual &m) | (&m) | ((: g (-> Number Numer))) | | PASS | [ITERATIVE-CHAINING.IFC-XP.12](https://logicmoo.org/public/mettareports/_411660.metta.html#ITERATIVE-CHAINING.IFC-XP.12) | (assertEqualToResult (get-atoms &space-test)) | (A B C) | (A B C) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.12](https://logicmoo.org/public/mettareports/_411998.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.12) | (assertEqualToResult (collapse (superpose ((nop 1))))) | () | (()) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://logicmoo.org/public/mettareports/_41250.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.08](https://logicmoo.org/public/mettareports/_412606.metta.html#FORMULA.DEDUCTIONFORMULATEST.08) | (assertEqualToResult (conditional-probability-consistency 0.9 0.6 0.5)) | (False) | (False) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.02](https://logicmoo.org/public/mettareports/_412694.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.02) | (assertEqual (maybe-inc (Just 2))) | ((Just 3)) | ((Just 3)) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.02](https://logicmoo.org/public/mettareports/_412708.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.02) | (assertEqual (maybe-inc (Just 2))) | ((Just 3)) | ((Just 3)) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_413142.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | FAIL | [NEW.TESTS0.07](https://logicmoo.org/public/mettareports/_413256.metta.html#NEW.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_413318.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | FAIL | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_413324.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03](https://logicmoo.org/public/mettareports/_41346.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03) | (assertEqualToResult (match &self (= ($p Fritz) T) $p)) | (croaks eat_flies) | (croaks eat_flies) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02](https://logicmoo.org/public/mettareports/_414494.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02) | (assertEqualToResult (match &self ($who is a $what) ($who the $what))) | ((Sam the frog) (Tom the cat) (Sophia the robot)) | ((Sam the frog) (Sophia the robot) (Tom the cat)) | | PASS | [DEPENDENT-TYPES.MINERDTLTEST.01](https://logicmoo.org/public/mettareports/_414652.metta.html#DEPENDENT-TYPES.MINERDTLTEST.01) | (assertEqualToResult (add-atom &db (Inheritance B A))) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://logicmoo.org/public/mettareports/_414784.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (add-atom &attentional_focus 1)) | () | (()) | | PASS | [JOHN-CARRY-FLOWER.JOHN-CARRY-FLOWER-TEST.02](https://logicmoo.org/public/mettareports/_415004.metta.html#JOHN-CARRY-FLOWER.JOHN-CARRY-FLOWER-TEST.02) | (assertEqualToResult (synthesize (: $proof (instance JohnsCarry Transfer)) kb rb (fromNumber 2))) | ((: (ModusPonens (WitnessOf (⟹ (∧ (subclass Carrying Transfer) (instance JohnsCarry Carrying)) (... | ((: (ModusPonens (WitnessOf (⟹ (∧ (subclass Carrying Transfer) (instance JohnsCarry Carrying)) (instance JohnsCarry Transfer))) (BinaryConjunctionIntroduction (WitnessOf (subclass Carrying Transfer)) (WitnessOf (instance JohnsCarry Carrying)))) (instance JohnsCarry Transfer))) | | PASS | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/_415006.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | (1764 1764) | (1764) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19](https://logicmoo.org/public/mettareports/_415392.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19) | (assertEqualToResult (dup 2)) | (102 102 102 102 102 102 102 102 102 12 12) | (12 102) | | PASS | [METTA-MORPH-TESTS.TYPES2.02](https://logicmoo.org/public/mettareports/_415562.metta.html#METTA-MORPH-TESTS.TYPES2.02) | (assertEqualToResult (reproduce lion1 lion2)) | (childlion) | (childlion) | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://logicmoo.org/public/mettareports/_415588.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($A mortal) (mortal $A))))) | ((mortal man)) | ((mortal man)) | | PASS | [ITERATIVE-CHAINING.IBC-XP.12](https://logicmoo.org/public/mettareports/_415722.metta.html#ITERATIVE-CHAINING.IBC-XP.12) | (assertEqual (syn (: $prf C) (fromNumber 3))) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C)) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.38](https://logicmoo.org/public/mettareports/_416020.metta.html#ITERATIVE-CHAINING.IFC-XP.38) | (assertEqualToResult (get-atoms &kb)) | ((: ab (→ A B)) (: bc (→ B C)) (: a A)) | ((: a A) (: ab (→ A B)) (: bc (→ B C))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01](https://logicmoo.org/public/mettareports/_416096.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01) | (assertEqual (TV (And (PA) (PB)))) | ((stv 0.3 0.8)) | ((stv 0.3 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03](https://logicmoo.org/public/mettareports/_416286.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19](https://logicmoo.org/public/mettareports/_416296.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19) | (assertEqualToResult (+ 1 (bin))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19](https://logicmoo.org/public/mettareports/_416310.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19) | (assertEqualToResult (+ 1 (bin))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06](https://logicmoo.org/public/mettareports/_416352.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06) | (assertEqual (get-type (dropN (ConsN "1" NilN)))) | ((VecN String 0)) | ((VecN String 0)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01](https://logicmoo.org/public/mettareports/_416390.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [EXPERIMENTS.UNIFY-VIA-CASE.06](https://logicmoo.org/public/mettareports/_416558.metta.html#EXPERIMENTS.UNIFY-VIA-CASE.06) | (assertEqualToResult (case (g $y) (($z (case (f $x) (($z $z))))))) | ((Link A B)) | ((Link A B)) | | FAIL | [SYNTHESIS.UNIFYTEST.02](https://logicmoo.org/public/mettareports/_417162.metta.html#SYNTHESIS.UNIFYTEST.02) | (assertEqualToResult (unify* (((Link $x B $z) (Link A $y $z)) ($z C)) (Link $x $y $z))) | () | ((Link A B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01](https://logicmoo.org/public/mettareports/_417208.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01) | (assertEqual (green Fritz)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01](https://logicmoo.org/public/mettareports/_417352.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01) | (assertEqualToResult (match &self (implies (Frog Sam) $what) $what)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [COMPARISONS.NAIVE-FIB.01](https://logicmoo.org/public/mettareports/_417522.metta.html#COMPARISONS.NAIVE-FIB.01) | (assertEqualToResult (fib 10)) | (55) | (55) | | FAIL | [CURRIED-CHAINING.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_417828.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | FAIL | [CURRIED-CHAINING.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_417878.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | FAIL | [POLYMORPHIC-TYPES.EXAMPLES-QUANTS.01](https://logicmoo.org/public/mettareports/_417896.metta.html#POLYMORPHIC-TYPES.EXAMPLES-QUANTS.01) | (assertEqualToResult (any-to-radians (degree-producer-1))) | ((* (degree-producer-1) 0.017453292519943295) (degree-producer-1)) | ((* (degree-producer-1) (/ pi 180)) (degree-producer-1)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19](https://logicmoo.org/public/mettareports/_417972.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19) | (assertEqualToResult (dup 2)) | (102 102 102 102 102 102 102 102 102 12 12) | (12 102) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.05](https://logicmoo.org/public/mettareports/_418302.metta.html#INFERENCE-CONTROL.INF-CTL-XP.05) | (assertEqual (bc depth-updater depth-updater depth-terminator (fromNumber 3) (: $prf B))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05](https://logicmoo.org/public/mettareports/_418318.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05) | (assertEqualToResult (match &self (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06](https://logicmoo.org/public/mettareports/_418470.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06) | (assertEqual (get-type (dropN (ConsN "1" NilN)))) | ((VecN String 0)) | ((VecN String 0)) | | PASS | [NARS-V0.TESTS5.01](https://logicmoo.org/public/mettareports/_418894.metta.html#NARS-V0.TESTS5.01) | (assertEqualToResult (AddBeliefEvent ((((sheep --> ([(see) ])) &/ (^ count)) =/> (sheep --> ([(counted) ]))) (1.0 0.9)))) | () | () | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.05](https://logicmoo.org/public/mettareports/_419226.metta.html#METTA-MORPH-TESTS.STATES-SPACES.05) | (assertEqualToResult (remove-atom &WU a)) | () | (()) | | PASS | [NARS-V0.TESTS0.04](https://logicmoo.org/public/mettareports/_419252.metta.html#NARS-V0.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_419310.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01](https://logicmoo.org/public/mettareports/_419566.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01) | (assertEqualToResult (match &self (implies (Frog Sam) $what) $what)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.21](https://logicmoo.org/public/mettareports/_419638.metta.html#ITERATIVE-CHAINING.IFC-XP.21) | (assertEqual (ic_bare_collapse A kb_bare rb_bare Z Z)) | (kb_bare) | (kb_bare) | | PASS | [METTA-MORPH-TESTS.TYPES2.01](https://logicmoo.org/public/mettareports/_419686.metta.html#METTA-MORPH-TESTS.TYPES2.01) | (assertEqualToResult (get-type lion1)) | (Lion) | (Lion) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.06](https://logicmoo.org/public/mettareports/_420084.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.06) | (assertEqualToResult (range 2 6)) | ((2 3 4 5)) | ((2 3 4 5)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13](https://logicmoo.org/public/mettareports/_420550.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13) | (assertEqual ((lambda ($x $y) (+ $x $y)) (2 7))) | (9) | (9) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01](https://logicmoo.org/public/mettareports/_420812.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01) | (assertEqualToResult (add-atom &kb (SS-P_AS A_AS B_AS))) | () | (()) | | FAIL | [EXAMPLES.BENCHMARK.01](https://logicmoo.org/public/mettareports/_421016.metta.html#EXAMPLES.BENCHMARK.01) | (assertEqualToResult ((hylo mapExpr evalExpr nTimes) (, 3 ((hylo mapNat identity peano) 10)))) | ((evalExpr (mapExpr (hylo mapExpr evalExpr nTimes) (nTimes (S ((hylo mapNat identity peano) (- 10 1)... | (((hylo mapExpr evalExpr nTimes) (, 3 ((hylo mapNat identity peano) 10)))) | | PASS | [METTA-MORPH-TESTS.MINNARS.01](https://logicmoo.org/public/mettareports/_421228.metta.html#METTA-MORPH-TESTS.MINNARS.01) | (assertEqualToResult (Question ((Sentence (((ExtSet garfield) --> cat) (1.0 0.9)) (1)) (Sentence (((cat x sky) --> like) (1.0 0.9)) (2)) (Sentence ((sky --> (IntSet blue)) (1.0 0.9)) (3)) (Sentence ((... | (((1.0 0.37946790052053214) (2 1 3 4))) | (((1.0 0.37946790052053214) (2 1 3 4))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01](https://logicmoo.org/public/mettareports/_42126.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (inactive) | | PASS | [BASIC.HYPERPOSING-SHARED.04](https://logicmoo.org/public/mettareports/_42134.metta.html#BASIC.HYPERPOSING-SHARED.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [BASIC.HYPERPOSING-UNSHARED.04](https://logicmoo.org/public/mettareports/_42134.metta.html#BASIC.HYPERPOSING-UNSHARED.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [HOL.NATPARITYTEST.07](https://logicmoo.org/public/mettareports/_421370.metta.html#HOL.NATPARITYTEST.07) | (assertEqualToResult (add-atom &kb (: MkΣ (-> (: $p (-> (: $_ $a) Type)) (-> (: $x $a) (-> (: $prf ($p $x)) (Σ $a $p))))))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02](https://logicmoo.org/public/mettareports/_421912.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02) | (assertEqualToResult (nop (change-state! (status (Goal lunch-order)) active))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01](https://logicmoo.org/public/mettareports/_422910.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01) | (assertEqualToResult (get-type &self)) | (hyperon::space::DynSpace) | (hyperon::space::DynSpace) | | FAIL | [COMMON.NUMTEST.09](https://logicmoo.org/public/mettareports/_422946.metta.html#COMMON.NUMTEST.09) | (assertEqual (synthesize (: $proof (⍃ (fromNumber 1) (fromNumber 3))) kb rb (S Z))) | () | ((: (SuccMonotonicity ZeroLTSucc) (⍃ (fromNumber 1) (fromNumber 3)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01](https://logicmoo.org/public/mettareports/_423252.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01) | (assertEqual (match &self (= (color) $x) $x)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02](https://logicmoo.org/public/mettareports/_423254.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02) | (assertEqualToResult (add-atom &kb (SS-Q_AS A_AS C_AS))) | () | (()) | | PASS | [HOL.NATTEST~OLD.01](https://logicmoo.org/public/mettareports/_423386.metta.html#HOL.NATTEST~OLD.01) | (assertEqualToResult (synthesize (: $proof (=== (plus Z $y) $y)) kb rb Z)) | ((: Base_plus (=== (plus Z $_391812) $_391812))) | ((: Base_plus (=== (plus Z $_391812) $_391812))) | | PASS | [COMMON.LISTTEST.05](https://logicmoo.org/public/mettareports/_424308.metta.html#COMMON.LISTTEST.05) | (assertEqualToResult (== (Cons 1 Nil) (Cons 1 Nil))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01](https://logicmoo.org/public/mettareports/_424406.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01) | (assertEqualToResult (match &self (:= (S K K x) $r) $r)) | ((K x (K x))) | ((K x (K x))) | | PASS | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/_424508.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | (1764 1764) | (1764) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04](https://logicmoo.org/public/mettareports/_424544.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04) | (assertEqual (((curry +) 2) 3)) | (5) | (5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10](https://logicmoo.org/public/mettareports/_424750.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10) | (assertEqualToResult (eq Z (S Z))) | ((eq Z (S Z))) | ((eq Z (S Z))) | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://logicmoo.org/public/mettareports/_425096.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($A mortal) (mortal $A))))) | ((mortal man)) | ((mortal man)) | | PASS | [POLYWARD-CHAINING.PC-XP.07](https://logicmoo.org/public/mettareports/_425250.metta.html#POLYWARD-CHAINING.PC-XP.07) | (assertEqual (bc (: $prf A) Z)) | ((: a A)) | ((: a A)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://logicmoo.org/public/mettareports/_425268.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case belief1 ((%void% 42)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03](https://logicmoo.org/public/mettareports/_425310.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03) | (assertEqual (Add (S Z) Z)) | ((S Z)) | ((S Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02](https://logicmoo.org/public/mettareports/_427330.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02) | (assertEqualToResult (nop (change-state! (status (Goal lunch-order)) active))) | () | (()) | | PASS | [METTA-MORPH-TESTS.TYPES3.01](https://logicmoo.org/public/mettareports/_427340.metta.html#METTA-MORPH-TESTS.TYPES3.01) | (assertEqualToResult (match &self (GreaterThan $x $y) (If (and (== (get-type $x) Number) (== (get-type $y) Number)) (If (EqualOrGreater $x $y) yay)))) | (yay) | (yay) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01](https://logicmoo.org/public/mettareports/_427406.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01) | (assertEqualToResult (Frog Sam)) | ((Frog Sam)) | ((Frog Sam)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://logicmoo.org/public/mettareports/_427518.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | PASS | [CURRENT.TESTS2.07](https://logicmoo.org/public/mettareports/_427626.metta.html#CURRENT.TESTS2.07) | (assertEqualToResult (AddBeliefEvent ((^ left) (1.0 0.9)))) | () | () | | PASS | [NARS-V0.TESTS2.07](https://logicmoo.org/public/mettareports/_427632.metta.html#NARS-V0.TESTS2.07) | (assertEqualToResult (AddBeliefEvent ((^ left) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04](https://logicmoo.org/public/mettareports/_427664.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) $r)) | ((Add (S (S Z)) Z)) | ((Add (S (S Z)) Z)) | | PASS | [NARS-V0.TESTS3.01](https://logicmoo.org/public/mettareports/_427934.metta.html#NARS-V0.TESTS3.01) | (assertEqualToResult (AddBeliefEvent (((corridorIn &/ (^ forward)) =/> doorAt) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03](https://logicmoo.org/public/mettareports/_428252.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03) | (assertEqual (Add (S Z) Z)) | ((S Z)) | ((S Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23](https://logicmoo.org/public/mettareports/_428358.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23) | (assertEqual (eqa (Add Z Z) (Add Z Z))) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.01](https://logicmoo.org/public/mettareports/_428364.metta.html#METTA-MORPH-TESTS.STATES-SPACES.01) | (assertEqualToResult (get-state &FIFO)) | (45) | (45) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23](https://logicmoo.org/public/mettareports/_428372.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23) | (assertEqual (eqa (Add Z Z) (Add Z Z))) | (T) | (T) | | PASS | [ITERATIVE-CHAINING.IFC-XP.10](https://logicmoo.org/public/mettareports/_4284.metta.html#ITERATIVE-CHAINING.IFC-XP.10) | (assertEqualToResult (get-atoms &space-test)) | (A) | (A) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01](https://logicmoo.org/public/mettareports/_428652.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01) | (assertEqual (match &self (= (color) $x) $x)) | (green yellow red) | (red yellow green) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_428762.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18](https://logicmoo.org/public/mettareports/_428874.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18) | (assertEqual (match &self (Green $who) (Green $who))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18](https://logicmoo.org/public/mettareports/_428888.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18) | (assertEqual (match &self (Green $who) (Green $who))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05](https://logicmoo.org/public/mettareports/_429020.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05) | (assertEqualToResult (match &self (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10](https://logicmoo.org/public/mettareports/_429158.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10) | (assertEqual (get-type (LeftP 5))) | ((EitherP Number)) | ((EitherP Number)) | | PASS | [CURRENT.TESTS2.01](https://logicmoo.org/public/mettareports/_429172.metta.html#CURRENT.TESTS2.01) | (assertEqualToResult (AddBeliefEvent (ballleft (1.0 0.9)))) | () | () | | PASS | [NARS-V0.TESTS2.01](https://logicmoo.org/public/mettareports/_429178.metta.html#NARS-V0.TESTS2.01) | (assertEqualToResult (AddBeliefEvent (ballleft (1.0 0.9)))) | () | () | | PASS | [BASIC.HYPERPOSING.01](https://logicmoo.org/public/mettareports/_429308.metta.html#BASIC.HYPERPOSING.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [BASIC.CML-UNSHARED.01](https://logicmoo.org/public/mettareports/_429354.metta.html#BASIC.CML-UNSHARED.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01](https://logicmoo.org/public/mettareports/_430198.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01) | (assertEqualToResult (get-type &self)) | (hyperon::space::DynSpace) | (hyperon::space::DynSpace) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07](https://logicmoo.org/public/mettareports/_430364.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07) | (assertEqualToResult (dropN NilN)) | ((dropN NilN)) | ((dropN NilN)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03](https://logicmoo.org/public/mettareports/_430422.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03) | (assertEqual (insert 2 (insert 1 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09](https://logicmoo.org/public/mettareports/_430734.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09) | (assertEqualToResult (nop (change-state! &state-token (C D)))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.03](https://logicmoo.org/public/mettareports/_430750.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.03) | (assertEqual ((superpose (1 2 3)))) | ((1) (2) (3)) | ((1) (2) (3)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_431198.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [RESOLVE.R.01](https://logicmoo.org/public/mettareports/_431206.metta.html#RESOLVE.R.01) | (assertEqualToResult (extend-py! resolve)) | () | () | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_431212.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-516-REDDUCED.02](https://logicmoo.org/public/mettareports/_431532.metta.html#DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-516-REDDUCED.02) | (assertEqualToResult (foo (R Z) $a)) | ((R $_394594)) | ((R $_394594)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03](https://logicmoo.org/public/mettareports/_431758.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03) | (assertEqual (Add (S Z) (S Z))) | ((S (S Z))) | ((S (S Z))) | | PASS | [SQL-SPACE.SQL-SPACE-TEST.01](https://logicmoo.org/public/mettareports/_43186.metta.html#SQL-SPACE.SQL-SPACE-TEST.01) | (assertEqualToResult (extend-py! sql_space)) | () | () | | FAIL | [DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-516.01](https://logicmoo.org/public/mettareports/_431940.metta.html#DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-516.01) | (assertEqualToResult (, (Debruijn2var (Inheritance (VarIdx Z) human) (Cons $Xvar (Cons $Yvar Nil))) (Debruijn2var (Inheritance (VarIdx Z) man) (Cons $Xvar (Cons $Yvar Nil))))) | ((Inheritance $_429634 (empty))) | ((, (Inheritance $_43494 human) (Inheritance $_43494 man))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://logicmoo.org/public/mettareports/_432080.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01](https://logicmoo.org/public/mettareports/_432414.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01) | (assertEqualToResult (get-type &self)) | (hyperon::space::DynSpace) | (hyperon::space::DynSpace) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16](https://logicmoo.org/public/mettareports/_432598.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16) | (assertEqualToResult (dup 2)) | (102 102 102 102 12) | (12 102) | | FAIL | [EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.01](https://logicmoo.org/public/mettareports/_432614.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.01) | (assertEqualToResult (record synthesize ((: $term $type) Z))) | ((⊷ synthesize ((: $_430284 $_430290) Z) (synthesize (: $_430284 $_430290) Z))) | ((: f (-> Number String)) (: g (-> String Bool)) (: h (-> Bool Number))) | | PASS | [BASIC.HYPERPOSING-SHARED.01](https://logicmoo.org/public/mettareports/_432656.metta.html#BASIC.HYPERPOSING-SHARED.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [CURRENT.TESTS0.06](https://logicmoo.org/public/mettareports/_432998.metta.html#CURRENT.TESTS0.06) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04](https://logicmoo.org/public/mettareports/_433068.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) $r)) | ((Add (S (S Z)) Z)) | ((Add (S (S Z)) Z)) | | FAIL | [EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.04](https://logicmoo.org/public/mettareports/_433100.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.04) | (assertEqualToResult (record synthesize ((: $term (-> Number Bool)) (S Z)))) | ((⊷ synthesize ((: $_430758 (-> Number Bool)) (S Z)) (synthesize (: $_430758 (-> Number Bool)) (S ... | ((: (. g f) (-> Number Bool))) | | PASS | [METTA-MORPH-TESTS.TESTS0.02](https://logicmoo.org/public/mettareports/_433340.metta.html#METTA-MORPH-TESTS.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04](https://logicmoo.org/public/mettareports/_433348.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04) | (assertEqualToResult (get-type (+ 5 "4"))) | (Number) | () | | PASS | [BASIC.HYPERPOSING-UNSHARED.01](https://logicmoo.org/public/mettareports/_433676.metta.html#BASIC.HYPERPOSING-UNSHARED.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [ITERATIVE-CHAINING.IBC-XP.05](https://logicmoo.org/public/mettareports/_433682.metta.html#ITERATIVE-CHAINING.IBC-XP.05) | (assertEqualToResult (add-atom &kb (: Deduction (-> (→ $q $r) (-> (→ $p $q) (→ $p $r)))))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09](https://logicmoo.org/public/mettareports/_433806.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09) | (assertEqualToResult (rev A (superpose (B C D)))) | ((B A) (C A) (D A)) | ((B A) (C A) (D A)) | | FAIL | [DEPENDENT-TYPES.MODUSPONENSDTLTEST.01](https://logicmoo.org/public/mettareports/_433916.metta.html#DEPENDENT-TYPES.MODUSPONENSDTLTEST.01) | (assertEqualToResult =====) | (=====) | ("===== Test synthesizer ====") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/_434134.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_427998)) | ((State (A B) $_427998)) | | FAIL | [NEW.TESTS4.05](https://logicmoo.org/public/mettareports/_434196.metta.html#NEW.TESTS4.05) | (assertEqual (EternalQuestion ({(garfield) } --> artist))) | ((Event (None (0.5 0.0)) (eternal Nil 0.0))) | ((Event (({(garfield) } --> artist) (1.0 0.27508280575237937)) (eternal (4 3 2 1.0) (0 0.0)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01](https://logicmoo.org/public/mettareports/_434690.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01) | (assertEqualToResult (Frog Sam)) | ((Frog Sam)) | ((Frog Sam)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.04](https://logicmoo.org/public/mettareports/_434758.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.04) | (assertEqualToResult (range 1 1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://logicmoo.org/public/mettareports/_435054.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [CURRENT.TESTS0.01](https://logicmoo.org/public/mettareports/_435342.metta.html#CURRENT.TESTS0.01) | (assertEqual (TupleCount (get-atoms &belief_events))) | (0) | (0) | | PASS | [PREV.TESTS0.06](https://logicmoo.org/public/mettareports/_435420.metta.html#PREV.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A | B) --> cat) (1.0... | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | PASS | [METTA-MORPH-TESTS.TESTS0.06](https://logicmoo.org/public/mettareports/_435450.metta.html#METTA-MORPH-TESTS.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A | B) --> cat) (1.0... | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | FAIL | [SOME.UNIT-TEST.08](https://logicmoo.org/public/mettareports/_43558.metta.html#SOME.UNIT-TEST.08) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04](https://logicmoo.org/public/mettareports/_43560.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04) | (assertEqualToResult (match &kb ($prop is-a Color) (match &self ($obj is $prop) $obj))) | (Ball) | (Ball) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.03](https://logicmoo.org/public/mettareports/_435714.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.03) | (assertEqualToResult (superpose ((superpose (a b c)) (superpose (x y z))))) | (a b c x y z) | (a b c x y z) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02](https://logicmoo.org/public/mettareports/_436018.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02) | (assertEqualToResult (match &self (implies ($P $x) (Green Sam)) ($x might be $P))) | ((Sam might be Frog)) | ((Sam might be Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01](https://logicmoo.org/public/mettareports/_436300.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01) | (assertEqualToResult (match &kb (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_436304.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_436310.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | FAIL | [CURRIED-CHAINING.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_436334.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | FAIL | [SOME.UNIT-TEST.09](https://logicmoo.org/public/mettareports/_43636.metta.html#SOME.UNIT-TEST.09) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_436400.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | FAIL | [CURRIED-CHAINING.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_436534.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | FAIL | [CURRIED-CHAINING.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_436594.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01](https://logicmoo.org/public/mettareports/_436812.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01](https://logicmoo.org/public/mettareports/_436906.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01) | (assertEqualToResult (Frog Sam)) | ((Frog Sam)) | ((Frog Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03](https://logicmoo.org/public/mettareports/_437176.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03) | (assertEqual (Add (S Z) (S Z))) | ((S (S Z))) | ((S (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07](https://logicmoo.org/public/mettareports/_437298.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07) | (assertEqualToResult (Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07](https://logicmoo.org/public/mettareports/_437310.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07) | (assertEqualToResult (Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/_437648.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/_437676.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | (T) | (T) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.12](https://logicmoo.org/public/mettareports/_437850.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.12) | (assertEqualToResult (collapse (superpose ((nop 1))))) | () | (()) | | PASS | [BACKWARD-CHAINING.BC-XP.27](https://logicmoo.org/public/mettareports/_438188.metta.html#BACKWARD-CHAINING.BC-XP.27) | (assertEqualToResult (add-atom &kb_em (→ B C))) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.27](https://logicmoo.org/public/mettareports/_438244.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.27) | (assertEqualToResult (add-atom &kb_em (→ B C))) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04](https://logicmoo.org/public/mettareports/_438776.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04) | (assertEqualToResult (get-type (+ 5 "4"))) | (Number) | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.14](https://logicmoo.org/public/mettareports/_438850.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.14) | (assertEqualToResult (match &self ($Rel A $X) ($Rel A $X))) | ((Rel-P A B) (Rel-Q A C)) | ((Rel-P A B) (Rel-Q A C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09](https://logicmoo.org/public/mettareports/_438870.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09) | (assertEqualToResult (rev A (superpose (B C D)))) | ((B A) (C A) (D A)) | ((B A) (C A) (D A)) | | PASS | [NEW.TESTS2.03](https://logicmoo.org/public/mettareports/_438988.metta.html#NEW.TESTS2.03) | (assertEqualToResult (AddBeliefEvent (ballhit (1.0 0.9)))) | () | () | | PASS | [POSSIBLY-WRONG.TOO-EAGER-MATH.03](https://logicmoo.org/public/mettareports/_43914.metta.html#POSSIBLY-WRONG.TOO-EAGER-MATH.03) | (assertEqualToResult (plus-got 1 (plus 2 2))) | ((+ 1 (plus 2 2)) (got 1 (plus 2 2))) | ((+ 1 (plus 2 2)) (got 1 (plus 2 2))) | | PASS | [ITERATIVE-CHAINING.IBC-XP.27](https://logicmoo.org/public/mettareports/_439388.metta.html#ITERATIVE-CHAINING.IBC-XP.27) | (assertEqual (isyn (: $prf C) (fromNumber 2) (fromNumber 1))) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C)) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/_439534.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_433398)) | ((State (A B) $_433398)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04](https://logicmoo.org/public/mettareports/_439674.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04) | (assertEqual (get-type (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04](https://logicmoo.org/public/mettareports/_439688.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04) | (assertEqual (get-type (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | (Type) | (Type) | | FAIL | [NARS-V0.TESTS1.03](https://logicmoo.org/public/mettareports/_440436.metta.html#NARS-V0.TESTS1.03) | (assertEqual (EternalQuestion (({(garfield) } * ([(blue) ])) --> like))) | ((Event (None (0.5 0.0)) (eternal Nil 0.0))) | ((Event ((({(garfield) } * ([(blue) ])) --> like) (1.0 0.2965825874694874)) (eternal (Cons 2 (Cons 1 (Cons 3 Nil))) 0.643288027761712))) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.12](https://logicmoo.org/public/mettareports/_440444.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.12) | (assertEqualToResult (collapse (superpose ((nop 1))))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.12](https://logicmoo.org/public/mettareports/_440458.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.12) | (assertEqualToResult (collapse (superpose ((nop 1))))) | () | (()) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_440460.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07](https://logicmoo.org/public/mettareports/_44062.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07) | (assertEqualToResult (get-type (= SocratesIsHuman PlatoIsHuman))) | (Type) | () | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.06](https://logicmoo.org/public/mettareports/_44078.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.06) | (assertEqualToResult (range 2 6)) | ((2 3 4 5)) | ((2 3 4 5)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10](https://logicmoo.org/public/mettareports/_440866.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10) | (assertEqualToResult (== 2 3)) | (False) | (False) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-XP.01](https://logicmoo.org/public/mettareports/_440916.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-XP.01) | (assertEqualToResult (bc depth-updater depth-updater depth-terminator (fromNumber 2) (: $prf (≼ Jan Jan)))) | ((: Refl (≼ Jan Jan)) (: JPA (≼ Jan Jan))) | ((: JPA (≼ Jan Jan)) (: Refl (≼ Jan Jan))) | | PASS | [METTA-MORPH-TESTS.TYPES2.02](https://logicmoo.org/public/mettareports/_440948.metta.html#METTA-MORPH-TESTS.TYPES2.02) | (assertEqualToResult (reproduce lion1 lion2)) | (childlion) | (childlion) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11](https://logicmoo.org/public/mettareports/_441126.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11) | (assertEqual &m) | (&m) | ((: g (-> Number Numer))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://logicmoo.org/public/mettareports/_441574.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://logicmoo.org/public/mettareports/_441642.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01](https://logicmoo.org/public/mettareports/_441700.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01) | (assertEqualToResult (match &kb (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15](https://logicmoo.org/public/mettareports/_441712.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15) | (assertEqual (fmap (curry-a + 2) (Something 5))) | ((Something 7)) | ((Something 7)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01](https://logicmoo.org/public/mettareports/_442268.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01) | (assertEqualToResult (match &self (($x leaf2) leaf3) $x)) | (leaf1 (leaf0 leaf1)) | (leaf1 (leaf0 leaf1)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01](https://logicmoo.org/public/mettareports/_442490.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01) | (assertEqual (green Fritz)) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/_442736.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | ((= (Mortal Plato) T)) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/_443194.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | ((= (Mortal Socrates) T)) | (T) | | PASS | [HOL.NATPARITYTEST.11](https://logicmoo.org/public/mettareports/_443220.metta.html#HOL.NATPARITYTEST.11) | (assertEqualToResult (add-atom &kb (: Replace (-> (: $prf1 (=== $x $x')) (-> (: $prf2 $x) $x'))))) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/_443222.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | ((= (Mortal Socrates) T)) | (T) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://logicmoo.org/public/mettareports/_443394.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [METTA-MORPH-TESTS.TYPES2.03](https://logicmoo.org/public/mettareports/_443618.metta.html#METTA-MORPH-TESTS.TYPES2.03) | (assertEqualToResult (get-type Lion)) | (Cat) | (Cat) | | FAIL | [DEPENDENT-TYPES.MINERCURRIEDDTLTEST.01](https://logicmoo.org/public/mettareports/_443762.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTLTEST.01) | (assertEqualToResult (let* (($aptrn (Inheritance (VarIdx Z) (VarIdx (S Z)))) ($depth (fromNumber 8))) (fc (: (supportwitness $aptrn) (supportOf $aptrn (countNat $aptrn))) $depth))) | ((fc (: (supportwitness (Inheritance (VarIdx Z) (VarIdx (S Z)))) (supportOf (Inheritance (VarIdx Z) ... | ((fc (: (supportwitness (Inheritance (VarIdx Z) (VarIdx (S Z)))) (supportOf (Inheritance (VarIdx Z) (VarIdx (S Z))) (countNat (Inheritance (VarIdx Z) (VarIdx (S Z)))))) (fromNumber 8))) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.06](https://logicmoo.org/public/mettareports/_443820.metta.html#METTA-MORPH-TESTS.STATES-SPACES.06) | (assertEqual (match &WU $1 $1)) | (b) | (b) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01](https://logicmoo.org/public/mettareports/_44390.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (inactive) | | PASS | [NEW.TESTS0.02](https://logicmoo.org/public/mettareports/_444002.metta.html#NEW.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.01](https://logicmoo.org/public/mettareports/_444220.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.01) | (assertEqualToResult (TupleConcat (a b c) (e f g))) | ((a b c e f g)) | ((a b c e f g)) | | FAIL | [EQUAL.DEDUCTIONEQUALTEST.01](https://logicmoo.org/public/mettareports/_444236.metta.html#EQUAL.DEDUCTIONEQUALTEST.01) | (assertEqualToResult (, (≞ P (STV 1 0.1)) (≞ Q (STV 1 0.1)) (≞ R (STV 1 0.1)) (≞ (→ P Q) (STV 1 0.5)) (≞ (→ Q R) (STV 1 0.5)))) | ((≞ (→ Q R) (STV 1 0.5))) | ((≞ (→ P R) (deduction-formula ((STV 1 0.1) (STV 1 0.1) (STV 1 0.1) (STV 1 0.5) (STV 1 0.5))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07](https://logicmoo.org/public/mettareports/_444410.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07) | (assertEqualToResult (> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05](https://logicmoo.org/public/mettareports/_444410.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05) | (assertEqual (get-type (= (Mortal Socrates) (Mortal Plato)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05](https://logicmoo.org/public/mettareports/_444536.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05) | (assertEqualToResult (match &self (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05](https://logicmoo.org/public/mettareports/_444550.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05) | (assertEqualToResult (match &self (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01](https://logicmoo.org/public/mettareports/_444558.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01) | (assertEqual (TV (And (PA) (PB)))) | ((stv 0.3 0.8)) | ((stv 0.3 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01](https://logicmoo.org/public/mettareports/_444622.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01) | (assertEqual (get-type 5)) | (Number) | (Number) | | FAIL | [NARS-V0.TESTS3.07](https://logicmoo.org/public/mettareports/_444862.metta.html#NARS-V0.TESTS3.07) | (assertEqual (AddGoalEvent (Outside (1.0 0.9)))) | () | ((^ open)) | | FAIL | [CURRIED-CHAINING.CURRIED-CHAINER.07](https://logicmoo.org/public/mettareports/_445020.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.07) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-XP.03](https://logicmoo.org/public/mettareports/_445102.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-XP.03) | (assertEqualToResult (bc depth-updater depth-updater depth-terminator (fromNumber 2) (: $prf (≼ Jan Feb)))) | ((: JF (≼ Jan Feb)) (: JPA (≼ Jan Feb))) | ((: JF (≼ Jan Feb)) (: JPA (≼ Jan Feb))) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.03](https://logicmoo.org/public/mettareports/_445202.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.03) | (assertEqualToResult (superpose ((superpose (a b c)) (superpose (x y z))))) | (a b c x y z) | (a b c x y z) | | FAIL | [HOL.NATSTANDALONETEST.13](https://logicmoo.org/public/mettareports/_445328.metta.html#HOL.NATSTANDALONETEST.13) | (assertEqualToResult (bc (: $prf (-> (=== (plus $x Z) $x) (=== (plus (S $x) Z) (S $x)))) (fromNumber 3))) | () | ((: ((. (Trans plusRec)) Cong) (-> (=== (plus $_11422 Z) $_11422) (=== (plus (S $_11422) Z) (S $_11422)))) (let* (((: $_11578 (-> (=== (plus $_11422 Z) $_11422) (=== (S $_11422) (plus (S $_11422) Z)))) (bc (: $_11578 (-> (=== (plus $_11422 Z) $_11422) (=== (S $_11422) (plus (S $_11422) Z)))) (S (S Z))))) (: ((. Sym) $_11578) (-> (=== (plus $_11422 Z) $_11422) (=== (plus (S $_11422) Z) (S $_11422))))) (let* (((: $_11578 (-> (=== (plus $_11422 Z) $_11422) (plus Z (=== (plus (S $_11422) Z) (S $_11422))))) (bc (: $_11578 (-> (=== (plus $_11422 Z) $_11422) (plus Z (=== (plus (S $_11422) Z) (S $_11422))))) (S (S Z))))) (: ((. (Replace0 plusBase)) $_11578) (-> (=== (plus $_11422 Z) $_11422) (=== (plus (S $_11422) Z) (S $_11422))))) (let* (((: $_11578 (-> (=== (plus $_11422 Z) $_11422) (plusRightId (S $_11422)))) (bc (: $_11578 (-> (=== (plus $_11422 Z) $_11422) (plusRightId (S $_11422)))) (S (S Z))))) (: ((. (Replace0 plusRightIdProp)) $_11578) (-> (=== (plus $_11422 Z) $_11422) (=== (plus (S $_11422) Z) (S $_11422))))) (let* (((: $_11578 (=== (=== (plus $_11422 Z) $_11422) (=== (plus (S $_11422) Z) (S $_11422)))) (bc (: $_11578 (=== (=== (plus $_11422 Z) $_11422) (=== (plus (S $_11422) Z) (S $_11422)))) (S (S Z))))) (: (Replace0 $_11578) (-> (=== (plus $_11422 Z) $_11422) (=== (plus (S $_11422) Z) (S $_11422))))) (let* (((: $_11578 (=== (=== (plus (S $_11422) Z) (S $_11422)) (=== (plus $_11422 Z) $_11422))) (bc (: $_11578 (=== (=== (plus (S $_11422) Z) (S $_11422)) (=== (plus $_11422 Z) $_11422))) (S (S Z))))) (: (((. Replace0) Sym) $_11578) (-> (=== (plus $_11422 Z) $_11422) (=== (plus (S $_11422) Z) (S $_11422))))) (let* (((: $_11578 (plus Z (-> (=== (plus $_11408 Z) $_11408) (=== (plus (S $_11408) Z) (S $_11408))))) (bc (: $_11564 (plus Z (-> (=== (plus $_11408 Z) $_11408) (=== (plus (S $_11408) Z) (S $_11408))))) (S (S Z))))) (: ((Replace0 plusBase) $_11564) (-> (=== (plus $_11408 Z) $_11408) (=== (plus (S $_11408) Z) (S $_11408))))) (let* (((: $_11564 (plus Z (=== (=== (plus $_11408 Z) $_11408) (=== (plus (S $_11408) Z) (S $_11408))))) (bc (: $_11564 (plus Z (=== (=== (plus $_11408 Z) $_11408) (=== (plus (S $_11408) Z) (S $_11408))))) (S (S Z))))) (: (((. Replace0) (Replace0 plusBase)) $_11564) (-> (=== (plus $_11408 Z) $_11408) (=== (plus (S $_11408) Z) (S $_11408)))))) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.04](https://logicmoo.org/public/mettareports/_445338.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.04) | (assertEqualToResult (superpose ((superpose (a b c)) x y z))) | (a b c x y z) | (a b c x y z) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17](https://logicmoo.org/public/mettareports/_44598.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17) | (assertEqual (match &self (Green $who) $who)) | (Sam) | (Sam) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10](https://logicmoo.org/public/mettareports/_446186.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10) | (assertEqual ((curry-a is Socrates) Human)) | (True) | (True) | | PASS | [FORWARD-CHAINING.FC-XP.16](https://logicmoo.org/public/mettareports/_446320.metta.html#FORWARD-CHAINING.FC-XP.16) | (assertEqualToResult (add-atom &kb_bem A)) | () | (()) | | PASS | [ITERATIVE-CHAINING.IFC-XP.09](https://logicmoo.org/public/mettareports/_446376.metta.html#ITERATIVE-CHAINING.IFC-XP.09) | (assertEqualToResult (add-atom-nodup &space-test A)) | () | (()) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.16](https://logicmoo.org/public/mettareports/_446476.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.16) | (assertEqualToResult (add-atom &kb_bem A)) | () | (()) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.08](https://logicmoo.org/public/mettareports/_446484.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.08) | (assertEqual (:? (Human Plato))) | () | (Type) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-SUPERPOSE.02](https://logicmoo.org/public/mettareports/_446904.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-SUPERPOSE.02) | (assertEqualToResult (well-typed (. (superpose (f g)) (superpose (f g))))) | (True True True True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02](https://logicmoo.org/public/mettareports/_446986.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02) | (assertEqual (frog Sam)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://logicmoo.org/public/mettareports/_44702.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | PASS | [ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.01](https://logicmoo.org/public/mettareports/_447180.metta.html#ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.01) | (assertEqualToResult ("========== Test formula ==========")) | (("========== Test formula ==========")) | (("========== Test formula ==========")) | | FAIL | [DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-481.02](https://logicmoo.org/public/mettareports/_447182.metta.html#DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-481.02) | (assertEqualToResult (collapse (let $L (let $x (superpose $L) $x)))) | () | (((Error (superpose ) superpose expects single expression as an argument))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/_44726.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_2734 2))) | ((> 4 (+ $_2734 2))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24](https://logicmoo.org/public/mettareports/_447296.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24) | (assertEqualToResult (eqa Z (Add Z Z))) | (T) | ((eqa Z (Add Z Z))) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02](https://logicmoo.org/public/mettareports/_447640.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/_44786.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_2750 2))) | ((> 4 (+ $_2750 2))) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.08](https://logicmoo.org/public/mettareports/_447888.metta.html#INFERENCE-CONTROL.INF-CTL-XP.08) | (assertEqual (bc depth-updater depth-updater depth-terminator (fromNumber 4) (: $prf (→ A C)))) | ((: ((Deduction bc) ab) (→ A C))) | ((: ((Deduction bc) ab) (→ A C))) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.08](https://logicmoo.org/public/mettareports/_448218.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.08) | (assertEqualToResult (add-atom &kb (: AS (≼ Aug Sep)))) | (True) | (()) | | FAIL | [DISTRIBUTED-PROCESSING.CREATE-SERVER.03](https://logicmoo.org/public/mettareports/_448334.metta.html#DISTRIBUTED-PROCESSING.CREATE-SERVER.03) | (assertEqual (remote-eval 3023 (match &self B-Self :Pass))) | ((remote-eval 3023 :Pass)) | (:Pass) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05](https://logicmoo.org/public/mettareports/_448354.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05) | (assertEqual (get-type (= (Mortal Socrates) (Mortal Plato)))) | (Type) | (Type) | | PASS | [ITERATIVE-CHAINING.IBC-XP.20](https://logicmoo.org/public/mettareports/_44872.metta.html#ITERATIVE-CHAINING.IBC-XP.20) | (assertEqualToResult (add-atoms-nodup &space-test (A B C A))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02](https://logicmoo.org/public/mettareports/_448740.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02) | (assertEqualToResult (add-atom &kb (SS-Q_AS A_AS C_AS))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01](https://logicmoo.org/public/mettareports/_448962.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.09](https://logicmoo.org/public/mettareports/_449434.metta.html#TRUTHVALUE.TRUTHVALUETEST.09) | (assertEqual (inc-pos-count (STV 1 0))) | ((STV 1.0 0.5)) | ((STV 1 0.5)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01](https://logicmoo.org/public/mettareports/_449780.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01) | (assertEqual (green Fritz)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01](https://logicmoo.org/public/mettareports/_449790.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01) | (assertEqualToResult (match &self (:= (S K K x) $r) $r)) | ((K x (K x))) | ((K x (K x))) | | FAIL | [CURRENT.TESTS3.06](https://logicmoo.org/public/mettareports/_449848.metta.html#CURRENT.TESTS3.06) | (assertEqual (GoalCycle (get-state ¤tTime))) | ((BestDecision 8 Nil ((Event (corridorIn (1.0 0.9)) (4 (4) (4 1.0))) (Event (((doorAt &/ (^ open)) =... | ((^ forward)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04](https://logicmoo.org/public/mettareports/_450148.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04) | (assertEqual (((curry +) 2) 3)) | (5) | (5) | | PASS | [DEPENDENT-TYPES.MINERDTLTEST.02](https://logicmoo.org/public/mettareports/_450292.metta.html#DEPENDENT-TYPES.MINERDTLTEST.02) | (assertEqualToResult (add-atom &db (Inheritance C A))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01](https://logicmoo.org/public/mettareports/_450344.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01) | (assertEqualToResult (+ 2 (* 3 5.5))) | (18.5) | (18.5) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.14](https://logicmoo.org/public/mettareports/_450366.metta.html#INFERENCE-CONTROL.INF-CTL-XP.14) | (assertEqual (bc td-updater td-updater td-terminator (MkTD B (fromNumber 3)) (: $prf B))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.TYPES2.02](https://logicmoo.org/public/mettareports/_450454.metta.html#METTA-MORPH-TESTS.TYPES2.02) | (assertEqualToResult (reproduce lion1 lion2)) | (childlion) | (childlion) | | PASS | [METTA-MORPH-TESTS.TYPES2.02](https://logicmoo.org/public/mettareports/_450468.metta.html#METTA-MORPH-TESTS.TYPES2.02) | (assertEqualToResult (reproduce lion1 lion2)) | (childlion) | (childlion) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05](https://logicmoo.org/public/mettareports/_450538.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05) | (assertEqualToResult (match &self (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | FAIL | [POLYWARD-CHAINING.PC-XP.01](https://logicmoo.org/public/mettareports/_450624.metta.html#POLYWARD-CHAINING.PC-XP.01) | (assertEqualToResult ===) | (===) | ("=== Forward Revertant ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01](https://logicmoo.org/public/mettareports/_450788.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01) | (assertEqual (TV (And (PA) (PB)))) | ((stv 0.3 0.8)) | ((stv 0.3 0.8)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.08](https://logicmoo.org/public/mettareports/_450936.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.08) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://logicmoo.org/public/mettareports/_451682.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03](https://logicmoo.org/public/mettareports/_451704.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03) | (assertEqualToResult (get-type (HumansAreMortal (Human Socrates)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23](https://logicmoo.org/public/mettareports/_451732.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23) | (assertEqualToResult (let $t (gen 3) (if (== (subsum (:: 3 (:: 7 (:: 5 nil))) $t) 8) $t (superpose ())))) | ((:: 1 (:: 0 (:: 1 nil)))) | ((:: 1 (:: 0 (:: 1 nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01](https://logicmoo.org/public/mettareports/_451996.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01) | (assertEqual (green Fritz)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.TYPES3.01](https://logicmoo.org/public/mettareports/_452526.metta.html#METTA-MORPH-TESTS.TYPES3.01) | (assertEqualToResult (match &self (GreaterThan $x $y) (If (and (== (get-type $x) Number) (== (get-type $y) Number)) (If (EqualOrGreater $x $y) yay)))) | (yay) | (yay) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09](https://logicmoo.org/public/mettareports/_452556.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09) | (assertEqualToResult (nop (change-state! &state-token (C D)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01](https://logicmoo.org/public/mettareports/_452646.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://logicmoo.org/public/mettareports/_453002.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01](https://logicmoo.org/public/mettareports/_453014.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01) | (assertEqual (TV (And (PA) (PB)))) | ((stv 0.3 0.8)) | ((stv 0.3 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06](https://logicmoo.org/public/mettareports/_453028.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06) | (assertEqual (match &m (= (f 2) $x) $x)) | ((g 3)) | ((g 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12](https://logicmoo.org/public/mettareports/_453232.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12) | (assertEqual (get-type (Cons 5 (Cons 6 Nil)))) | ((List Number)) | ((List Number)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://logicmoo.org/public/mettareports/_453334.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $1 $1)) | (1) | (1) | | PASS | [PREV.TESTS0.04](https://logicmoo.org/public/mettareports/_453712.metta.html#PREV.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.01](https://logicmoo.org/public/mettareports/_453820.metta.html#METTA-MORPH-TESTS.STATES-SPACES.01) | (assertEqualToResult (get-state &FIFO)) | (45) | (45) | | PASS | [METTA-MORPH-TESTS.TESTS0.04](https://logicmoo.org/public/mettareports/_453842.metta.html#METTA-MORPH-TESTS.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.01](https://logicmoo.org/public/mettareports/_453880.metta.html#METTA-MORPH-TESTS.MATCH-VOID.01) | (assertEqualToResult (match &belief_events $1 $1)) | () | () | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://logicmoo.org/public/mettareports/_454230.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_454512.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.12](https://logicmoo.org/public/mettareports/_455300.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.12) | (assertEqualToResult (let (→ $x $y) (kb_eq) (fc_eq (→ $x $y) kb_eq (fromNumber 2)))) | ((→ A B) B C (→ B C)) | (B C (→ A B) (→ B C)) | | PASS | [LOCATED.LOCATED-TEST.01](https://logicmoo.org/public/mettareports/_455482.metta.html#LOCATED.LOCATED-TEST.01) | (assertEqualToResult (match &kb $x (add-atom &labelled-kb (: (WitnessOf $x) $x)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01](https://logicmoo.org/public/mettareports/_455748.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01) | (assertEqualToResult (+ 2 (* 3 5.5))) | (18.5) | (18.5) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05](https://logicmoo.org/public/mettareports/_455810.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05) | (assertEqual (superpose ((P_AS B_AS) (Q_AS C_AS)))) | ((P_AS B_AS) (Q_AS C_AS)) | ((P_AS B_AS) (Q_AS C_AS)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07](https://logicmoo.org/public/mettareports/_455866.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07) | (assertEqualToResult (dropN NilN)) | ((dropN NilN)) | ((dropN NilN)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-XP.04](https://logicmoo.org/public/mettareports/_45592.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-XP.04) | (assertEqualToResult (bc depth-updater depth-updater depth-terminator (fromNumber 3) (: $prf (≼ Jan Mar)))) | ((: JPA (≼ Jan Mar)) (: ((Trans JF) FM) (≼ Jan Mar)) (: ((Trans Refl) JPA) (≼ Jan Mar)) (: ((T... | ((: JPA (≼ Jan Mar)) (: ((Trans JF) FM) (≼ Jan Mar)) (: ((Trans JPA) FM) (≼ Jan Mar)) (: ((Trans JPA) JPA) (≼ Jan Mar)) (: ((Trans JPA) Refl) (≼ Jan Mar)) (: ((Trans Refl) JPA) (≼ Jan Mar))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12](https://logicmoo.org/public/mettareports/_456018.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12) | (assertEqual (get-type (Cons 5 (Cons 6 Nil)))) | ((List Number)) | ((List Number)) | | PASS | [METTA-MORPH-TESTS.TESTS0.05](https://logicmoo.org/public/mettareports/_456092.metta.html#METTA-MORPH-TESTS.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [FORWARD-CHAINING.FC-XP.04](https://logicmoo.org/public/mettareports/_456186.metta.html#FORWARD-CHAINING.FC-XP.04) | (assertEqualToResult (let (⊢ (→ $x $y)) (kb_entail) (fc_entail (⊢ (→ $x $y)) kb_entail rb_entail (fromNumber 2)))) | ((⊢ (→ A B)) (⊢ B) (⊢ C) (⊢ (→ B C))) | ((⊢ B) (⊢ C) (⊢ (→ A B)) (⊢ (→ B C))) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.04](https://logicmoo.org/public/mettareports/_456192.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.04) | (assertEqualToResult (let (⊢ (→ $x $y)) (kb_entail) (fc_entail (⊢ (→ $x $y)) kb_entail rb_entail (fromNumber 2)))) | ((⊢ (→ A B)) (⊢ B) (⊢ C) (⊢ (→ B C))) | ((⊢ B) (⊢ C) (⊢ (→ A B)) (⊢ (→ B C))) | | PASS | [METTA-MORPH-TESTS.NALIFIER.01](https://logicmoo.org/public/mettareports/_456234.metta.html#METTA-MORPH-TESTS.NALIFIER.01) | (assertEqualToResult (let ($S $EV) (choiceQuery (((ExtSet sam) --> duck) ((ExtSet sam) --> swan) ((ExtSet sam) --> dog))) $S)) | ((((ExtSet sam) --> duck) (1.0 0.6183206106870229))) | ((((ExtSet sam) --> duck) (1.0 0.618320610687023))) | | PASS | [COMMON.LISTTEST.06](https://logicmoo.org/public/mettareports/_456262.metta.html#COMMON.LISTTEST.06) | (assertEqualToResult ("============ Test sort ============")) | (("============ Test sort ============")) | (("============ Test sort ============")) | | PASS | [ITERATIVE-CHAINING.IFC-XP.26](https://logicmoo.org/public/mettareports/_456310.metta.html#ITERATIVE-CHAINING.IFC-XP.26) | (assertEqualToResult ((ic_bare_collapse A kb_bare rb_bare (fromNumber 1) (fromNumber 2)))) | ((→ A B) (→ B C) A C) | (A C (→ A B) (→ B C) ((let* (($_414238 (superpose ())) ($_414292 (lambda0 $_414238)) ($_414356 (superpose ((lambda0 B) $_414292)))) (ic_bare_collapse $_414238 $_414356 rb_bare (S Z) Z)))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03](https://logicmoo.org/public/mettareports/_456348.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (active) | | PASS | [COMMON.LISTTEST.12](https://logicmoo.org/public/mettareports/_456352.metta.html#COMMON.LISTTEST.12) | (assertEqualToResult (elem 5 (Cons 3 (Cons 1 (Cons 2 Nil))))) | (False) | (False) | | FAIL | [BASIC.STATE-TYPES.02](https://logicmoo.org/public/mettareports/_456434.metta.html#BASIC.STATE-TYPES.02) | (assertEqualToResult ("(get-type A-first)=" (get-type (get-state &a-first)))) | (("(get-type A-first)=" ABType)) | (("(get-type A-first)=" Symbol)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03](https://logicmoo.org/public/mettareports/_45684.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01](https://logicmoo.org/public/mettareports/_457080.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01) | (assertEqualToResult (match &self (:= (S K K x) $r) $r)) | ((K x (K x))) | ((K x (K x))) | | FAIL | [POLYWARD-CHAINING.PC-XP.15](https://logicmoo.org/public/mettareports/_457082.metta.html#POLYWARD-CHAINING.PC-XP.15) | (assertEqualToResult (frc (: a A) (fromNumber 2))) | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deducti... | ((: a A) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deduction ab bc) a) C) (match GroundingSpace-0x564e226e3458 (: $_308604 (-> $_308642 C $_308672)) (let (: $_308726 $_308642) (bc (: $_308726 $_308642) Z) (frc (: ($_308604 $_308726 (ModusPonens (Deduction ab bc) a)) $_308672) Z)))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11](https://logicmoo.org/public/mettareports/_457164.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11) | (assertEqual &m) | (&m) | ((: g (-> Number Numer))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://logicmoo.org/public/mettareports/_457356.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20](https://logicmoo.org/public/mettareports/_457486.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20) | (assertEqualToResult (let $x (+ 2 3) (* $x $x))) | (25) | (25) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20](https://logicmoo.org/public/mettareports/_457500.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20) | (assertEqualToResult (let $x (+ 2 3) (* $x $x))) | (25) | (25) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.01](https://logicmoo.org/public/mettareports/_458010.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.01) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://logicmoo.org/public/mettareports/_458168.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04](https://logicmoo.org/public/mettareports/_458170.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04) | (assertEqual (((curry +) 2) 3)) | (5) | (5) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02](https://logicmoo.org/public/mettareports/_458228.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02) | (assertEqualToResult (add-atom &kb (SS-Q_AS A_AS C_AS))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://logicmoo.org/public/mettareports/_458716.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/_45908.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_2734 2))) | ((> 4 (+ $_2734 2))) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://logicmoo.org/public/mettareports/_459106.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &belief_events $1 $1) ((%void% 42)))) | () | () | | PASS | [HOL.NATTEST.05](https://logicmoo.org/public/mettareports/_459156.metta.html#HOL.NATTEST.05) | (assertEqualToResult (synthesize (: $prf (-> (ZRID_plus $x) (ZRID_plus (S $x)))) kb rb Z)) | ((: IndZRID_plus (-> (ZRID_plus $_427682) (ZRID_plus (S $_427682))))) | ((: IndZRID_plus (-> (ZRID_plus $_427682) (ZRID_plus (S $_427682))))) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.03](https://logicmoo.org/public/mettareports/_459170.metta.html#INFERENCE-CONTROL.INF-CTL-XP.03) | (assertEqual (bc depth-updater depth-updater depth-terminator (fromNumber 2) (: $prfabs (-> $pq (-> $p B))))) | ((: ModusPonens (-> (→ $_456038 B) (-> $_456038 B)))) | ((: ModusPonens (-> (→ $_456038 B) (-> $_456038 B)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01](https://logicmoo.org/public/mettareports/_459296.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01) | (assertEqualToResult (match &self (:= (S K K x) $r) $r)) | ((K x (K x))) | ((K x (K x))) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.24](https://logicmoo.org/public/mettareports/_459380.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.24) | (assertEqualToResult (bc &ctl-depth-kb depth-updater depth-updater depth-continuor (fromNumber 1) (: $prf (Continue $query Z)))) | () | () | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.03](https://logicmoo.org/public/mettareports/_4596.metta.html#METTA-MORPH-TESTS.STATES-SPACES.03) | (assertEqualToResult (match &WU $1 $1)) | (a) | (a) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04](https://logicmoo.org/public/mettareports/_459768.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04) | (assertEqual (((curry +) 2) 3)) | (5) | (5) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/_459874.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_447244 (get-atoms &self) (get-type $_447244)))) | ((Symbol)) | | PASS | [FORWARD-CHAINING.FC-XP.20](https://logicmoo.org/public/mettareports/_460298.metta.html#FORWARD-CHAINING.FC-XP.20) | (assertEqualToResult (match &kb_bem (→ $x $y) (fc_bem (→ $x $y) (fromNumber 2)))) | ((→ A B) B C (→ B C)) | (B C (→ A B) (→ B C)) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_460582.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.20](https://logicmoo.org/public/mettareports/_460590.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.20) | (assertEqualToResult (match &kb_bem (→ $x $y) (fc_bem (→ $x $y) (fromNumber 2)))) | ((→ A B) B C (→ B C)) | (B C (→ A B) (→ B C)) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_460622.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.07](https://logicmoo.org/public/mettareports/_460776.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.07) | (assertEqual (:? (GreenAndCroaksIsFrog SamIsGreen SamCroaks))) | () | ((Frog Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://logicmoo.org/public/mettareports/_460852.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $r) $r)) | (x) | (x) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.02](https://logicmoo.org/public/mettareports/_461032.metta.html#METTA-MORPH-TESTS.STATES-SPACES.02) | (assertEqualToResult (add-atom &WU a)) | () | (()) | | PASS | [RESOLVE.R.02](https://logicmoo.org/public/mettareports/_461242.metta.html#RESOLVE.R.02) | (assertEqualToResult (extend-py! r)) | () | () | | PASS | [COMPILER.00A-LANG-COMPILED-CASE.02](https://logicmoo.org/public/mettareports/_461340.metta.html#COMPILER.00A-LANG-COMPILED-CASE.02) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02](https://logicmoo.org/public/mettareports/_461404.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02) | (assertEqualToResult (match &self (implies ($P $x) (Green Sam)) ($x might be $P))) | ((Sam might be Frog)) | ((Sam might be Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10](https://logicmoo.org/public/mettareports/_461500.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10) | (assertEqual (get-type (LeftP 5))) | ((EitherP Number)) | ((EitherP Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10](https://logicmoo.org/public/mettareports/_461528.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10) | (assertEqual (get-type (LeftP 5))) | ((EitherP Number)) | ((EitherP Number)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03](https://logicmoo.org/public/mettareports/_461766.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (active) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07](https://logicmoo.org/public/mettareports/_461826.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07) | (assertEqualToResult (dropN NilN)) | ((dropN NilN)) | ((dropN NilN)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01](https://logicmoo.org/public/mettareports/_461850.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01) | (assertEqual (S K K x)) | (x) | (x) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04](https://logicmoo.org/public/mettareports/_46196.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04) | (assertEqual (match &kb ($rel A_AS $x) ($rel $x))) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | | PASS | [METTA-MORPH-TESTS.TYPES3.01](https://logicmoo.org/public/mettareports/_462032.metta.html#METTA-MORPH-TESTS.TYPES3.01) | (assertEqualToResult (match &self (GreaterThan $x $y) (If (and (== (get-type $x) Number) (== (get-type $y) Number)) (If (EqualOrGreater $x $y) yay)))) | (yay) | (yay) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://logicmoo.org/public/mettareports/_462064.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10](https://logicmoo.org/public/mettareports/_462456.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10) | (assertEqual (get-type (LeftP 5))) | ((EitherP Number)) | ((EitherP Number)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://logicmoo.org/public/mettareports/_462492.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://logicmoo.org/public/mettareports/_462506.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | FAIL | [EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.11](https://logicmoo.org/public/mettareports/_462520.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.11) | (assertEqualToResult (record synthesize ((: (. g $f) (-> $in String)) (fromNumber 3)))) | ((⊷ synthesize ((: (. g $_460154) (-> $_460172 String)) (S (S (S Z)))) (synthesize (: (. g $_46015... | () | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.05](https://logicmoo.org/public/mettareports/_462548.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.05) | (assertEqualToResult (add-atom &kb (: MJ (≼ May Jun)))) | (True) | (()) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.01](https://logicmoo.org/public/mettareports/_463336.metta.html#METTA-MORPH-TESTS.STATES-SPACES.01) | (assertEqualToResult (get-state &FIFO)) | (45) | (45) | | FAIL | [NEW.TESTS1.02](https://logicmoo.org/public/mettareports/_463494.metta.html#NEW.TESTS1.02) | (assertEqual (TupleCount (get-atoms &belief_events))) | (2) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07](https://logicmoo.org/public/mettareports/_463944.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07) | (assertEqualToResult (dropN NilN)) | ((dropN NilN)) | ((dropN NilN)) | | FAIL | [EXAMPLES.EXPRESSION.01](https://logicmoo.org/public/mettareports/_464456.metta.html#EXAMPLES.EXPRESSION.01) | (assertEqualToResult ((cata mapExpr evalExpr) (Fix (Plus (Fix (Plus (Fix (Var X)) (Fix (Const 2)))) (Fix (Const 40)))))) | (42) | ((evalExpr (mapExpr (cata mapExpr evalExpr) (unFix (Fix (Plus (Fix (Plus (Fix (Var X)) (Fix (Const 2)))) (Fix (Const 40)))))))) | | PASS | [HOL.NATSTANDALONETEST.05](https://logicmoo.org/public/mettareports/_464618.metta.html#HOL.NATSTANDALONETEST.05) | (assertEqualToResult (add-atom &kb (: NatInd (-> ($p Z) (-> (-> ($p $x) ($p (S $x))) ($p $x')))))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04](https://logicmoo.org/public/mettareports/_46462.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) $r)) | ((Add (S (S Z)) Z)) | ((Add (S (S Z)) Z)) | | FAIL | [ITERATIVE-CHAINING.IBC-XP.29](https://logicmoo.org/public/mettareports/_464748.metta.html#ITERATIVE-CHAINING.IBC-XP.29) | (assertEqualToResult (isyn (: $prf (-> (→ $q $r) (-> (→ $p $q) (-> $p $r)))) (fromNumber 4) (fromNumber 1))) | () | ((: ((. (. ModusPonens)) Deduction) (-> (→ $_91404 $_91426) (-> (→ $_91480 $_91404) (-> $_91480 $_91426)))) (: ((((. .) .) ModusPonens) Deduction) (-> (→ $_91404 $_91426) (-> (→ $_91480 $_91404) (-> $_91480 $_91426))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22](https://logicmoo.org/public/mettareports/_465506.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22) | (assertEqualToResult (fact 5)) | (120) | (120) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24](https://logicmoo.org/public/mettareports/_465522.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24) | (assertEqualToResult (eqa Z (Add Z Z))) | (T) | ((eqa Z (Add Z Z))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24](https://logicmoo.org/public/mettareports/_465536.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24) | (assertEqualToResult (eqa Z (Add Z Z))) | (T) | ((eqa Z (Add Z Z))) | | PASS | [NEW.TESTS5.04](https://logicmoo.org/public/mettareports/_465688.metta.html#NEW.TESTS5.04) | (assertEqualToResult (BeliefCycle (get-state ¤tTime))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07](https://logicmoo.org/public/mettareports/_465826.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07) | (assertEqualToResult (pair (bin) (bin))) | ((A A) (A B) (B A) (B B)) | ((A A) (A B) (B A) (B B)) | | PASS | [COMPARISONS.ADD-ATOM-NAIVE-FIB.04](https://logicmoo.org/public/mettareports/_465838.metta.html#COMPARISONS.ADD-ATOM-NAIVE-FIB.04) | (assertEqualToResult (match &other (= (fib 3) $code) $code)) | ((+ (fib 2) (fib 1))) | ((+ (fib 2) (fib 1))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05](https://logicmoo.org/public/mettareports/_466558.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) (match &self (:= $r $r2) $r2))) | ((S (S Z))) | ((S (S Z))) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/_466568.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [ITERATIVE-CHAINING.IBC-XP.31](https://logicmoo.org/public/mettareports/_46656.metta.html#ITERATIVE-CHAINING.IBC-XP.31) | (assertEqualToResult (add-atom &kb (: de (→ D E)))) | () | (()) | | PASS | [ITERATIVE-CHAINING.IFC-XP.24](https://logicmoo.org/public/mettareports/_466716.metta.html#ITERATIVE-CHAINING.IFC-XP.24) | (assertEqualToResult ((ic_bare_collapse A kb_bare rb_bare (fromNumber 1) (fromNumber 1)))) | ((→ A B) (→ B C) A B) | (A B (→ A B) (→ B C)) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_466780.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_466782.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/_466876.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06](https://logicmoo.org/public/mettareports/_466894.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06) | (assertEqual (match &m (= (f 2) $x) $x)) | ((g 3)) | ((g 3)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://logicmoo.org/public/mettareports/_466956.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21](https://logicmoo.org/public/mettareports/_46758.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21) | (assertEqual (let (S (S $r)) (Add (S Z) (S Z)) $r)) | (Z) | (Z) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/_467674.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01](https://logicmoo.org/public/mettareports/_467740.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01) | (assertEqualToResult (match &self (($x leaf2) leaf3) $x)) | (leaf1 (leaf0 leaf1)) | (leaf1 (leaf0 leaf1)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.10](https://logicmoo.org/public/mettareports/_467958.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.10) | (assertEqualToResult (add-atom &kb (: ON (≼ Oct Nov)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20](https://logicmoo.org/public/mettareports/_46816.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20) | (assertEqualToResult (get-type (fmap (curry-a + 2) (Left "5")))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02](https://logicmoo.org/public/mettareports/_468692.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02) | (assertEqualToResult (match &self (implies ($P $x) (Green Sam)) ($x might be $P))) | ((Sam might be Frog)) | ((Sam might be Frog)) | | PASS | [METTA-MORPH-TESTS.TYPES2.03](https://logicmoo.org/public/mettareports/_469004.metta.html#METTA-MORPH-TESTS.TYPES2.03) | (assertEqualToResult (get-type Lion)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://logicmoo.org/public/mettareports/_469252.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://logicmoo.org/public/mettareports/_469268.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.01](https://logicmoo.org/public/mettareports/_469694.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.01) | (assertEqualToResult (TupleConcat (a b c) (e f g))) | ((a b c e f g)) | ((a b c e f g)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.07](https://logicmoo.org/public/mettareports/_469956.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.07) | (assertEqualToResult (add-atom &kb (: JA (≼ Jul Aug)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01](https://logicmoo.org/public/mettareports/_470088.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01) | (assertEqual (get-type 5)) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05](https://logicmoo.org/public/mettareports/_470120.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05) | (assertEqual (get-type (curry-a + 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [BASIC.STATE-TYPES.17](https://logicmoo.org/public/mettareports/_470126.metta.html#BASIC.STATE-TYPES.17) | (assertEqualToResult ("(get-type (isLeft (Right 5)))=" (get-type (isLeft (Right 5))))) | (("(get-type (isLeft (Right 5)))=" Bool)) | (("(get-type (isLeft (Right 5)))=" Bool)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05](https://logicmoo.org/public/mettareports/_470134.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05) | (assertEqual (get-type (curry-a + 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02](https://logicmoo.org/public/mettareports/_470180.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02) | (assertEqualToResult (match &self ($p is-a Color) $p)) | () | () | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04](https://logicmoo.org/public/mettareports/_470180.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04) | (assertEqual (insert 1 (insert 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | FAIL | [ITERATIVE-CHAINING.IBC-XP.13](https://logicmoo.org/public/mettareports/_470228.metta.html#ITERATIVE-CHAINING.IBC-XP.13) | (assertEqualToResult (syn (: $prf C) (fromNumber 4))) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C) (: ((ModusPonens ((Deduction bc) ab)) a) C)) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C) (: ((ModusPonens ((Deduction bc) ab)) a) C) (: (((. (ModusPonens bc)) (ModusPonens ab)) a) C) (: ((((. ModusPonens) (Deduction bc)) ab) a) C)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05](https://logicmoo.org/public/mettareports/_470500.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05) | (assertEqualToResult (get-type (+ -))) | (Number) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03](https://logicmoo.org/public/mettareports/_47052.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03) | (assertEqualToResult (% 21 17)) | (4) | (4) | | PASS | [POLYWARD-CHAINING.PC-XP.08](https://logicmoo.org/public/mettareports/_470708.metta.html#POLYWARD-CHAINING.PC-XP.08) | (assertEqual (bc (: $prf (→ A B)) Z)) | ((: ab (→ A B))) | ((: ab (→ A B))) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.04](https://logicmoo.org/public/mettareports/_470738.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.04) | (assertEqualToResult (superpose ((superpose (a b c)) x y z))) | (a b c x y z) | (a b c x y z) | | FAIL | [CURRENT.TESTS4.05](https://logicmoo.org/public/mettareports/_470800.metta.html#CURRENT.TESTS4.05) | (assertEqual (EternalQuestion ({(garfield) } --> artist))) | ((Event (None (0.5 0.0)) (eternal Nil 0.0))) | ((Event (({(garfield) } --> artist) (1.0 0.27508280575237937)) (eternal (4 3 2 1.0) (0 0.0)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02](https://logicmoo.org/public/mettareports/_470906.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02) | (assertEqualToResult (match &self (implies ($P $x) (Green Sam)) ($x might be $P))) | ((Sam might be Frog)) | ((Sam might be Frog)) | | PASS | [BASIC.KEY-LOOKUPS-MANY.01](https://logicmoo.org/public/mettareports/_471242.metta.html#BASIC.KEY-LOOKUPS-MANY.01) | (assertEqual (let $v (new-state v-0) (match &data (= (get-data $k) $v) $k))) | (k-0) | (k-0) | | PASS | [DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-492.01](https://logicmoo.org/public/mettareports/_471262.metta.html#DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-492.01) | (assertEqualToResult (let $res (and (memb $X (Cons 1 (Cons 2 Nil))) (memb $X (Cons 2 (Cons 3 Nil)))) (if $res $X None))) | (2 None) | (2 None) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.04](https://logicmoo.org/public/mettareports/_471362.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.04) | (assertEqual (case (+ 1 5) ((5 Error) (6 OK) (6 Error)))) | (OK) | (OK) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/_471572.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/_471574.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/_471588.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | (T) | (T) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.04](https://logicmoo.org/public/mettareports/_471744.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.04) | (assertEqualToResult (add-atom &kb (: AM (≼ Apr May)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05](https://logicmoo.org/public/mettareports/_471962.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) (match &self (:= $r $r2) $r2))) | ((S (S Z))) | ((S (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07](https://logicmoo.org/public/mettareports/_471998.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07) | (assertEqualToResult (> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02](https://logicmoo.org/public/mettareports/_472392.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02) | (assertEqual (frog Sam)) | (T) | (T) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_472712.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02](https://logicmoo.org/public/mettareports/_472920.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://logicmoo.org/public/mettareports/_472946.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03](https://logicmoo.org/public/mettareports/_473510.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03) | (assertEqual (get-type (new-state 2))) | ((MonadicState Number)) | ((StateMonad Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02](https://logicmoo.org/public/mettareports/_473674.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02) | (assertEqual (collapse (match &self (= (shape) $x) $x))) | () | () | | PASS | [METTA-MORPH-TESTS.TYPES2.04](https://logicmoo.org/public/mettareports/_474096.metta.html#METTA-MORPH-TESTS.TYPES2.04) | (assertEqualToResult (match &self (: Lion $1) $1)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://logicmoo.org/public/mettareports/_474142.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://logicmoo.org/public/mettareports/_474214.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://logicmoo.org/public/mettareports/_474228.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/_474596.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | ((= (Mortal Plato) T)) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/_474624.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | ((= (Mortal Plato) T)) | () | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_474640.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19](https://logicmoo.org/public/mettareports/_474682.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19) | (assertEqual (let $r (Add (S Z) Z) (match &self (= (eq $r (S Z)) $tv) $tv))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19](https://logicmoo.org/public/mettareports/_474696.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19) | (assertEqual (let $r (Add (S Z) Z) (match &self (= (eq $r (S Z)) $tv) $tv))) | (T) | (T) | | PASS | [NEW.TESTS3.02](https://logicmoo.org/public/mettareports/_474908.metta.html#NEW.TESTS3.02) | (assertEqualToResult (AddBeliefEvent (((windowAt &/ (^ open)) =/> Outside) (1.0 0.9)))) | () | () | | PASS | [CURRENT.TESTS3.02](https://logicmoo.org/public/mettareports/_474912.metta.html#CURRENT.TESTS3.02) | (assertEqualToResult (AddBeliefEvent (((windowAt &/ (^ open)) =/> Outside) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01](https://logicmoo.org/public/mettareports/_475026.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01) | (assertEqualToResult (match &self (($x leaf2) leaf3) $x)) | (leaf1 (leaf0 leaf1)) | (leaf1 (leaf0 leaf1)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07](https://logicmoo.org/public/mettareports/_475042.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07) | (assertEqualToResult (> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07](https://logicmoo.org/public/mettareports/_475056.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07) | (assertEqualToResult (> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02](https://logicmoo.org/public/mettareports/_475080.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02) | (assertEqual (get-type (drop (Cons 1 Nil)))) | ((Vec Number Z)) | ((Vec Number Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04](https://logicmoo.org/public/mettareports/_47510.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04) | (assertEqualToResult (match &kb ($prop is-a Color) (match &self ($obj is $prop) $obj))) | (Ball) | (Ball) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02](https://logicmoo.org/public/mettareports/_475566.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02) | (assertEqualToResult (match &self ($p is-a Color) $p)) | () | () | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.01](https://logicmoo.org/public/mettareports/_475572.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.01) | (assertEqualToResult ("Unit Tests")) | (("Unit Tests")) | (("Unit Tests")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09](https://logicmoo.org/public/mettareports/_475708.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09) | (assertEqualToResult (nop (change-state! &state-token (C D)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09](https://logicmoo.org/public/mettareports/_475722.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09) | (assertEqualToResult (nop (change-state! &state-token (C D)))) | () | (()) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_475876.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05](https://logicmoo.org/public/mettareports/_475928.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05) | (assertEqualToResult (get-type (+ -))) | (Number) | () | | PASS | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.05](https://logicmoo.org/public/mettareports/_476116.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.05) | (assertEqualToResult (recursive_prf)) | ((recursive_prf)) | ((recursive_prf)) | | PASS | [EXPERIMENTS.UNIFY-VIA-LET.07](https://logicmoo.org/public/mettareports/_476260.metta.html#EXPERIMENTS.UNIFY-VIA-LET.07) | (assertEqualToResult (let* (($z (g $y)) ($z (f $x))) $z)) | ((Link A B)) | ((Link A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04](https://logicmoo.org/public/mettareports/_476356.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04) | (assertEqual (Something? (Add (S Z) (S Z)))) | ((Something? (S (S Z)))) | ((Something? (S (S Z)))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://logicmoo.org/public/mettareports/_47636.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | ((= (Human Sam) T)) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://logicmoo.org/public/mettareports/_47648.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | ((= (Human Sam) T)) | () | | PASS | [BASIC.STATE-TYPES.10](https://logicmoo.org/public/mettareports/_476700.metta.html#BASIC.STATE-TYPES.10) | (assertEqualToResult ("(get-type False-first)=" (get-type (get-state &false-first)))) | (("(get-type False-first)=" Bool)) | (("(get-type False-first)=" Bool)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.15](https://logicmoo.org/public/mettareports/_476762.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.15) | (assertEqualToResult (superpose ((Rel-P B) (Rel-Q C)))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [BASIC.HYPERPOSING.02](https://logicmoo.org/public/mettareports/_476822.metta.html#BASIC.HYPERPOSING.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [BASIC.CML-UNSHARED.02](https://logicmoo.org/public/mettareports/_476868.metta.html#BASIC.CML-UNSHARED.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01](https://logicmoo.org/public/mettareports/_477242.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01) | (assertEqualToResult (match &self (($x leaf2) leaf3) $x)) | (leaf1 (leaf0 leaf1)) | (leaf1 (leaf0 leaf1)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01](https://logicmoo.org/public/mettareports/_477382.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01) | (assertEqual (get-type 5)) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07](https://logicmoo.org/public/mettareports/_477502.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07) | (assertEqualToResult (> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07](https://logicmoo.org/public/mettareports/_477516.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07) | (assertEqualToResult (> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09](https://logicmoo.org/public/mettareports/_477574.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09) | (assertEqualToResult (nop (change-state! &state-token (C D)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://logicmoo.org/public/mettareports/_477898.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://logicmoo.org/public/mettareports/_477912.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [COMMON.ORDEREDSETTEST.10](https://logicmoo.org/public/mettareports/_478118.metta.html#COMMON.ORDEREDSETTEST.10) | (assertEqual (insert 2 (insert 3 (insert 2 (insert 1 ∅))))) | ((:: 1 (:: 2 (:: 3 ∅)))) | ((:: 1 (:: 2 (:: 3 ∅)))) | | PASS | [POSSIBLY-WRONG.TOO-EAGER-MATH.02](https://logicmoo.org/public/mettareports/_478214.metta.html#POSSIBLY-WRONG.TOO-EAGER-MATH.02) | (assertEqualToResult (plus-got 1 (plus 2 2))) | ((+ 1 (plus 2 2)) (got 1 (plus 2 2))) | ((+ 1 (plus 2 2)) (got 1 (plus 2 2))) | | PASS | [NEW.TESTS2.04](https://logicmoo.org/public/mettareports/_47842.metta.html#NEW.TESTS2.04) | (assertEqualToResult (AddBeliefEvent (ballleft (1.0 0.9)))) | () | () | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_478456.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.04) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [METTA-MORPH-TESTS.TYPES2.03](https://logicmoo.org/public/mettareports/_478510.metta.html#METTA-MORPH-TESTS.TYPES2.03) | (assertEqualToResult (get-type Lion)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.TYPES2.03](https://logicmoo.org/public/mettareports/_478524.metta.html#METTA-MORPH-TESTS.TYPES2.03) | (assertEqualToResult (get-type Lion)) | (Cat) | (Cat) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22](https://logicmoo.org/public/mettareports/_478700.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC (Null) 5)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://logicmoo.org/public/mettareports/_478846.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $1 $1)) | (1) | (1) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03](https://logicmoo.org/public/mettareports/_478896.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03) | (assertEqual (get-type (new-state 2))) | ((MonadicState Number)) | ((StateMonad Number)) | | FAIL | [ITERATIVE-CHAINING.IBC-XP.16](https://logicmoo.org/public/mettareports/_47898.metta.html#ITERATIVE-CHAINING.IBC-XP.16) | (assertEqualToResult Test) | (Test) | ("=== Test Utility Functions ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02](https://logicmoo.org/public/mettareports/_479074.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02) | (assertEqual (collapse (match &self (= (shape) $x) $x))) | () | () | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.01](https://logicmoo.org/public/mettareports/_479198.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.01) | (assertEqualToResult (TupleConcat (a b c) (e f g))) | ((a b c e f g)) | ((a b c e f g)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.13](https://logicmoo.org/public/mettareports/_479326.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.13) | (assertEqualToResult (add-atom &kb (: Trans (-> (≼ $x $y) (-> (≼ $y $z) (≼ $x $z)))))) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.01](https://logicmoo.org/public/mettareports/_479344.metta.html#METTA-MORPH-TESTS.MATCH-VOID.01) | (assertEqualToResult (match &belief_events $1 $1)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01](https://logicmoo.org/public/mettareports/_479588.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01) | (assertEqual (get-type 5)) | (Number) | (Number) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://logicmoo.org/public/mettareports/_479618.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02](https://logicmoo.org/public/mettareports/_479676.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02) | (assertEqual (frog Sam)) | (T) | (T) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.05](https://logicmoo.org/public/mettareports/_479846.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.05) | (assertEqualToResult (interleave (Cons 1 (Cons 2 Nil)) (Cons "a" (Cons "b" Nil)))) | ((Cons 1 (Cons "a" (Cons 2 (Cons "b" Nil))))) | ((Cons 1 (Cons "a" (Cons 2 (Cons "b" Nil))))) | | PASS | [COMPARISONS.NILS-IF-CONTROL-TEST-2.02](https://logicmoo.org/public/mettareports/_479888.metta.html#COMPARISONS.NILS-IF-CONTROL-TEST-2.02) | (assertEqualToResult (add-atom &kb (: AS (-> (: $g (-> (: $x $a) (-> (: $y $b) $c))) (-> (: $f (-> (: $x $a) $b)) (-> (: $x $a) $c)))))) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://logicmoo.org/public/mettareports/_480022.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $1 $1)) | (2) | (2) | | PASS | [BASIC.HYPERPOSING-SHARED.02](https://logicmoo.org/public/mettareports/_480178.metta.html#BASIC.HYPERPOSING-SHARED.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | FAIL | [PREV.TESTS3.06](https://logicmoo.org/public/mettareports/_480220.metta.html#PREV.TESTS3.06) | (assertEqual (GoalCycle (get-state ¤tTime))) | ((BestDecision 7 Nil (Cons (Event (corridorIn (1.0 0.9)) (4 (4) (4 1.0))) (Cons (Event (((doorAt &/ ... | ((^ forward)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.04](https://logicmoo.org/public/mettareports/_480226.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.04) | (assertEqualToResult (superpose ((superpose (a b c)) x y z))) | (a b c x y z) | (a b c x y z) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_480306.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02](https://logicmoo.org/public/mettareports/_480480.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02) | (assertEqual (get-type (drop (Cons 1 Nil)))) | ((Vec Number Z)) | ((Vec Number Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05](https://logicmoo.org/public/mettareports/_480870.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05) | (assertEqual (get-type (= (Mortal Socrates) (Mortal Plato)))) | (Type) | (Type) | | PASS | [FORWARD-CHAINING.FC-XP.30](https://logicmoo.org/public/mettareports/_480906.metta.html#FORWARD-CHAINING.FC-XP.30) | (assertEqualToResult (fc_dtl (: ab (→ A B)) kb_dtl rb_dtl (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | ((: ab (→ A B)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | FAIL | [SOME.UNIT-TEST.06](https://logicmoo.org/public/mettareports/_48090.metta.html#SOME.UNIT-TEST.06) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.30](https://logicmoo.org/public/mettareports/_480956.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.30) | (assertEqualToResult (fc_dtl (: ab (→ A B)) kb_dtl rb_dtl (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | ((: ab (→ A B)) (: (ModusPonens ab a) B) (: (ModusPonens bc (ModusPonens ab a)) C)) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_480980.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10](https://logicmoo.org/public/mettareports/_481178.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10) | (assertEqual (get-state (get-token))) | ((C D)) | ((C D)) | | PASS | [BASIC.HYPERPOSING-UNSHARED.02](https://logicmoo.org/public/mettareports/_481198.metta.html#BASIC.HYPERPOSING-UNSHARED.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://logicmoo.org/public/mettareports/_481610.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04](https://logicmoo.org/public/mettareports/_481774.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04) | (assertEqual (Something? (Add (S Z) (S Z)))) | ((Something? (S (S Z)))) | ((Something? (S (S Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02](https://logicmoo.org/public/mettareports/_481892.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02) | (assertEqual (frog Sam)) | (T) | (T) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01](https://logicmoo.org/public/mettareports/_482420.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01) | (assertEqual (Cons 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02](https://logicmoo.org/public/mettareports/_482424.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.MINNARS.01](https://logicmoo.org/public/mettareports/_482606.metta.html#METTA-MORPH-TESTS.MINNARS.01) | (assertEqualToResult (Question ((Sentence (((ExtSet garfield) --> cat) (1.0 0.9)) (1)) (Sentence (((cat x sky) --> like) (1.0 0.9)) (2)) (Sentence ((sky --> (IntSet blue)) (1.0 0.9)) (3)) (Sentence ((... | (((1.0 0.37946790052053214) (2 1 3 4))) | (((1.0 0.37946790052053214) (2 1 3 4))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01](https://logicmoo.org/public/mettareports/_48266.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01) | (assertEqual (get-type (Mortal Plato))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02](https://logicmoo.org/public/mettareports/_482742.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02) | (assertEqual (get-type (+ 5 7))) | (Number) | (Number) | | PASS | [BACKWARD-CHAINING.BC-XP.10](https://logicmoo.org/public/mettareports/_483348.metta.html#BACKWARD-CHAINING.BC-XP.10) | (assertEqual (bc_eq (→ A B) kb_eq (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.10](https://logicmoo.org/public/mettareports/_483372.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.10) | (assertEqual (bc_eq (→ A B) kb_eq (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.01](https://logicmoo.org/public/mettareports/_483478.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.01) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://logicmoo.org/public/mettareports/_483898.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://logicmoo.org/public/mettareports/_48394.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.01](https://logicmoo.org/public/mettareports/_484732.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.01) | (assertEqual (if (: (apply reverse "Hello") $t) $t)) | () | (String) | | PASS | [HOL.NATPARITYTEST.04](https://logicmoo.org/public/mettareports/_484782.metta.html#HOL.NATPARITYTEST.04) | (assertEqualToResult (add-atom &kb (: Even (-> (: $x Nat) Type)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25](https://logicmoo.org/public/mettareports/_484916.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25) | (assertEqual (eq Z (Add Z Z))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03](https://logicmoo.org/public/mettareports/_484970.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03) | (assertEqualToResult (match &self (:= (Green $who) T) ($who is really green))) | ((Sam is really green)) | ((Sam is really green)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.05](https://logicmoo.org/public/mettareports/_485152.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.05) | (assertEqualToResult (range 1 3)) | ((1 2)) | ((1 2)) | | FAIL | [DISTRIBUTED-PROCESSING.CREATE-SERVER.04](https://logicmoo.org/public/mettareports/_485176.metta.html#DISTRIBUTED-PROCESSING.CREATE-SERVER.04) | (assertEqual (remote-eval 3025 (match &self B-Share1 :Pass))) | ((remote-eval 3025 (match &self B-Share1 :Pass))) | (:Pass) | | PASS | [HOL.NATTEST.01](https://logicmoo.org/public/mettareports/_485220.metta.html#HOL.NATTEST.01) | (assertEqualToResult (synthesize (: $prf (=== (plus Z $y) $y)) kb rb Z)) | ((: Base_plus (=== (plus Z $_454082) $_454082))) | ((: Base_plus (=== (plus Z $_454082) $_454082))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/_485342.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_472712 (get-atoms &self) (get-type $_472712)))) | ((Symbol)) | | PASS | [JOHN-CARRY-FLOWER.JOHN-CARRY-FLOWER-TEST.04](https://logicmoo.org/public/mettareports/_485426.metta.html#JOHN-CARRY-FLOWER.JOHN-CARRY-FLOWER-TEST.04) | (assertEqualToResult (synthesize (: $proof (objectTransferred JohnsCarry JohnsFlower)) kb rb (fromNumber 4))) | ((: (ModusPonens (WitnessOf (⟹ (∧ (instance JohnsCarry Transfer) (objectTransferred JohnsCarry J... | ((: (ModusPonens (WitnessOf (⟹ (∧ (instance JohnsCarry Transfer) (objectTransferred JohnsCarry JohnsVase) (orientation JohnsFlower JohnsVase Inside)) (objectTransferred JohnsCarry JohnsFlower))) (TrinaryConjunctionIntroduction (ModusPonens (WitnessOf (⟹ (∧ (subclass Carrying Transfer) (instance JohnsCarry Carrying)) (instance JohnsCarry Transfer))) (BinaryConjunctionIntroduction (WitnessOf (subclass Carrying Transfer)) (WitnessOf (instance JohnsCarry Carrying)))) (WitnessOf (objectTransferred JohnsCarry JohnsVase)) (WitnessOf (orientation JohnsFlower JohnsVase Inside)))) (objectTransferred JohnsCarry JohnsFlower))) | | PASS | [DEPENDENT-TYPES.MINERDTLTEST.03](https://logicmoo.org/public/mettareports/_485728.metta.html#DEPENDENT-TYPES.MINERDTLTEST.03) | (assertEqualToResult (add-atom &db (Inheritance D E))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://logicmoo.org/public/mettareports/_486222.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $r) $r)) | (x) | (x) | | PASS | [COMMON.INTEST.01](https://logicmoo.org/public/mettareports/_486264.metta.html#COMMON.INTEST.01) | (assertEqual (synthesize (: $proof (∉ Z ∅)) kb rb Z)) | ((: NotInEmpty (∉ Z ∅))) | ((: NotInEmpty (∉ Z ∅))) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.02](https://logicmoo.org/public/mettareports/_486488.metta.html#METTA-MORPH-TESTS.STATES-SPACES.02) | (assertEqualToResult (add-atom &WU a)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12](https://logicmoo.org/public/mettareports/_486538.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12) | (assertEqual (== (let* (($x (collapse (get-atoms &m))) ($y (car-atom $x))) (get-type $y)) (get-type &self))) | (False) | (False) | | PASS | [COMMON.LISTTEST.13](https://logicmoo.org/public/mettareports/_486616.metta.html#COMMON.LISTTEST.13) | (assertEqualToResult ("============ Test uniq ============")) | (("============ Test uniq ============")) | (("============ Test uniq ============")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03](https://logicmoo.org/public/mettareports/_486630.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03) | (assertEqualToResult (get-type (HumansAreMortal (Human Socrates)))) | () | () | | FAIL | [HOL.NATDTLTEST.04](https://logicmoo.org/public/mettareports/_486698.metta.html#HOL.NATDTLTEST.04) | (assertEqualToResult (bc (: $prf (=== (=== ((plus Z) Z) Z) (plusRightId Z))) (fromNumber 2))) | () | ((bc (: $_392534 (=== (=== Z Z) (plusRightId Z))) (S (S Z)))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://logicmoo.org/public/mettareports/_487196.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.02](https://logicmoo.org/public/mettareports/_48722.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.02) | (assertEqualToResult (get-closed-proof (bc &ctl-depth-kb depth-updater depth-updater depth-terminator (fromNumber 1) (: $prf (Terminate (fromNumber 1)))))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01](https://logicmoo.org/public/mettareports/_487240.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01) | (assertEqual (S K K x)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03](https://logicmoo.org/public/mettareports/_487436.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03) | (assertEqualToResult (get-type (HumansAreMortal (Human Socrates)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16](https://logicmoo.org/public/mettareports/_487726.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16) | (assertEqualToResult (sqr 4)) | (16) | (16) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://logicmoo.org/public/mettareports/_488322.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $1 $1)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://logicmoo.org/public/mettareports/_488350.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $1 $1)) | (1) | (1) | | FAIL | [RESOLVE.R.03](https://logicmoo.org/public/mettareports/_488372.metta.html#RESOLVE.R.03) | (assertEqualToResult r) | (r) | (0x7f8972b1c950> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20](https://logicmoo.org/public/mettareports/_490064.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20) | (assertEqualToResult (get-type (fmap (curry-a + 2) (Left "5")))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03](https://logicmoo.org/public/mettareports/_490370.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03) | (assertEqualToResult (match &self (:= (Green $who) T) ($who is really green))) | ((Sam is really green)) | ((Sam is really green)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01](https://logicmoo.org/public/mettareports/_490708.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01) | (assertEqualToResult (ift (green $x) (add-atom &kb (Green $x)))) | () | (()) | | FAIL | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.12](https://logicmoo.org/public/mettareports/_490710.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.12) | (assertEqualToResult (synthesize (: $proof (⍃ (fromNumber 3) (fromNumber 7))) kb rb (fromNumber 3))) | () | ((: (SuccMonotonicity (SuccMonotonicity (SuccMonotonicity ZeroLTSucc))) (⍃ (S (S (S Z))) (S (S (S (S (S (S (S Z)))))))))) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.06](https://logicmoo.org/public/mettareports/_490768.metta.html#METTA-MORPH-TESTS.MATCH-VOID.06) | (assertEqualToResult (case (match &belief_events $1 $1) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05](https://logicmoo.org/public/mettareports/_49104.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05) | (assertEqualToResult (match &self (:= ($color $who) $tv) ('It's' $tv that $who is $color))) | (('It's' T that Sam is Green) ('It's' T that Tom is White) ('It's' F that Tom is Green)) | (('It's' F that Tom is Green) ('It's' T that Sam is Green) ('It's' T that Tom is White)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://logicmoo.org/public/mettareports/_491140.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | FAIL | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.13](https://logicmoo.org/public/mettareports/_491280.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.13) | (assertEqualToResult ===) | (===) | ("=== DTL ===") | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13](https://logicmoo.org/public/mettareports/_491430.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13) | (assertEqualToResult (get-type (Cons 5 (Cons "6" Nil)))) | ((List Number)) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12](https://logicmoo.org/public/mettareports/_491918.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12) | (assertEqual (== (let* (($x (collapse (get-atoms &m))) ($y (car-atom $x))) (get-type $y)) (get-type &self))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01](https://logicmoo.org/public/mettareports/_49192.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01) | (assertEqualToResult (match &kb (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://logicmoo.org/public/mettareports/_492078.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | ((= (Mortal Plato) T)) | (T) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://logicmoo.org/public/mettareports/_492244.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://logicmoo.org/public/mettareports/_49262.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/_492630.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_480000 (get-atoms &self) (get-type $_480000)))) | ((Symbol)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://logicmoo.org/public/mettareports/_492682.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://logicmoo.org/public/mettareports/_492710.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22](https://logicmoo.org/public/mettareports/_492712.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22) | (assertEqualToResult (fact 5)) | (120) | (120) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22](https://logicmoo.org/public/mettareports/_492718.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22) | (assertEqualToResult (fact 5)) | (120) | (120) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/_492864.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | FAIL | [EXPERIMENTS.UNIFY-VIA-CASE.02](https://logicmoo.org/public/mettareports/_49286.metta.html#EXPERIMENTS.UNIFY-VIA-CASE.02) | (assertEqualToResult (case (-> $x B) (((-> A $y) (-> $x $y))))) | ((-> $_47012 B)) | ((-> A B)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.01](https://logicmoo.org/public/mettareports/_492964.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.01) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [EXPERIMENTS.NON-DETERMINISM.01](https://logicmoo.org/public/mettareports/_492972.metta.html#EXPERIMENTS.NON-DETERMINISM.01) | (assertEqualToResult (foo 21)) | (42 441) | (42 441) | | PASS | [BACKWARD-CHAINING.BC-XP.39](https://logicmoo.org/public/mettareports/_493066.metta.html#BACKWARD-CHAINING.BC-XP.39) | (assertEqual (bc_dem (: $prf A) Z)) | ((: a A)) | ((: a A)) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.26](https://logicmoo.org/public/mettareports/_493100.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-CONT-XP.26) | (assertEqual (bc &kb depth-updater depth-updater depth-bc-continuor (fromNumber 2) (: $prf (≼ Feb Feb)))) | ((: Refl (≼ Feb Feb))) | ((: Refl (≼ Feb Feb))) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.39](https://logicmoo.org/public/mettareports/_493140.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.39) | (assertEqual (bc_dem (: $prf A) Z)) | ((: a A)) | ((: a A)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_493188.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.01) | (assertEqual (bc (: $_472212 A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | FAIL | [BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.11](https://logicmoo.org/public/mettareports/_493312.metta.html#BASIC.TEST-INFER-FUNCTION-APPLICATION-TYPE.11) | (assertEqual (:? (= (Human Socrates) (Human Plato)))) | () | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17](https://logicmoo.org/public/mettareports/_49340.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17) | (assertEqual (+ (superpose (1 2 3)) 1)) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17](https://logicmoo.org/public/mettareports/_49348.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17) | (assertEqual (+ (superpose (1 2 3)) 1)) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://logicmoo.org/public/mettareports/_493526.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $r) $r)) | (x) | (x) | | FAIL | [NARS-V0.TESTS3.05](https://logicmoo.org/public/mettareports/_493766.metta.html#NARS-V0.TESTS3.05) | (assertEqual (AddGoalEvent (Outside (1.0 0.9)))) | () | (None) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.06](https://logicmoo.org/public/mettareports/_494136.metta.html#FORMULA.DEDUCTIONFORMULATEST.06) | (assertEqualToResult (clamp 2 0 1)) | (1 1 1 1 1 1 1 1) | (1) | | PASS | [NEW.TESTS4.03](https://logicmoo.org/public/mettareports/_494482.metta.html#NEW.TESTS4.03) | (assertEqualToResult (AddBeliefEvent ((sky --> ([(blue) ])) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01](https://logicmoo.org/public/mettareports/_494526.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01) | (assertEqual (S K K x)) | (x) | (x) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_494658.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02](https://logicmoo.org/public/mettareports/_494818.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02) | (assertEqual (ift (green $x) $x)) | (Fritz) | (Fritz) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/_494860.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_482230 (get-atoms &self) (get-type $_482230)))) | ((Symbol)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26](https://logicmoo.org/public/mettareports/_495012.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03](https://logicmoo.org/public/mettareports/_495230.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03) | (assertEqualToResult (frog Fritz)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22](https://logicmoo.org/public/mettareports/_495310.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22) | (assertEqualToResult (fact 5)) | (120) | (120) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22](https://logicmoo.org/public/mettareports/_495324.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22) | (assertEqualToResult (fact 5)) | (120) | (120) | | PASS | [CURRENT.TESTS4.02](https://logicmoo.org/public/mettareports/_495420.metta.html#CURRENT.TESTS4.02) | (assertEqualToResult (AddBeliefEvent (((cat * sky) --> like) (1.0 0.9)))) | () | () | | PASS | [DEPENDENT-TYPES.SUPPORTRULEEXP.01](https://logicmoo.org/public/mettareports/_495432.metta.html#DEPENDENT-TYPES.SUPPORTRULEEXP.01) | (assertEqualToResult (add-atom &db (Inheritance Allen man))) | () | (()) | | PASS | [PREV.TESTS2.05](https://logicmoo.org/public/mettareports/_495508.metta.html#PREV.TESTS2.05) | (assertEqualToResult (AddBeliefEvent ((^ left) (1.0 0.9)))) | () | () | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.10](https://logicmoo.org/public/mettareports/_495634.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.10) | (assertEqualToResult (fc_eq A kb_eq (fromNumber 2))) | (A B C) | (A B C) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://logicmoo.org/public/mettareports/_495728.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $r) $r)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://logicmoo.org/public/mettareports/_495742.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $r) $r)) | (x) | (x) | | PASS | [NEW.TESTS5.05](https://logicmoo.org/public/mettareports/_495996.metta.html#NEW.TESTS5.05) | (assertEqualToResult ("sheep white")) | (("sheep white")) | (("sheep white")) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.02](https://logicmoo.org/public/mettareports/_496004.metta.html#METTA-MORPH-TESTS.STATES-SPACES.02) | (assertEqualToResult (add-atom &WU a)) | () | (()) | | FAIL | [JANUS.METTA-CALLS-PYTHON-IN-JANUS.01](https://logicmoo.org/public/mettareports/_496282.metta.html#JANUS.METTA-CALLS-PYTHON-IN-JANUS.01) | (assertEqual rand) | (rand) | (4) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.10](https://logicmoo.org/public/mettareports/_49642.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.10) | (assertEqualToResult (add-atom &kb (: ON (≼ Oct Nov)))) | (True) | (()) | | FAIL | [HYPERON-METTALOG-SANITY.00-LANG-CASE.13](https://logicmoo.org/public/mettareports/_49652.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.13) | (assertEqual (match &self $1 $1)) | ((Rel-P A B) (Rel-Q A C)) | ((= (Rel-P P P P) 10) (Rel-P A B) (Rel-Q A C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01](https://logicmoo.org/public/mettareports/_496734.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01) | (assertEqual (S K K x)) | (x) | (x) | | PASS | [COMMON.NUMTEST.05](https://logicmoo.org/public/mettareports/_497088.metta.html#COMMON.NUMTEST.05) | (assertEqual (approxEq 10 10.0001 0.001)) | (True True True True True True True True) | (True) | | FAIL | [PREV.TESTS1.02](https://logicmoo.org/public/mettareports/_497222.metta.html#PREV.TESTS1.02) | (assertEqual (TupleCount (get-atoms &belief_events))) | (2) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04](https://logicmoo.org/public/mettareports/_497242.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04) | (assertEqual (Add Z (S Z))) | ((S Z)) | ((S Z)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://logicmoo.org/public/mettareports/_498804.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06](https://logicmoo.org/public/mettareports/_498884.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06) | (assertEqual (case (match &kb ($rel B_AS $x) ($rel $x)) (((SS-P_AS $y) (P_AS $y)) ((SS-Q_AS $y) (Q_AS $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.04](https://logicmoo.org/public/mettareports/_498928.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.04) | (assertEqualToResult (let (⊢ (→ $x $y)) (kb_entail) (fc_entail (⊢ (→ $x $y)) kb_entail rb_entail (fromNumber 2)))) | ((⊢ (→ A B)) (⊢ B) (⊢ C) (⊢ (→ B C))) | ((⊢ B) (⊢ C) (⊢ (→ A B)) (⊢ (→ B C))) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.15](https://logicmoo.org/public/mettareports/_498928.metta.html#INFERENCE-CONTROL.INF-CTL-XP.15) | (assertEqual (bc td-updater td-updater td-terminator (MkTD C (fromNumber 4)) (: $prf C))) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C)) | ((: ((ModusPonens bc) ((ModusPonens ab) a)) C)) | | PASS | [PREV.TESTS4.04](https://logicmoo.org/public/mettareports/_498968.metta.html#PREV.TESTS4.04) | (assertEqualToResult (AddBeliefEvent (((({(garfield) } * ([(blue) ])) --> like) ==> ({(garfield) } --> artist)) (1.0 0.9)))) | () | () | | PASS | [METTA-MORPH-TESTS.TYPES2.04](https://logicmoo.org/public/mettareports/_499468.metta.html#METTA-MORPH-TESTS.TYPES2.04) | (assertEqualToResult (match &self (: Lion $1) $1)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.02](https://logicmoo.org/public/mettareports/_499678.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.02) | (assertEqualToResult (TupleConcat () (e f g))) | ((e f g)) | ((e f g)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07](https://logicmoo.org/public/mettareports/_500030.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07) | (assertEqualToResult (pair (bin) (bin))) | ((A A) (A B) (B A) (B B)) | ((A A) (A B) (B A) (B B)) | | FAIL | [DISTRIBUTED-PROCESSING.USE-TWO-SERVERS.01](https://logicmoo.org/public/mettareports/_50016.metta.html#DISTRIBUTED-PROCESSING.USE-TWO-SERVERS.01) | (assertEqualToResult (remote-eval "localhost:3021" (match &self (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop)))) | ((remote-eval "localhost:3021" (match &self (, ($_47638 is $_47650) ($_47650 is-a Color) ($_47638 is... | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04](https://logicmoo.org/public/mettareports/_500184.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04) | (assertEqual (Add Z (S Z))) | ((S Z)) | ((S Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02](https://logicmoo.org/public/mettareports/_500284.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02) | (assertEqualToResult (expression without known equalities)) | ((expression without known equalities)) | ((expression without known equalities)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16](https://logicmoo.org/public/mettareports/_500462.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16) | (assertEqual (Green $who)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://logicmoo.org/public/mettareports/_500650.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://logicmoo.org/public/mettareports/_500738.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [COMMON.ORDEREDSETTEST.09](https://logicmoo.org/public/mettareports/_50120.metta.html#COMMON.ORDEREDSETTEST.09) | (assertEqual (insert 3 (insert 2 (insert 1 ∅)))) | ((:: 1 (:: 2 (:: 3 ∅)))) | ((:: 1 (:: 2 (:: 3 ∅)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03](https://logicmoo.org/public/mettareports/_501312.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03) | (assertEqualToResult (match &self (:= (S K K x) $r) (match &self (:= $r $r2) $r2))) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07](https://logicmoo.org/public/mettareports/_501666.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07) | (assertEqualToResult (pair (bin) (bin))) | ((A A) (A B) (B A) (B B)) | ((A A) (A B) (B A) (B B)) | | PASS | [BASIC.STATE-TYPES.03](https://logicmoo.org/public/mettareports/_501726.metta.html#BASIC.STATE-TYPES.03) | (assertEqualToResult ("Change A-first into B")) | (("Change A-first into B")) | (("Change A-first into B")) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://logicmoo.org/public/mettareports/_501746.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [PREV.TESTS5.02](https://logicmoo.org/public/mettareports/_502270.metta.html#PREV.TESTS5.02) | (assertEqualToResult (BeliefCycle (get-state ¤tTime))) | () | () | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/_502360.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [HOL.NATDTLTEST.01](https://logicmoo.org/public/mettareports/_502664.metta.html#HOL.NATDTLTEST.01) | (assertEqualToResult (add-atom &kb (: Refl (=== $x $x)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06](https://logicmoo.org/public/mettareports/_502686.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06) | (assertEqual (match &m (= (f 2) $x) $x)) | ((g 3)) | ((g 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02](https://logicmoo.org/public/mettareports/_502868.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02) | (assertEqualToResult (- 8 (/ 4 6.4))) | (7.375) | (7.375) | | PASS | [NARS-V0.TESTS4.04](https://logicmoo.org/public/mettareports/_502932.metta.html#NARS-V0.TESTS4.04) | (assertEqualToResult (AddBeliefEvent (((({(garfield) } * ([(blue) ])) --> like) ==> ({(garfield) } --> artist)) (1.0 0.9)))) | () | () | | PASS | [EXTEND.EXAMPLE1.01](https://logicmoo.org/public/mettareports/_502996.metta.html#EXTEND.EXAMPLE1.01) | (assertEqualToResult (extend-py! mettamorph)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10](https://logicmoo.org/public/mettareports/_503000.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10) | (assertEqual (get-state (get-token))) | ((C D)) | ((C D)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25](https://logicmoo.org/public/mettareports/_503142.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25) | (assertEqual (eq Z (Add Z Z))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25](https://logicmoo.org/public/mettareports/_503156.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25) | (assertEqual (eq Z (Add Z Z))) | (T) | (T) | | FAIL | [EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.05](https://logicmoo.org/public/mettareports/_503338.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.05) | (assertEqualToResult (record synthesize ((: (. g f) (-> Number Bool)) (S Z)))) | ((⊷ synthesize ((: (. g f) (-> Number Bool)) (S Z)) (synthesize (: (. g f) (-> Number Bool)) (S Z)... | ((: (. g f) (-> Number Bool))) | | FAIL | [EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.02](https://logicmoo.org/public/mettareports/_503344.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.02) | (assertEqualToResult (record synthesize ((: $term (-> Number String)) Z))) | ((⊷ synthesize ((: $_501014 (-> Number String)) Z) (synthesize (: $_501014 (-> Number String)) Z))... | ((: f (-> Number String))) | | FAIL | [FORWARD-CHAINING.FC-XP.21](https://logicmoo.org/public/mettareports/_503560.metta.html#FORWARD-CHAINING.FC-XP.21) | (assertEqualToResult Bare) | (Bare) | ("=== Equality Match ===") | | FAIL | [FORWARD-CHAINER.FORWARD-CHAINER-XP.21](https://logicmoo.org/public/mettareports/_503864.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.21) | (assertEqualToResult Bare) | (Bare) | ("=== Equality Match ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11](https://logicmoo.org/public/mettareports/_504892.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11) | (assertEqual ((is-socrates) Human)) | (True) | (True) | | PASS | [METTA-MORPH-TESTS.TYPES2.05](https://logicmoo.org/public/mettareports/_505046.metta.html#METTA-MORPH-TESTS.TYPES2.05) | (assertEqualToResult (match &self (: reproduce $1) $1)) | ((-> Lion Lion Lion)) | ((-> Lion Lion Lion)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01](https://logicmoo.org/public/mettareports/_50516.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01) | (assertEqualToResult (+ 2 (* 3 5.5))) | (18.5) | (18.5) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.06](https://logicmoo.org/public/mettareports/_505420.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.06) | (assertEqualToResult (add-atom &kb (: JJ (≼ Jun Jul)))) | (True) | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://logicmoo.org/public/mettareports/_505534.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $1 $1)) | (2) | (2) | | PASS | [DEPENDENT-TYPES.MODUSPONENSDTLTEST.02](https://logicmoo.org/public/mettareports/_505546.metta.html#DEPENDENT-TYPES.MODUSPONENSDTLTEST.02) | (assertEqualToResult (synthesize (: $proof (≞ (big cow) (STV $s $c))) kb rb (fromNumber 0))) | ((: cow_is_big (≞ (big cow) (STV 0.99 0.99)))) | ((: cow_is_big (≞ (big cow) (STV 0.99 0.99)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06](https://logicmoo.org/public/mettareports/_505612.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06) | (assertEqual (match &m (= (f 2) $x) $x)) | ((g 3)) | ((g 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06](https://logicmoo.org/public/mettareports/_505626.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06) | (assertEqual (match &m (= (f 2) $x) $x)) | ((g 3)) | ((g 3)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03](https://logicmoo.org/public/mettareports/_5058.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03) | (assertEqualToResult (match &kb ($SS A_AS $X) ($SS A_AS $X))) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19](https://logicmoo.org/public/mettareports/_506486.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19) | (assertEqual (fmap (curry-a + 2) (UntypedC 5 (UntypedC 8 (Null))))) | ((UntypedC 7 (UntypedC 10 (Null)))) | ((UntypedC 7 (UntypedC 10 (Null)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19](https://logicmoo.org/public/mettareports/_506500.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19) | (assertEqual (fmap (curry-a + 2) (UntypedC 5 (UntypedC 8 (Null))))) | ((UntypedC 7 (UntypedC 10 (Null)))) | ((UntypedC 7 (UntypedC 10 (Null)))) | | PASS | [DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-481.03](https://logicmoo.org/public/mettareports/_506732.metta.html#DEBUGGING.HYPERON-EXPERIMENTAL-ISSUE-481.03) | (assertEqualToResult (collapse (let $L () (let $x (superpose $L) $x)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03](https://logicmoo.org/public/mettareports/_5068.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03) | (assertEqual (color)) | (green yellow red) | (red yellow green) | | PASS | [ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.02](https://logicmoo.org/public/mettareports/_506912.metta.html#ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.02) | (assertEqualToResult (idi_formula (Bl True) (Bl False) (STV 1 0))) | ((idi_formula (Bl True) (Bl False) (STV 1 0))) | ((idi_formula (Bl True) (Bl False) (STV 1 0))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03](https://logicmoo.org/public/mettareports/_506918.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03) | (assertEqualToResult (match &self (, (Frog $x) (implies (Frog $x) $y)) $y)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.06](https://logicmoo.org/public/mettareports/_506964.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.06) | (assertEqualToResult (fc_bare A kb_bare rb_bare (fromNumber 2))) | (A B C) | (A B C) | | PASS | [COMMON.LISTTEST.15](https://logicmoo.org/public/mettareports/_507010.metta.html#COMMON.LISTTEST.15) | (assertEqualToResult (uniq (Cons 2 (Cons 3 (Cons 3 (Cons 2 Nil)))))) | ((Cons 2 (Cons 3 Nil))) | ((Cons 2 (Cons 3 Nil))) | | PASS | [EXTEND.EXAMPLE4.01](https://logicmoo.org/public/mettareports/_50706.metta.html#EXTEND.EXAMPLE4.01) | (assertEqualToResult (extend-py! mettamorph)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03](https://logicmoo.org/public/mettareports/_507286.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03) | (assertEqual (match &kb (, (Venus orbit $x au) (Mars orbit $y au)) (- $y $x))) | (0.8) | (0.8) | | PASS | [EXTEND.EXAMPLE6.01](https://logicmoo.org/public/mettareports/_507556.metta.html#EXTEND.EXAMPLE6.01) | (assertEqualToResult (extend-py! mettamorph)) | () | () | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01](https://logicmoo.org/public/mettareports/_507804.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01) | (assertEqual (Cons 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.12](https://logicmoo.org/public/mettareports/_507996.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.12) | (assertEqualToResult (add-atom &kb (: Refl (≼ $x $x)))) | (True) | (()) | | PASS | [BACKWARD-CHAINING.BC-XP.17](https://logicmoo.org/public/mettareports/_508080.metta.html#BACKWARD-CHAINING.BC-XP.17) | (assertEqualToResult (add-atom &rb_bem (⊢ (→ $p $q) $p $q))) | () | (()) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-SUPERPOSE.03](https://logicmoo.org/public/mettareports/_508132.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-SUPERPOSE.03) | (assertEqualToResult (g "42")) | (True) | (True) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.17](https://logicmoo.org/public/mettareports/_508140.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.17) | (assertEqualToResult (add-atom &rb_bem (⊢ (→ $p $q) $p $q))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02](https://logicmoo.org/public/mettareports/_508208.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02) | (assertEqual (get-type (+ 5 7))) | (Number) | (Number) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.05](https://logicmoo.org/public/mettareports/_508228.metta.html#TRUTHVALUE.TRUTHVALUETEST.05) | (assertEqual (mean (STV 0.1 0.9))) | (0.14) | (0.14) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02](https://logicmoo.org/public/mettareports/_508272.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02) | (assertEqualToResult (- 8 (/ 4 6.4))) | (7.375) | (7.375) | | PASS | [BASIC.COINS.02](https://logicmoo.org/public/mettareports/_508644.metta.html#BASIC.COINS.02) | (assertEqual (count-change 20)) | (9) | (9) | | PASS | [METTA-MORPH-TESTS.TYPES2.04](https://logicmoo.org/public/mettareports/_508988.metta.html#METTA-MORPH-TESTS.TYPES2.04) | (assertEqualToResult (match &self (: Lion $1) $1)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.TYPES2.04](https://logicmoo.org/public/mettareports/_509002.metta.html#METTA-MORPH-TESTS.TYPES2.04) | (assertEqualToResult (match &self (: Lion $1) $1)) | (Cat) | (Cat) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://logicmoo.org/public/mettareports/_509158.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $x) $x)) | (Socrates Plato) | (Plato Socrates) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://logicmoo.org/public/mettareports/_509706.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $x) $x)) | (Socrates Plato) | (Plato Socrates) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16](https://logicmoo.org/public/mettareports/_509766.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16) | (assertEqual (fmap (curry-a + 2) (Nothing))) | ((Nothing)) | ((Nothing)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.05](https://logicmoo.org/public/mettareports/_510160.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.05) | (assertEqual (case (+ 1 5) (($x (+ 1 $x))))) | (7) | (7) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.02](https://logicmoo.org/public/mettareports/_510548.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.02) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [COMMON.LISTTEST.07](https://logicmoo.org/public/mettareports/_510648.metta.html#COMMON.LISTTEST.07) | (assertEqualToResult (sort (Cons 1 Nil))) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://logicmoo.org/public/mettareports/_511162.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | PASS | [DEPENDENT-TYPES.MINERCURRIEDDTL.01](https://logicmoo.org/public/mettareports/_511192.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTL.01) | (assertEqualToResult (add-atom &db (Inheritance B A))) | () | (()) | | PASS | [HOL.LISTTEST.01](https://logicmoo.org/public/mettareports/_511194.metta.html#HOL.LISTTEST.01) | (assertEqualToResult (synthesize (: $proof (=== (app $xs Nil) $xs)) kb rb (fromNumber 3))) | () | () | | PASS | [CURRENT.TESTS5.06](https://logicmoo.org/public/mettareports/_511584.metta.html#CURRENT.TESTS5.06) | (assertEqualToResult (AddBeliefEvent ((sheep --> ([(white) ])) (1.0 0.9)))) | () | () | | PASS | [NARS-V0.TESTS5.03](https://logicmoo.org/public/mettareports/_511590.metta.html#NARS-V0.TESTS5.03) | (assertEqualToResult (AddBeliefEvent ((sheep --> ([(white) ])) (1.0 0.9)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://logicmoo.org/public/mettareports/_511694.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $1 $1)) | (1 2) | (1 2) | | PASS | [ITERATIVE-CHAINING.IFC-XP.22](https://logicmoo.org/public/mettareports/_512096.metta.html#ITERATIVE-CHAINING.IFC-XP.22) | (assertEqualToResult ((ic_bare_collapse A kb_bare rb_bare Z Z))) | ((→ A B) (→ B C) A) | (A (→ A B) (→ B C)) | | PASS | [BASIC.KEY-LOOKUPS-MANY.02](https://logicmoo.org/public/mettareports/_512120.metta.html#BASIC.KEY-LOOKUPS-MANY.02) | (assertEqual (let $v (new-state v-1) (match &data (= (get-data $k) $v) $k))) | (k-1) | (k-1) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.07](https://logicmoo.org/public/mettareports/_51216.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.07) | (assertEqualToResult (prodWith * (Cons 1 Nil) Nil)) | (Nil) | (Nil) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://logicmoo.org/public/mettareports/_51230.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://logicmoo.org/public/mettareports/_512488.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03](https://logicmoo.org/public/mettareports/_512672.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03) | (assertEqual (match &kb (, (Venus orbit $x au) (Mars orbit $y au)) (- $y $x))) | (0.8) | (0.8) | | PASS | [PREV.TESTS2.04](https://logicmoo.org/public/mettareports/_512674.metta.html#PREV.TESTS2.04) | (assertEqualToResult (AddBeliefEvent (ballleft (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/_51402.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_45996)) | ((State 1 $_45996)) | | FAIL | [COMPARISONS.ADD-ATOM-NAIVE-FIB.05](https://logicmoo.org/public/mettareports/_514034.metta.html#COMPARISONS.ADD-ATOM-NAIVE-FIB.05) | (assertEqualToResult (other2-new-space)) | ((named-new-space &other2 (Space ()))) | ((named-new-space &other2 GroundingSpace-0x55d278670fb8)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.02](https://logicmoo.org/public/mettareports/_514108.metta.html#METTA-MORPH-TESTS.MATCH-VOID.02) | (assertEqualToResult (add-atom &belief_events belief1)) | () | (()) | | PASS | [FORWARD-CHAINING.FC-XP.27](https://logicmoo.org/public/mettareports/_514152.metta.html#FORWARD-CHAINING.FC-XP.27) | (assertEqualToResult (match &kb_em (→ $x $y) (fc_em (→ $x $y) (fromNumber 2)))) | ((→ A B) B C (→ B C)) | (B C (→ A B) (→ B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/_514194.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/_514196.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/_514210.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | () | () | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.27](https://logicmoo.org/public/mettareports/_514224.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.27) | (assertEqualToResult (match &kb_em (→ $x $y) (fc_em (→ $x $y) (fromNumber 2)))) | ((→ A B) B C (→ B C)) | (B C (→ A B) (→ B C)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.03](https://logicmoo.org/public/mettareports/_514618.metta.html#METTA-MORPH-TESTS.STATES-SPACES.03) | (assertEqualToResult (match &WU $1 $1)) | (a) | (a) | | PASS | [HOL.NATSTANDALONETEST.01](https://logicmoo.org/public/mettareports/_514672.metta.html#HOL.NATSTANDALONETEST.01) | (assertEqualToResult (add-atom &kb (: Trans (-> (=== $x $y) (-> (=== $y $z) (=== $x $z)))))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03](https://logicmoo.org/public/mettareports/_514826.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03) | (assertEqual (drop (Cons 2 (Cons 1 Nil)))) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03](https://logicmoo.org/public/mettareports/_514838.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03) | (assertEqualToResult (match &kb ($SS A_AS $X) ($SS A_AS $X))) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://logicmoo.org/public/mettareports/_514996.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $1 $1)) | (2) | (2) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://logicmoo.org/public/mettareports/_515024.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $1 $1)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03](https://logicmoo.org/public/mettareports/_515104.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14](https://logicmoo.org/public/mettareports/_515214.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14) | (assertEqual ((inc) 5)) | (6) | (6) | | PASS | [COMPARISONS.NILS-IF-CONTROL-TEST-2.03](https://logicmoo.org/public/mettareports/_515328.metta.html#COMPARISONS.NILS-IF-CONTROL-TEST-2.03) | (assertEqualToResult (bc (: $prf (-> (: $f (-> (: $x $a) (-> (: $y $b) $c))) (-> (: $y $b) (-> (: $x $a) $c)))) (fromNumber 2))) | ((: (AK AK) (-> (: $_167624 (-> (: $_167678 $_167700) (-> (: $_167754 $_167776) $_167776))) (-> (: $... | ((: (AK AK) (-> (: $_12380 (-> (: $_12422 $_12440) (-> (: $_12482 $_12500) $_12500))) (-> (: $_12482 $_12500) (-> (: $_12422 $_12440) $_12500)))) (: (AK AS) (-> (: $_12380 (-> (: $_12422 (-> (: $_16016 $_16034) $_16052)) (-> (: $_12482 (-> (: $_16016 $_16034) (-> (: $_16160 $_16052) $_16184))) (-> (: $_16016 $_16034) $_16184)))) (-> (: $_12482 (-> (: $_16016 $_16034) (-> (: $_16160 $_16052) $_16184))) (-> (: $_12422 (-> (: $_16016 $_16034) $_16052)) (-> (: $_16016 $_16034) $_16184))))) (: (AK (AK AK)) (-> (: $_12380 (-> (: $_12422 $_12440) (-> (: $_12482 $_12500) (-> (: $_15746 $_15764) $_12440)))) (-> (: $_12482 $_12500) (-> (: $_12422 $_12440) (-> (: $_15746 $_15764) $_12440))))) (: (AK (AK AS)) (-> (: $_12380 (-> (: $_12422 (-> (: $_15044 $_15062) (-> (: $_15104 $_15122) $_15140))) (-> (: $_12482 $_12500) (-> (: $_15218 (-> (: $_15044 $_15062) $_15122)) (-> (: $_15044 $_15062) $_15140))))) (-> (: $_12482 $_12500) (-> (: $_12422 (-> (: $_15044 $_15062) (-> (: $_15104 $_15122) $_15140))) (-> (: $_15218 (-> (: $_15044 $_15062) $_15122)) (-> (: $_15044 $_15062) $_15140)))))) (: (AK (AS AK)) (-> (: $_12380 (-> (: $_12422 $_12440) (-> (: $_12482 (-> (: $_12422 $_12440) $_14780)) $_12440))) (-> (: $_12482 (-> (: $_12422 $_12440) $_14780)) (-> (: $_12422 $_12440) $_12440)))) (: (AK (AS AS)) (-> (: $_12380 (-> (: $_12422 (-> (: $_13940 $_13958) (-> (: $_14000 $_14018) $_14036))) (-> (: $_12482 (-> (: $_12422 (-> (: $_13940 $_13958) (-> (: $_14000 $_14018) $_14036))) (-> (: $_13940 $_13958) $_14018))) (-> (: $_13940 $_13958) $_14036)))) (-> (: $_12482 (-> (: $_12422 (-> (: $_13940 $_13958) (-> (: $_14000 $_14018) $_14036))) (-> (: $_13940 $_13958) $_14018))) (-> (: $_12422 (-> (: $_13940 $_13958) (-> (: $_14000 $_14018) $_14036))) (-> (: $_13940 $_13958) $_14036))))) (: ((AS AK) AK) (-> (: $_12380 (-> (: $_12422 $_12500) (-> (: $_12422 $_12500) $_12518))) (-> (: $_12422 $_12500) (-> (: $_12422 $_12500) $_12518)))) (: ((AS AK) AS) (-> (: $_12380 (-> (: $_12422 $_12500) (-> (: $_12422 $_12500) $_12518))) (-> (: $_12422 $_12500) (-> (: $_12422 $_12500) $_12518)))) (: ((AS AK) (AK AK)) (-> (: $_12380 (-> (: $_12422 $_12500) (-> (: $_12422 $_12500) $_12518))) (-> (: $_12422 $_12500) (-> (: $_12422 $_12500) $_12518)))) (: ((AS AK) (AK AS)) (-> (: $_12380 (-> (: $_12422 $_12500) (-> (: $_12422 $_12500) $_12518))) (-> (: $_12422 $_12500) (-> (: $_12422 $_12500) $_12518)))) (: ((AS AK) (AS AK)) (-> (: $_12380 (-> (: $_12422 $_12500) (-> (: $_12422 $_12500) $_12518))) (-> (: $_12422 $_12500) (-> (: $_12422 $_12500) $_12518))))) | | FAIL | [POLYMORPHIC-TYPES.EXAMPLES-QUANTS.02](https://logicmoo.org/public/mettareports/_515336.metta.html#POLYMORPHIC-TYPES.EXAMPLES-QUANTS.02) | (assertEqualToResult (any-to-radians (radian-producer-1))) | ((* (radian-producer-1) 0.017453292519943295) (radian-producer-1)) | ((* (radian-producer-1) (/ pi 180)) (radian-producer-1)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02](https://logicmoo.org/public/mettareports/_515516.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02) | (assertEqual (get-type (+ 5 7))) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01](https://logicmoo.org/public/mettareports/_515990.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01) | (assertEqualToResult (ift (green $x) (add-atom &kb (Green $x)))) | () | (()) | | FAIL | [ITERATIVE-CHAINING.IBC-XP.28](https://logicmoo.org/public/mettareports/_516018.metta.html#ITERATIVE-CHAINING.IBC-XP.28) | (assertEqualToResult (get-atoms &kb)) | ((: ab (→ A B)) (: bc (→ B C)) (: a A) (: ModusPonens (-> (→ $_513550 $_513556) (-> $_513550 $... | ((: -> (-> $_3966 $_4056) (-> (-> $_3948 $_3966) (-> $_3948 $_4056))) (: Deduction (-> (→ $_3966 $_4056) (-> (→ $_3948 $_3966) (→ $_3948 $_4056)))) (: ModusPonens (-> (→ $_3948 $_3966) (-> $_3948 $_3966))) (: a A) (: ab (→ A B)) (: bc (→ B C)) (: ((ModusPonens ab) a) B) (: ((ModusPonens bc) ((ModusPonens ab) a)) C)) | | PASS | [BASIC.STATE-TYPES.11](https://logicmoo.org/public/mettareports/_516592.metta.html#BASIC.STATE-TYPES.11) | (assertEqualToResult ("Change False-first into Sometimes")) | (("Change False-first into Sometimes")) | (("Change False-first into Sometimes")) | | PASS | [POLYWARD-CHAINING.PC-XP.09](https://logicmoo.org/public/mettareports/_516632.metta.html#POLYWARD-CHAINING.PC-XP.09) | (assertEqual (bc (: $prf (→ B C)) Z)) | ((: bc (→ B C))) | ((: bc (→ B C))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17](https://logicmoo.org/public/mettareports/_51664.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17) | (assertEqual (get-type (fmap (curry-a + 1) (Left 5)))) | ((Either Number)) | ((Either Number)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_516984.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.01) | (assertEqualToResult (add-atom &kb (: a A))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05](https://logicmoo.org/public/mettareports/_517026.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05) | (assertEqual (eq (S K K x) x)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01](https://logicmoo.org/public/mettareports/_517116.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01) | (assertEqual (get-type (Cons 0 (Cons 1 Nil)))) | ((Vec Number (S (S Z)))) | ((Vec Number (S (S Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02](https://logicmoo.org/public/mettareports/_517156.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02) | (assertEqualToResult (match &kb (Green $x) $x)) | (Fritz Sam) | (Fritz Sam) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01](https://logicmoo.org/public/mettareports/_517306.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01) | (assertEqual (Cons 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16](https://logicmoo.org/public/mettareports/_517566.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16) | (assertEqualToResult (sqr 4)) | (16) | (16) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16](https://logicmoo.org/public/mettareports/_517594.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16) | (assertEqualToResult (sqr 4)) | (16) | (16) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16](https://logicmoo.org/public/mettareports/_517640.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16) | (assertEqualToResult (sqr 4)) | (16) | (16) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02](https://logicmoo.org/public/mettareports/_517708.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02) | (assertEqual (get-type (+ 5 7))) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02](https://logicmoo.org/public/mettareports/_517722.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02) | (assertEqual (get-type (+ 5 7))) | (Number) | (Number) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02](https://logicmoo.org/public/mettareports/_517808.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02) | (assertEqual (insert 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-1.02](https://logicmoo.org/public/mettareports/_518046.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-1.02) | (assertEqualToResult (bc td-updater td-updater td-terminator (MkTD (≼ Feb Jul) (fromNumber 6)) (: $prf (≼ Feb Jul)))) | ((: ((Trans FM) ((Trans MA) ((Trans AM) ((Trans MJ) JJ)))) (≼ Feb Jul)) (: ((Trans FM) ((Trans ((T... | ((: ((Trans FM) ((Trans MA) ((Trans AM) ((Trans MJ) JJ)))) (≼ Feb Jul)) (: ((Trans FM) ((Trans ((Trans MA) AM)) ((Trans MJ) JJ))) (≼ Feb Jul)) (: ((Trans ((Trans FM) MA)) ((Trans AM) ((Trans MJ) JJ))) (≼ Feb Jul)) (: ((Trans ((Trans FM) MA)) ((Trans ((Trans AM) MJ)) JJ)) (≼ Feb Jul)) (: ((Trans ((Trans FM) ((Trans MA) AM))) ((Trans MJ) JJ)) (≼ Feb Jul))) | | PASS | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-5.02](https://logicmoo.org/public/mettareports/_518046.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-5.02) | (assertEqualToResult (bc td-updater td-updater td-terminator (MkTD (≼ Feb Jul) (fromNumber 6)) (: $prf (≼ Feb Jul)))) | ((: ((Trans FM) ((Trans MA) ((Trans AM) ((Trans MJ) JJ)))) (≼ Feb Jul)) (: ((Trans FM) ((Trans ((T... | ((: ((Trans FM) ((Trans MA) ((Trans AM) ((Trans MJ) JJ)))) (≼ Feb Jul)) (: ((Trans FM) ((Trans ((Trans MA) AM)) ((Trans MJ) JJ))) (≼ Feb Jul)) (: ((Trans ((Trans FM) MA)) ((Trans AM) ((Trans MJ) JJ))) (≼ Feb Jul)) (: ((Trans ((Trans FM) MA)) ((Trans ((Trans AM) MJ)) JJ)) (≼ Feb Jul)) (: ((Trans ((Trans FM) ((Trans MA) AM))) ((Trans MJ) JJ)) (≼ Feb Jul))) | | PASS | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-6.02](https://logicmoo.org/public/mettareports/_518046.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-6.02) | (assertEqualToResult (bc td-updater td-updater td-terminator (MkTD (≼ Feb Jul) (fromNumber 6)) (: $prf (≼ Feb Jul)))) | ((: ((Trans FM) ((Trans MA) ((Trans AM) ((Trans MJ) JJ)))) (≼ Feb Jul)) (: ((Trans FM) ((Trans ((T... | ((: ((Trans FM) ((Trans MA) ((Trans AM) ((Trans MJ) JJ)))) (≼ Feb Jul)) (: ((Trans FM) ((Trans ((Trans MA) AM)) ((Trans MJ) JJ))) (≼ Feb Jul)) (: ((Trans ((Trans FM) MA)) ((Trans AM) ((Trans MJ) JJ))) (≼ Feb Jul)) (: ((Trans ((Trans FM) MA)) ((Trans ((Trans AM) MJ)) JJ)) (≼ Feb Jul)) (: ((Trans ((Trans FM) ((Trans MA) AM))) ((Trans MJ) JJ)) (≼ Feb Jul))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15](https://logicmoo.org/public/mettareports/_518646.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15) | (assertEqual (fmap (curry-a + 2) (Something 5))) | ((Something 7)) | ((Something 7)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16](https://logicmoo.org/public/mettareports/_518762.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16) | (assertEqualToResult (sqr 4)) | (16) | (16) | | PASS | [COMPILER.DEFINE-IF-LIKE.01](https://logicmoo.org/public/mettareports/_519104.metta.html#COMPILER.DEFINE-IF-LIKE.01) | (assertEqual pass-or-fail) | (:pass) | (:pass) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17](https://logicmoo.org/public/mettareports/_51946.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17) | (assertEqual (+ (superpose (1 2 3)) 1)) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03](https://logicmoo.org/public/mettareports/_519700.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03) | (assertEqual (color)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.16](https://logicmoo.org/public/mettareports/_519742.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.16) | (assertEqual (match &self ($rel A $x) ($rel $x))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://logicmoo.org/public/mettareports/_519994.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (match &belief_events $1 $1)) | (belief1) | (belief1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02](https://logicmoo.org/public/mettareports/_520100.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02) | (assertEqual (ift (green $x) $x)) | (Fritz) | (Fritz) | | PASS | [RESOLVE.R.04](https://logicmoo.org/public/mettareports/_520110.metta.html#RESOLVE.R.04) | (assertEqualToResult resolve) | (resolve) | (resolve) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01](https://logicmoo.org/public/mettareports/_520230.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (inactive) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03](https://logicmoo.org/public/mettareports/_520240.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03) | (assertEqual (drop (Cons 2 (Cons 1 Nil)))) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03](https://logicmoo.org/public/mettareports/_520636.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03) | (assertEqualToResult (frog Fritz)) | () | () | | PASS | [ITERATIVE-CHAINING.IBC-XP.10](https://logicmoo.org/public/mettareports/_520740.metta.html#ITERATIVE-CHAINING.IBC-XP.10) | (assertEqual (syn (: $prf (-> A B)) (fromNumber 1))) | ((: (ModusPonens ab) (-> A B))) | ((: (ModusPonens ab) (-> A B))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03](https://logicmoo.org/public/mettareports/_521304.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03) | (assertEqual (get-type +)) | ((-> Number Number Number)) | ((-> Number Number Number)) | | PASS | [DEPENDENT-TYPES.MINERDTLTEST.04](https://logicmoo.org/public/mettareports/_521320.metta.html#DEPENDENT-TYPES.MINERDTLTEST.04) | (assertEqualToResult (add-atom &db (Inheritance C E))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12](https://logicmoo.org/public/mettareports/_521536.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12) | (assertEqual (== (let* (($x (collapse (get-atoms &m))) ($y (car-atom $x))) (get-type $y)) (get-type &self))) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.04](https://logicmoo.org/public/mettareports/_521594.metta.html#METTA-MORPH-TESTS.STATES-SPACES.04) | (assertEqualToResult (add-atom &WU b)) | () | (()) | | PASS | [ITERATIVE-CHAINING.IBC-XP.30](https://logicmoo.org/public/mettareports/_521602.metta.html#ITERATIVE-CHAINING.IBC-XP.30) | (assertEqualToResult (add-atom &kb (: cd (→ C D)))) | () | (()) | | PASS | [CURRENT.TESTS2.02](https://logicmoo.org/public/mettareports/_522044.metta.html#CURRENT.TESTS2.02) | (assertEqualToResult (AddBeliefEvent ((^ left) (1.0 0.9)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://logicmoo.org/public/mettareports/_522046.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | (42) | (42) | | PASS | [NARS-V0.TESTS2.02](https://logicmoo.org/public/mettareports/_522050.metta.html#NARS-V0.TESTS2.02) | (assertEqualToResult (AddBeliefEvent ((^ left) (1.0 0.9)))) | () | () | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.03](https://logicmoo.org/public/mettareports/_522104.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.03) | (assertEqualToResult (add-atom &kb (: MA (≼ Mar Apr)))) | (True) | (()) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_522118.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_522168.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13](https://logicmoo.org/public/mettareports/_522224.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01](https://logicmoo.org/public/mettareports/_52224.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01) | (assertEqual (get-type (Mortal Plato))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05](https://logicmoo.org/public/mettareports/_522444.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05) | (assertEqual (eq (S K K x) x)) | (T) | (T) | | FAIL | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.06](https://logicmoo.org/public/mettareports/_522744.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.06) | (assertEqualToResult (get-type recursive_prf)) | () | ((≞ (→ P Q) $_512782)) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.04](https://logicmoo.org/public/mettareports/_52274.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.04) | (assertEqualToResult (add-atom &kb (: AM (≼ Apr May)))) | (True) | (()) | | PASS | [EXTEND.EXAMPLE5.01](https://logicmoo.org/public/mettareports/_52282.metta.html#EXTEND.EXAMPLE5.01) | (assertEqualToResult (extend-py! mettamorph)) | () | () | | FAIL | [BASIC.STATE-TYPES.18](https://logicmoo.org/public/mettareports/_522852.metta.html#BASIC.STATE-TYPES.18) | (assertEqualToResult ("(get-type (get-state (new-state (isLeft (Right 5)))))=" (get-type (get-state (new-state (isLeft (Right 5))))))) | (("(get-type (get-state (new-state (isLeft (Right 5)))))=" Bool)) | (("(get-type (get-state (new-state (isLeft (Right 5)))))=" Bool)) | | FAIL | [EXPERIMENTS.UNIFY-VIA-CASE.01](https://logicmoo.org/public/mettareports/_522948.metta.html#EXPERIMENTS.UNIFY-VIA-CASE.01) | (assertEqualToResult (case (Link $x B) (((Link A $y) (Link $x $y))))) | ((Link $_4840 B)) | ((Link A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03](https://logicmoo.org/public/mettareports/_523006.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03) | (assertEqualToResult (match &self (= ($p Fritz) T) $p)) | (croaks eat_flies) | (croaks eat_flies) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04](https://logicmoo.org/public/mettareports/_523222.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04) | (assertEqualToResult (match &self (:= ($color $who) T) ($who is really $color))) | ((Sam is really Green) (Tom is really White)) | ((Sam is really Green) (Tom is really White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01](https://logicmoo.org/public/mettareports/_523280.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01) | (assertEqualToResult (ift (green $x) (add-atom &kb (Green $x)))) | () | (()) | | PASS | [BASIC.HYPERPOSING.03](https://logicmoo.org/public/mettareports/_523306.metta.html#BASIC.HYPERPOSING.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [BASIC.CML-UNSHARED.03](https://logicmoo.org/public/mettareports/_523352.metta.html#BASIC.CML-UNSHARED.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26](https://logicmoo.org/public/mettareports/_523440.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26) | (assertEqual (let $z (Add Z Z) (eqa Z $z))) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.02](https://logicmoo.org/public/mettareports/_523612.metta.html#METTA-MORPH-TESTS.MATCH-VOID.02) | (assertEqualToResult (add-atom &belief_events belief1)) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://logicmoo.org/public/mettareports/_523642.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://logicmoo.org/public/mettareports/_523656.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | FAIL | [FORWARD-CHAINING.FC-XP.05](https://logicmoo.org/public/mettareports/_523708.metta.html#FORWARD-CHAINING.FC-XP.05) | (assertEqualToResult Entail) | (Entail) | ("=== Bare Entail ===") | | FAIL | [FORWARD-CHAINER.FORWARD-CHAINER-XP.05](https://logicmoo.org/public/mettareports/_523726.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.05) | (assertEqualToResult Entail) | (Entail) | ("=== Bare Entail ===") | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://logicmoo.org/public/mettareports/_523952.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | ((= (Mortal Plato) T)) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://logicmoo.org/public/mettareports/_523966.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | ((= (Mortal Plato) T)) | (T) | | PASS | [TRUTHVALUE.EVIDENTIALTRUTHVALUETEST.01](https://logicmoo.org/public/mettareports/_524012.metta.html#TRUTHVALUE.EVIDENTIALTRUTHVALUETEST.01) | (assertEqualToResult (mode (ETV (Singleton 42) (STV 0.1 0.2)))) | (0.1) | (0.1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09](https://logicmoo.org/public/mettareports/_524040.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09) | (assertEqualToResult (is-socrates)) | ((curry-a is Socrates)) | ((curry-a is Socrates)) | | PASS | [COMPARISONS.ADD-ATOM-NAIVE-FIB.06](https://logicmoo.org/public/mettareports/_52408.metta.html#COMPARISONS.ADD-ATOM-NAIVE-FIB.06) | (assertEqualToResult (add-atom &other2 (= (foo) foo1))) | () | (()) | | PASS | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/_53064.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04](https://logicmoo.org/public/mettareports/_53464.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04) | (assertEqual (color)) | (green yellow red) | (green yellow red) | | PASS | [NEW.TESTS5.09](https://logicmoo.org/public/mettareports/_540612.metta.html#NEW.TESTS5.09) | (assertEqual (EternalQuestion ({(instance1) } --> sheep))) | ((Event (({(instance1) } --> sheep) (1.0 0.30916030534351147)) (eternal (4 3) (0 0.0))) (Event (({(i... | ((Event (({(instance1) } --> sheep) (1.0 0.30916030534351147)) (eternal (4 3) (0 0.0)))) | | PASS | [CURRENT.TESTS5.05](https://logicmoo.org/public/mettareports/_54684.metta.html#CURRENT.TESTS5.05) | (assertEqualToResult ("sheep white")) | (("sheep white")) | (("sheep white")) | | FAIL | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.13](https://logicmoo.org/public/mettareports/_549048.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.13) | (assertEqualToResult =====) | (=====) | ("===== Prove P→Q using base rule (synthesizer) =====") | | PASS | [NEW.TESTS2.02](https://logicmoo.org/public/mettareports/_554440.metta.html#NEW.TESTS2.02) | (assertEqualToResult (AddBeliefEvent ((^ left) (1.0 0.9)))) | () | () | | FAIL | [FROM-DAS.METTALOG-USES-DAS.01](https://logicmoo.org/public/mettareports/_55552.metta.html#FROM-DAS.METTALOG-USES-DAS.01) | (assertEqualToResult hi) | (hi) | ((ls!)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.33](https://logicmoo.org/public/mettareports/_55750.metta.html#ITERATIVE-CHAINING.IFC-XP.33) | (assertEqual (fc (: a A) Z)) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01](https://logicmoo.org/public/mettareports/_56160.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01) | (assertEqual (get-state (get-token))) | ((A B)) | ((A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02](https://logicmoo.org/public/mettareports/_56206.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02) | (assertEqualToResult (match &self ($who is a $what) ($who the $what))) | ((Sam the frog) (Tom the cat) (Sophia the robot)) | ((Sam the frog) (Sophia the robot) (Tom the cat)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01](https://logicmoo.org/public/mettareports/_56418.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01) | (assertEqual (match &self (= (color) $x) $x)) | (green yellow red) | (red yellow green) | | PASS | [ITERATIVE-CHAINING.IFC-XP.17](https://logicmoo.org/public/mettareports/_56706.metta.html#ITERATIVE-CHAINING.IFC-XP.17) | (assertEqualToResult ((ic_bare A kb_bare rb_bare (fromNumber 1) (fromNumber 1)))) | ((→ A B) (→ B C) A B) | (A B (→ A B) (→ B C)) | | FAIL | [BASIC.STATE-TYPES.19](https://logicmoo.org/public/mettareports/_57070.metta.html#BASIC.STATE-TYPES.19) | (assertEqualToResult ("(get-type (get-state (new-state (Left 6))))=" (get-type (get-state (new-state (Left 6)))))) | (("(get-type (get-state (new-state (Left 6))))=" Either)) | (("(get-type (get-state (new-state (Left 6))))=" Either)) | | FAIL | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.07](https://logicmoo.org/public/mettareports/_570880.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.07) | (assertEqualToResult base) | (base) | ("===== Prove that 2 < 7 (synthesizer) =====") | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.05](https://logicmoo.org/public/mettareports/_57398.metta.html#METTA-MORPH-TESTS.STATES-SPACES.05) | (assertEqualToResult (remove-atom &WU a)) | () | (()) | | FAIL | [CONTAINERS-ARE-SPACES.05-MATCH-SUPERPOSE-ELEMENT-LIKE-SPACE.01](https://logicmoo.org/public/mettareports/_57544.metta.html#CONTAINERS-ARE-SPACES.05-MATCH-SUPERPOSE-ELEMENT-LIKE-SPACE.01) | (assertEqualToResult (match (kb) ($SS A_Each $X) ($SS A_Each $X))) | () | ((SS-P_Each A_Each B_Each) (SS-Q_Each A_Each C_Each)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05](https://logicmoo.org/public/mettareports/_57742.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05) | (assertEqualToResult (match &self (:= ($color $who) $tv) ('It's' $tv that $who is $color))) | (('It's' T that Sam is Green) ('It's' T that Tom is White) ('It's' F that Tom is Green)) | (('It's' F that Tom is Green) ('It's' T that Sam is Green) ('It's' T that Tom is White)) | | PASS | [ITERATIVE-CHAINING.IFC-XP.27](https://logicmoo.org/public/mettareports/_57758.metta.html#ITERATIVE-CHAINING.IFC-XP.27) | (assertEqualToResult (add-atom &kb (: ab (→ A B)))) | () | (()) | | PASS | [METTA-MORPH-TESTS.TESTS0.03](https://logicmoo.org/public/mettareports/_578702.metta.html#METTA-MORPH-TESTS.TESTS0.03) | (assertEqualToResult (|- (({(a b) } --> mwawa) (1.0 0.9)))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01](https://logicmoo.org/public/mettareports/_58026.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01) | (assertEqual (get-state (get-token))) | ((A B)) | ((A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01](https://logicmoo.org/public/mettareports/_58040.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01) | (assertEqual (match &self (= (color) $x) $x)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02](https://logicmoo.org/public/mettareports/_58126.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02) | (assertEqualToResult (nop (change-state! (status (Goal lunch-order)) active))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07](https://logicmoo.org/public/mettareports/_58428.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07) | (assertEqualToResult (Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | | PASS | [DEPENDENT-TYPES.SUPPORTRULEEXP.03](https://logicmoo.org/public/mettareports/_58492.metta.html#DEPENDENT-TYPES.SUPPORTRULEEXP.03) | (assertEqualToResult (add-atom &db (Inheritance man mortal))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04](https://logicmoo.org/public/mettareports/_58514.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04) | (assertEqual (color)) | (green yellow red) | (green yellow red) | | PASS | [COMPILER.DEFINE-IF-LIKE.03](https://logicmoo.org/public/mettareports/_58736.metta.html#COMPILER.DEFINE-IF-LIKE.03) | (assertEqual (get-state &fail)) | (:uncalled) | (:uncalled) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://logicmoo.org/public/mettareports/_58954.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.17](https://logicmoo.org/public/mettareports/_59160.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.17) | (assertEqual (superpose ((P B) (Q C)))) | ((P B) (Q C)) | ((P B) (Q C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03](https://logicmoo.org/public/mettareports/_59310.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03) | (assertEqual (Add (S Z) (S Z))) | ((S (S Z))) | ((S (S Z))) | | PASS | [NARS-V0.TESTS0.03](https://logicmoo.org/public/mettareports/_59978.metta.html#NARS-V0.TESTS0.03) | (assertEqualToResult (|- (({(a b) } --> mwawa) (1.0 0.9)))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | | PASS | [EXPERIMENTS.UNIFY-VIA-LET.02](https://logicmoo.org/public/mettareports/_60072.metta.html#EXPERIMENTS.UNIFY-VIA-LET.02) | (assertEqualToResult (let (-> A $y) (-> $x B) (-> $x $y))) | ((-> A B)) | ((-> A B)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.03](https://logicmoo.org/public/mettareports/_60094.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.03) | (assertEqual ((superpose (1 2 3)))) | ((1) (2) (3)) | ((1) (2) (3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09](https://logicmoo.org/public/mettareports/_60206.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09) | (assertEqualToResult (is-socrates)) | ((curry-a is Socrates)) | ((curry-a is Socrates)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.06](https://logicmoo.org/public/mettareports/_60466.metta.html#METTA-MORPH-TESTS.STATES-SPACES.06) | (assertEqual (match &WU $1 $1)) | (b) | (b) | | PASS | [COMMON.ORDEREDSETTEST.01](https://logicmoo.org/public/mettareports/_60570.metta.html#COMMON.ORDEREDSETTEST.01) | (assertEqual (elem 1 ∅)) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://logicmoo.org/public/mettareports/_60880.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case belief1 ((%void% 42)))) | () | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08](https://logicmoo.org/public/mettareports/_60976.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08) | (assertEqualToResult (get-type (= SocratesIsHuman SocratesIsMortal))) | (Type) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/_60982.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_55576)) | ((State 2 $_55576)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05](https://logicmoo.org/public/mettareports/_61128.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05) | (assertEqual (Add Something Z)) | (Something) | (Something) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05](https://logicmoo.org/public/mettareports/_61130.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05) | (assertEqual (Add Something Z)) | (Something) | (Something) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04](https://logicmoo.org/public/mettareports/_61196.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (sequential ((increment) (increment) (increment)))))) | (10 11 12 13 14 15) | (10 11 12 13 14 15) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02](https://logicmoo.org/public/mettareports/_61412.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02) | (assertEqualToResult (match &self ($who is a $what) ($who the $what))) | ((Sam the frog) (Tom the cat) (Sophia the robot)) | ((Sam the frog) (Sophia the robot) (Tom the cat)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08](https://logicmoo.org/public/mettareports/_61496.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08) | (assertEqualToResult (get-type (= SocratesIsHuman SocratesIsMortal))) | (Type) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05](https://logicmoo.org/public/mettareports/_61556.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05) | (assertEqual (TV (green Fritz))) | ((stv 0.7047 0.68)) | ((stv 0.7047 0.68)) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT.01](https://logicmoo.org/public/mettareports/_61958.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT.01) | (assertEqualToResult (add-atom &kb (: JF (≼ Jan Feb)))) | (True) | (()) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02](https://logicmoo.org/public/mettareports/_62284.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05](https://logicmoo.org/public/mettareports/_62462.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05) | (assertEqual (TV (green Fritz))) | ((stv 0.7047 0.68)) | ((stv 0.7047 0.68)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/_62694.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_57288)) | ((State 2 $_57288)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17](https://logicmoo.org/public/mettareports/_62824.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17) | (assertEqual (match &self (Green $who) $who)) | (Sam) | (Sam) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17](https://logicmoo.org/public/mettareports/_62838.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17) | (assertEqual (match &self (Green $who) $who)) | (Sam) | (Sam) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.03](https://logicmoo.org/public/mettareports/_63174.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.03) | (assertEqualToResult (TupleConcat (a b c) ())) | ((a b c)) | ((a b c)) | | FAIL | [BACKWARD-CHAINING.BC-XP.01](https://logicmoo.org/public/mettareports/_63932.metta.html#BACKWARD-CHAINING.BC-XP.01) | (assertEqualToResult ===) | (===) | ("=== Bare Entail ===") | | FAIL | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.01](https://logicmoo.org/public/mettareports/_63950.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.01) | (assertEqualToResult ===) | (===) | ("=== Bare Entail ===") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05](https://logicmoo.org/public/mettareports/_64274.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05) | (assertEqual (get-type (curry-a + 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27](https://logicmoo.org/public/mettareports/_64640.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27) | (assertEqual (sort (Cons 3 (Cons 1 (Cons 2 Nil))))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01](https://logicmoo.org/public/mettareports/_64748.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01) | (assertEqualToResult (match &kb (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | FAIL | [EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.06](https://logicmoo.org/public/mettareports/_64752.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-UNIFY-TEST.06) | (assertEqualToResult (record synthesize ((: (. g f) $type) (S Z)))) | ((⊷ synthesize ((: (. g f) $_62434) (S Z)) (synthesize (: (. g f) $_62434) (S Z)))) | ((: (. g f) (-> Number Bool))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04](https://logicmoo.org/public/mettareports/_65120.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04) | (assertEqualToResult (match &self (, (implies ($P $x) (Green $x)) (implies ($P $x) (Eats-flies $x))) (Then it is definitely $P))) | ((Then it is definitely Frog)) | ((Then it is definitely Frog)) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.01](https://logicmoo.org/public/mettareports/_65470.metta.html#TRUTHVALUE.TRUTHVALUETEST.01) | (assertEqual (count->confidence 1)) | (0.5) | (0.5) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04](https://logicmoo.org/public/mettareports/_65748.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04) | (assertEqual (match &kb ($rel A_AS $x) ($rel $x))) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03](https://logicmoo.org/public/mettareports/_66122.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03) | (assertEqual (Add (S Z) Z)) | ((S Z)) | ((S Z)) | | PASS | [BACKWARD-CHAINING.BC-XP.05](https://logicmoo.org/public/mettareports/_66624.metta.html#BACKWARD-CHAINING.BC-XP.05) | (assertEqualToResult (bc_bare D kb_bare rb_bare (fromNumber 4))) | () | () | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.05](https://logicmoo.org/public/mettareports/_66632.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.05) | (assertEqualToResult (bc_bare D kb_bare rb_bare (fromNumber 4))) | () | () | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://logicmoo.org/public/mettareports/_66720.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://logicmoo.org/public/mettareports/_66916.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16](https://logicmoo.org/public/mettareports/_66922.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16) | (assertEqual (fmap (curry-a + 2) (Nothing))) | ((Nothing)) | ((Nothing)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13](https://logicmoo.org/public/mettareports/_67006.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.03](https://logicmoo.org/public/mettareports/_67182.metta.html#INFERENCE-CONTROL.INF-CTL-MONTH-BC-XP.03) | (assertEqualToResult (bc &kb depth-updater depth-updater depth-bc-terminator (fromNumber 2) (: $prf (≼ Jan Jan)))) | ((: Refl (≼ Jan Jan)) (: JPA (≼ Jan Jan))) | ((: JPA (≼ Jan Jan)) (: Refl (≼ Jan Jan))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14](https://logicmoo.org/public/mettareports/_67600.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14) | (assertEqual (g 2)) | (102 102 102 102) | (102) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://logicmoo.org/public/mettareports/_67682.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09](https://logicmoo.org/public/mettareports/_67736.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09) | (assertEqualToResult (== 4 (+ 2 2))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04](https://logicmoo.org/public/mettareports/_6798.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04) | (assertEqualToResult (nop (change-state! &state-active inactive))) | () | (()) | | PASS | [BACKWARD-CHAINING.BC-XP.18](https://logicmoo.org/public/mettareports/_68338.metta.html#BACKWARD-CHAINING.BC-XP.18) | (assertEqualToResult (add-atom &rb_bem (⊢ (→ $p $q) (→ $q $r) (→ $p $r)))) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.18](https://logicmoo.org/public/mettareports/_68354.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.18) | (assertEqualToResult (add-atom &rb_bem (⊢ (→ $p $q) (→ $q $r) (→ $p $r)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/_68498.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_57684)) | ((State (A B) $_57684)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/_68502.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_63096)) | ((State 1 $_63096)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://logicmoo.org/public/mettareports/_68504.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case belief1 ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.05](https://logicmoo.org/public/mettareports/_68506.metta.html#METTA-MORPH-TESTS.STATES-SPACES.05) | (assertEqualToResult (remove-atom &WU a)) | () | (()) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.05](https://logicmoo.org/public/mettareports/_68520.metta.html#METTA-MORPH-TESTS.STATES-SPACES.05) | (assertEqualToResult (remove-atom &WU a)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10](https://logicmoo.org/public/mettareports/_68610.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10) | (assertEqual (is (air dry))) | ((start humidifier) (start kettle) (stop ventilation)) | ((stop ventilation) (start kettle) (start humidifier)) | | PASS | [NEW.TESTS3.01](https://logicmoo.org/public/mettareports/_68712.metta.html#NEW.TESTS3.01) | (assertEqualToResult (AddBeliefEvent (((corridorIn &/ (^ forward)) =/> doorAt) (1.0 0.9)))) | () | () | | PASS | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.14](https://logicmoo.org/public/mettareports/_689630.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.14) | (assertEqualToResult (synthesize (: $proof (≞ (→ P Q) $etv)) kb rb (fromNumber 1))) | ((: (IDIBase P2 Q2) (≞ (→ P Q) (ETV (:: (fromNumber 2) ∅) (direct-introduction-base-formula Fa... | ((: (IDIBase P2 Q2) (≞ (→ P Q) (ETV (:: (S (S Z)) ∅) (STV 0 0.5)))) (: (IDIBase P3 Q3) (≞ (→ P Q) (ETV (:: (S (S (S Z))) ∅) (STV 1 0.5)))) (: (IDIBase P7 Q7) (≞ (→ P Q) (ETV (:: (S (S (S (S (S (S (S Z))))))) ∅) (STV 1 0.5)))) (let* (((: $_31482 (⊷ Q (S (S Z)) True)) (synthesize (: $_31482 (⊷ Q (S (S Z)) True)) kb rb Z)) ((: $_31674 (≞ (→ P Q) (ETV (:: $_31752 $_31770) (STV $_31800 $_31818)))) (synthesize (: $_31674 (≞ (→ P Q) (ETV (:: $_31752 $_31770) (STV $_31800 $_31818)))) kb rb Z)) ((: $_31998 (⍃ $_31752 (S (S Z)))) (synthesize (: $_31998 (⍃ $_31752 (S (S Z)))) kb rb Z))) (: (IDIRecursive P2 $_31482 $_31674 $_31998) (≞ (→ P Q) (ETV (:: (S (S Z)) (:: $_31752 $_31770)) (STV (/ (+ (* $_31800 (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818)))) 1) (+ (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818))) 1)) (/ (+ (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818))) 1) (+ (+ (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818))) 1) 1.0))))))) (let* (((: $_31674 (≞ (→ P Q) (ETV (:: $_31752 $_31770) (STV $_31800 $_31818)))) (synthesize (: $_31674 (≞ (→ P Q) (ETV (:: $_31752 $_31770) (STV $_31800 $_31818)))) kb rb Z)) ((: $_31998 (⍃ $_31752 (S (S (S Z))))) (synthesize (: $_31998 (⍃ $_31752 (S (S (S Z))))) kb rb Z))) (: (IDIRecursive P3 Q3 $_31674 $_31998) (≞ (→ P Q) (ETV (:: (S (S (S Z))) (:: $_31752 $_31770)) (STV (/ (+ (* $_31800 (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818)))) 1) (+ (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818))) 1)) (/ (+ (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818))) 1) (+ (+ (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818))) 1) 1.0))))))) (let* (((: $_31674 (≞ (→ P Q) (ETV (:: $_31752 $_31770) (STV $_31800 $_31818)))) (synthesize (: $_31674 (≞ (→ P Q) (ETV (:: $_31752 $_31770) (STV $_31800 $_31818)))) kb rb Z)) ((: $_31998 (⍃ $_31752 (S (S (S (S (S (S (S Z))))))))) (synthesize (: $_31998 (⍃ $_31752 (S (S (S (S (S (S (S Z))))))))) kb rb Z))) (: (IDIRecursive P7 Q7 $_31674 $_31998) (≞ (→ P Q) (ETV (:: (S (S (S (S (S (S (S Z))))))) (:: $_31752 $_31770)) (STV (/ (+ (* $_31800 (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818)))) 1) (+ (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818))) 1)) (/ (+ (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818))) 1) (+ (+ (if (<= (if (< (- 1.0 $_31818) 0) (* -1 (- 1.0 $_31818)) (- 1.0 $_31818)) 1.0e-9) (max-count) (/ (* $_31818 (lookahead)) (- 1.0 $_31818))) 1) 1.0))))))) (let* (((: $_36966 (≞ (→ P Q) (ETV (:: $_37044 $_37062) (STV $_37092 $_37110)))) (synthesize (: $_36966 (≞ (→ P Q) (ETV (:: $_37044 $_37062) (STV $_37092 $_37110)))) kb rb Z)) ((: $_37290 (⍃ $_37044 (S (S Z)))) (synthesize (: $_37290 (⍃ $_37044 (S (S Z)))) kb rb Z))) (: (IDIRecursive P2 Q2 $_36966 $_37290) (≞ (→ P Q) (ETV (:: (S (S Z)) (:: $_37044 $_37062)) (STV (/ (* $_37092 (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110)))) (+ (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110))) 1)) (/ (+ (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110))) 1) (+ (+ (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110))) 1) 1.0))))))) (let* (((: $_38688 (⊷ Q (S (S (S Z))) False)) (synthesize (: $_38688 (⊷ Q (S (S (S Z))) False)) kb rb Z)) ((: $_36966 (≞ (→ P Q) (ETV (:: $_37044 $_37062) (STV $_37092 $_37110)))) (synthesize (: $_36966 (≞ (→ P Q) (ETV (:: $_37044 $_37062) (STV $_37092 $_37110)))) kb rb Z)) ((: $_37290 (⍃ $_37044 (S (S (S Z))))) (synthesize (: $_37290 (⍃ $_37044 (S (S (S Z))))) kb rb Z))) (: (IDIRecursive P3 $_38688 $_36966 $_37290) (≞ (→ P Q) (ETV (:: (S (S (S Z))) (:: $_37044 $_37062)) (STV (/ (* $_37092 (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110)))) (+ (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110))) 1)) (/ (+ (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110))) 1) (+ (+ (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110))) 1) 1.0))))))) (let* (((: $_38688 (⊷ Q (S (S (S (S (S (S (S Z))))))) False)) (synthesize (: $_38688 (⊷ Q (S (S (S (S (S (S (S Z))))))) False)) kb rb Z)) ((: $_36966 (≞ (→ P Q) (ETV (:: $_37044 $_37062) (STV $_37092 $_37110)))) (synthesize (: $_36966 (≞ (→ P Q) (ETV (:: $_37044 $_37062) (STV $_37092 $_37110)))) kb rb Z)) ((: $_37290 (⍃ $_37044 (S (S (S (S (S (S (S Z))))))))) (synthesize (: $_37290 (⍃ $_37044 (S (S (S (S (S (S (S Z))))))))) kb rb Z))) (: (IDIRecursive P7 $_38688 $_36966 $_37290) (≞ (→ P Q) (ETV (:: (S (S (S (S (S (S (S Z))))))) (:: $_37044 $_37062)) (STV (/ (* $_37092 (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110)))) (+ (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110))) 1)) (/ (+ (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110))) 1) (+ (+ (if (<= (if (< (- 1.0 $_37110) 0) (* -1 (- 1.0 $_37110)) (- 1.0 $_37110)) 1.0e-9) (max-count) (/ (* $_37110 (lookahead)) (- 1.0 $_37110))) 1) 1.0))))))) (let* (((: $_42876 (⊷ Q (S (S (S Z))) False)) (synthesize (: $_42876 (⊷ Q (S (S (S Z))) False)) kb rb Z))) (: (IDIBase P3 $_42876) (≞ (→ P Q) (ETV (:: (S (S (S Z))) ∅) (STV 0 0.5))))) (let* (((: $_42876 (⊷ Q (S (S (S (S (S (S (S Z))))))) False)) (synthesize (: $_42876 (⊷ Q (S (S (S (S (S (S (S Z))))))) False)) kb rb Z))) (: (IDIBase P7 $_42876) (≞ (→ P Q) (ETV (:: (S (S (S (S (S (S (S Z))))))) ∅) (STV 0 0.5))))) (let* (((: $_43812 (⊷ Q (S (S Z)) True)) (synthesize (: $_43812 (⊷ Q (S (S Z)) True)) kb rb Z))) (: (IDIBase P2 $_43812) (≞ (→ P Q) (ETV (:: (S (S Z)) ∅) (STV 1 0.5)))))) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.10](https://logicmoo.org/public/mettareports/_69240.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.10) | (assertEqualToResult (prodWith . (Cons g Nil) (Cons f Nil))) | ((Cons (. g f) Nil)) | ((Cons (. g f) Nil)) | | PASS | [METTA-MORPH-TESTS.TESTS0.03](https://logicmoo.org/public/mettareports/_69492.metta.html#METTA-MORPH-TESTS.TESTS0.03) | (assertEqualToResult (|- (({(a b) } --> mwawa) (1.0 0.9)))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | | FAIL | [RESOLVE.R.06](https://logicmoo.org/public/mettareports/_69730.metta.html#RESOLVE.R.06) | (assertEqualToResult (r::self-from-self)) | ((r::self-from-self)) | (content) | | PASS | [DEPENDENT-TYPES.MINERDTLTEST.05](https://logicmoo.org/public/mettareports/_69878.metta.html#DEPENDENT-TYPES.MINERDTLTEST.05) | (assertEqualToResult (init-miner &db (ms) (highsurp))) | ((init-miner &db 1 0.8)) | ((init-miner GroundingSpace-0x55a21dc614d8 1 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14](https://logicmoo.org/public/mettareports/_70166.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14) | (assertEqual (g 2)) | (102 102 102 102) | (102) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://logicmoo.org/public/mettareports/_70386.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &belief_events $1 $1) ((%void% 42)))) | () | () | | PASS | [FORWARD-CHAINING.FC-XP.22](https://logicmoo.org/public/mettareports/_70480.metta.html#FORWARD-CHAINING.FC-XP.22) | (assertEqualToResult (add-atom &kb_em (→ A B))) | () | (()) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.22](https://logicmoo.org/public/mettareports/_70492.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.22) | (assertEqualToResult (add-atom &kb_em (→ A B))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20](https://logicmoo.org/public/mettareports/_70878.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20) | (assertEqualToResult (get-type (fmap (curry-a + 2) (Left "5")))) | () | () | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_71382.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | FAIL | [NEW.TESTS5.10](https://logicmoo.org/public/mettareports/_715520.metta.html#NEW.TESTS5.10) | (assertEqual (EternalQuestion (sheep --> ([(see) ])))) | ((Event (None (0.5 0.0)) (eternal Nil 0.0))) | ((Event ((sheep --> ([(see) ])) (1.0 0.28712091374556914)) (eternal (5 4 3) (0 0.0)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04](https://logicmoo.org/public/mettareports/_71658.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04) | (assertEqualToResult (match &self (, (implies ($P $x) (Green $x)) (implies ($P $x) (Eats-flies $x))) (Then it is definitely $P))) | ((Then it is definitely Frog)) | ((Then it is definitely Frog)) | | PASS | [NEW.TESTS2.08](https://logicmoo.org/public/mettareports/_717042.metta.html#NEW.TESTS2.08) | (assertEqualToResult (AddBeliefEvent (ballhit (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02](https://logicmoo.org/public/mettareports/_71750.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02) | (assertEqualToResult (match &self ($who is a $what) ($who the $what))) | ((Sam the frog) (Tom the cat) (Sophia the robot)) | ((Sam the frog) (Sophia the robot) (Tom the cat)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04](https://logicmoo.org/public/mettareports/_71762.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04) | (assertEqualToResult (get-type (+ 5 "4"))) | (Number) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04](https://logicmoo.org/public/mettareports/_71776.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04) | (assertEqualToResult (get-type (+ 5 "4"))) | (Number) | () | | FAIL | [HYPERON-METTALOG-SANITY.00-LANG-CASE.13](https://logicmoo.org/public/mettareports/_71856.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.13) | (assertEqual (match &self $1 $1)) | ((Rel-P A B) (Rel-Q A C)) | ((= (Rel-P P P P) 10) (Rel-P A B) (Rel-Q A C)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://logicmoo.org/public/mettareports/_72186.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07](https://logicmoo.org/public/mettareports/_72504.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07) | (assertEqualToResult (get-type ((curry-a + 2) "S"))) | (Number) | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.07](https://logicmoo.org/public/mettareports/_72548.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.07) | (assertEqual (case (+ 1 (superpose (1 2 3))) ((3 OK-3) (4 OK-4)))) | (OK-3 OK-4) | (OK-3 OK-4) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://logicmoo.org/public/mettareports/_7254.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04](https://logicmoo.org/public/mettareports/_72718.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04) | (assertEqualToResult (get-type (+ 5 "4"))) | (Number) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04](https://logicmoo.org/public/mettareports/_72732.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04) | (assertEqualToResult (get-type (+ 5 "4"))) | (Number) | () | | FAIL | [BASIC.STATE-TYPES.04](https://logicmoo.org/public/mettareports/_72784.metta.html#BASIC.STATE-TYPES.04) | (assertEqualToResult ("(get-type A-first)=" (get-type (get-state &a-first)))) | (("(get-type A-first)=" ABType)) | (("(get-type A-first)=" Symbol)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14](https://logicmoo.org/public/mettareports/_72812.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14) | (assertEqual ((inc) 5)) | (6) | (6) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04](https://logicmoo.org/public/mettareports/_72940.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04) | (assertEqual (get-type (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | (Type) | (Type) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03](https://logicmoo.org/public/mettareports/_73368.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03) | (assertEqual (insert 2 (insert 1 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | FAIL | [HYPERON-METTALOG-SANITY.00-LANG-CASE.13](https://logicmoo.org/public/mettareports/_73732.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.13) | (assertEqual (match &self $1 $1)) | ((Rel-P A B) (Rel-Q A C)) | ((= (Rel-P P P P) 10) (Rel-P A B) (Rel-Q A C)) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_74058.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [NEW.TESTS2.07](https://logicmoo.org/public/mettareports/_741452.metta.html#NEW.TESTS2.07) | (assertEqualToResult (AddBeliefEvent ((^ left) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02](https://logicmoo.org/public/mettareports/_74270.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02) | (assertEqual (TV (FA))) | ((stv 0.4 0.8)) | ((stv 0.4 0.8)) | | PASS | [BACKWARD-CHAINING.BC-XP.32](https://logicmoo.org/public/mettareports/_74284.metta.html#BACKWARD-CHAINING.BC-XP.32) | (assertEqual (bc_em (→ A B) (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.32](https://logicmoo.org/public/mettareports/_74308.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.32) | (assertEqual (bc_em (→ A B) (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07](https://logicmoo.org/public/mettareports/_74458.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07) | (assertEqual (get-type (Left 5))) | (Either) | (Either) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02](https://logicmoo.org/public/mettareports/_74596.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01](https://logicmoo.org/public/mettareports/_75424.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01) | (assertEqualToResult (match &kb (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17](https://logicmoo.org/public/mettareports/_75450.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17) | (assertEqual (g 2)) | (102 102 102 102 102 102 102 102 102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13](https://logicmoo.org/public/mettareports/_75540.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13) | (assertEqualToResult (== 4 (+ ln 2))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13](https://logicmoo.org/public/mettareports/_75554.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13) | (assertEqualToResult (== 4 (+ ln 2))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02](https://logicmoo.org/public/mettareports/_75604.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02) | (assertEqual (collapse (match &self (= (shape) $x) $x))) | () | () | | PASS | [REPORTS.SETTINGS.01](https://logicmoo.org/public/mettareports/_75718.metta.html#REPORTS.SETTINGS.01) | (assertEqualToResult (like-metta-in-rust)) | ((like-metta-in-rust)) | ((like-metta-in-rust)) | | PASS | [CURRENT.TESTS3.01](https://logicmoo.org/public/mettareports/_75856.metta.html#CURRENT.TESTS3.01) | (assertEqualToResult (AddBeliefEvent (((corridorIn &/ (^ forward)) =/> doorAt) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10](https://logicmoo.org/public/mettareports/_76004.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10) | (assertEqual ((curry-a is Socrates) Human)) | (True) | (True) | | PASS | [BASIC.KEY-LOOKUPS-MANY.04](https://logicmoo.org/public/mettareports/_76040.metta.html#BASIC.KEY-LOOKUPS-MANY.04) | (assertEqual (let $v (new-state v-3) (match &data (= (get-data $k) $v) $k))) | (k-3) | (k-3) | | FAIL | [COMMON.NUMTEST.10](https://logicmoo.org/public/mettareports/_76074.metta.html#COMMON.NUMTEST.10) | (assertEqual (synthesize (: $proof (⍃ (fromNumber 2) (fromNumber 7))) kb rb (fromNumber 5))) | () | ((: (SuccMonotonicity (SuccMonotonicity ZeroLTSucc)) (⍃ (fromNumber 2) (fromNumber 7)))) | | PASS | [DEPENDENT-TYPES.MINERCURRIEDDTL.07](https://logicmoo.org/public/mettareports/_760900.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTL.07) | (assertEqualToResult (let* ((($link $a $b) (abstract-patterns)) ($aptrn ($link (VarIdx Z) (VarIdx (S Z))))) (superpose ((add-atom &kb (: (sp_witness $sptrn) (specializationOf (specialize $link) $aptrn... | () | () | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.03](https://logicmoo.org/public/mettareports/_76236.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.03) | (assertEqualToResult (TupleConcat (a b c) ())) | ((a b c)) | ((a b c)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/_76294.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | ((= (= $_73924 $_73924) T)) | (T) | | PASS | [SOME.UNIT-TEST.07](https://logicmoo.org/public/mettareports/_76498.metta.html#SOME.UNIT-TEST.07) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [POLYWARD-CHAINING.PC-XP.03](https://logicmoo.org/public/mettareports/_76672.metta.html#POLYWARD-CHAINING.PC-XP.03) | (assertEqualToResult (add-atom &kb (: bc (→ B C)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20](https://logicmoo.org/public/mettareports/_7668.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20) | (assertEqualToResult (match &self (= (eq (Add (S Z) Z) (S Z)) $tv) $tv)) | () | () | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04](https://logicmoo.org/public/mettareports/_76948.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04) | (assertEqual (match &kb ($rel A_AS $x) ($rel $x))) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07](https://logicmoo.org/public/mettareports/_77244.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07) | (assertEqual (get-type (Left 5))) | (Either) | (Either) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05](https://logicmoo.org/public/mettareports/_77438.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05) | (assertEqualToResult (get-type (+ -))) | (Number) | () | | PASS | [NEW.TESTS5.06](https://logicmoo.org/public/mettareports/_775612.metta.html#NEW.TESTS5.06) | (assertEqualToResult (AddBeliefEvent ((sheep --> ([(white) ])) (1.0 0.9)))) | () | () | | PASS | [NEW.TESTS5.02](https://logicmoo.org/public/mettareports/_777402.metta.html#NEW.TESTS5.02) | (assertEqualToResult (AddBeliefEvent ((((sheep --> ([(see) ])) &/ (^ count)) =/> (sheep --> ([(counted) ]))) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04](https://logicmoo.org/public/mettareports/_77772.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) $r)) | ((Add (S (S Z)) Z)) | ((Add (S (S Z)) Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01](https://logicmoo.org/public/mettareports/_78104.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01) | (assertEqualToResult (+ 2 (* 3 5.5))) | (18.5) | (18.5) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.11](https://logicmoo.org/public/mettareports/_78160.metta.html#FORMULA.DEDUCTIONFORMULATEST.11) | (assertEqualToResult (conditional-probability-consistency 0.3 0.4 0.9)) | (True True True True True True True True True True True True True True True True True True True True... | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10](https://logicmoo.org/public/mettareports/_79016.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10) | (assertEqual (is (air dry))) | ((start humidifier) (start kettle) (stop ventilation)) | ((stop ventilation) (start kettle) (start humidifier)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06](https://logicmoo.org/public/mettareports/_7910.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06) | (assertEqual (get-type Either)) | (Type) | (Type) | | PASS | [ITERATIVE-CHAINING.IBC-XP.01](https://logicmoo.org/public/mettareports/_79864.metta.html#ITERATIVE-CHAINING.IBC-XP.01) | (assertEqualToResult (add-atom &kb (: ab (→ A B)))) | () | (()) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.02](https://logicmoo.org/public/mettareports/_7986.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.02) | (assertEqualToResult (TupleConcat () (e f g))) | ((e f g)) | ((e f g)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01](https://logicmoo.org/public/mettareports/_79934.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01) | (assertEqualToResult (match &kb (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://logicmoo.org/public/mettareports/_80524.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [NEW.TESTS5.03](https://logicmoo.org/public/mettareports/_808066.metta.html#NEW.TESTS5.03) | (assertEqualToResult ("current time")) | (("current time")) | (("current time")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://logicmoo.org/public/mettareports/_80992.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://logicmoo.org/public/mettareports/_80998.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | (T) | (T) | | PASS | [BACKWARD-CHAINING.BC-XP.11](https://logicmoo.org/public/mettareports/_81036.metta.html#BACKWARD-CHAINING.BC-XP.11) | (assertEqual (bc_eq (→ B C) kb_eq (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.11](https://logicmoo.org/public/mettareports/_81052.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.11) | (assertEqual (bc_eq (→ B C) kb_eq (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01](https://logicmoo.org/public/mettareports/_81162.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01) | (assertEqualToResult (+ 2 (* 3 5.5))) | (18.5) | (18.5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04](https://logicmoo.org/public/mettareports/_81408.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) $r)) | ((Add (S (S Z)) Z)) | ((Add (S (S Z)) Z)) | | PASS | [POLYWARD-CHAINING.PC-XP.12](https://logicmoo.org/public/mettareports/_81598.metta.html#POLYWARD-CHAINING.PC-XP.12) | (assertEqual (bc (: $prf (→ A C)) (fromNumber 2))) | ((: (Deduction ab bc) (→ A C))) | ((: (Deduction ab bc) (→ A C))) | | PASS | [POLYWARD-CHAINING.PC-XP.10](https://logicmoo.org/public/mettareports/_81902.metta.html#POLYWARD-CHAINING.PC-XP.10) | (assertEqual (bc (: $prf B) (fromNumber 1))) | ((: (ModusPonens ab a) B)) | ((: (ModusPonens ab a) B)) | | PASS | [BASIC.CML-UNSHARED.05](https://logicmoo.org/public/mettareports/_82090.metta.html#BASIC.CML-UNSHARED.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [BASIC.HYPERPOSING.05](https://logicmoo.org/public/mettareports/_82090.metta.html#BASIC.HYPERPOSING.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02](https://logicmoo.org/public/mettareports/_82282.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02) | (assertEqualToResult (nop (change-state! (status (Goal lunch-order)) active))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://logicmoo.org/public/mettareports/_82366.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://logicmoo.org/public/mettareports/_82378.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | PASS | [DEPENDENT-TYPES.MINERCURRIEDDTL.08](https://logicmoo.org/public/mettareports/_824064.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTL.08) | (assertEqualToResult (add-atom &kb (: minsupport (-> (supportOf $ptrn $cnt) (-> (ms_threshold $ms) (-> (⍃ $ms $cnt) (minsup $ptrn))))))) | () | (()) | | FAIL | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.01](https://logicmoo.org/public/mettareports/_825208.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.01) | (assertEqualToResult =====) | (=====) | ("===== Test base rule (built-in type checker) =====") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04](https://logicmoo.org/public/mettareports/_82590.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) $r)) | ((Add (S (S Z)) Z)) | ((Add (S (S Z)) Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05](https://logicmoo.org/public/mettareports/_82724.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05) | (assertEqual (let $v (new-state 1) (get-type $v))) | ((StateMonad Number)) | ((StateMonad Number)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_83074.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.05) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://logicmoo.org/public/mettareports/_83128.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $tv) $tv)) | (F) | (F) | | PASS | [DEPENDENT-TYPES.MINERCURRIEDDTL.03](https://logicmoo.org/public/mettareports/_83228.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTL.03) | (assertEqualToResult (add-atom &db (Inheritance D E))) | () | (()) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02](https://logicmoo.org/public/mettareports/_83302.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01](https://logicmoo.org/public/mettareports/_83650.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01) | (assertEqualToResult (+ 2 (* 3 5.5))) | (18.5) | (18.5) | | PASS | [LOCATED.LOCATED-TEST.03](https://logicmoo.org/public/mettareports/_84298.metta.html#LOCATED.LOCATED-TEST.03) | (assertEqualToResult (synthesize (: $proof (located John SanJose)) kb rb (fromNumber 3))) | ((: (ModusPonens (WitnessOf (⟹ (∧ (located John JohnsHouse) (located JohnsHouse SanJose)) (locat... | ((: (ModusPonens (WitnessOf (⟹ (∧ (located John JohnsHouse) (located JohnsHouse SanJose)) (located John SanJose))) (BinaryConjunctionIntroduction (ModusPonens (WitnessOf (⟹ (orientation John JohnsHouse Inside) (located John JohnsHouse))) (WitnessOf (orientation John JohnsHouse Inside))) (WitnessOf (located JohnsHouse SanJose)))) (located John SanJose)) (let* (((: $_4120 (orientation John SanJose Inside)) (synthesize (: $_4120 (orientation John SanJose Inside)) kb rb (S (S Z))))) (: (ModusPonens (WitnessOf (⟹ (orientation John SanJose Inside) (located John SanJose))) $_4120) (located John SanJose)))) | | PASS | [NEW.TESTS2.05](https://logicmoo.org/public/mettareports/_844846.metta.html#NEW.TESTS2.05) | (assertEqualToResult (AddBeliefEvent ((^ left) (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01](https://logicmoo.org/public/mettareports/_84726.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01) | (assertEqual (get-type (Mortal Plato))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14](https://logicmoo.org/public/mettareports/_8480.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14) | (assertEqual (let (List $t) (get-type (Cons 5 (Cons 6 Nil))) $t)) | (Number) | (Number) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.06](https://logicmoo.org/public/mettareports/_84916.metta.html#METTA-MORPH-TESTS.STATES-SPACES.06) | (assertEqual (match &WU $1 $1)) | (b) | (b) | | FAIL | [ITERATIVE-CHAINING.IFC-XP.01](https://logicmoo.org/public/mettareports/_84970.metta.html#ITERATIVE-CHAINING.IFC-XP.01) | (assertEqualToResult ===) | (===) | ("=== Test Forward Bare Entail ===") | | FAIL | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.08](https://logicmoo.org/public/mettareports/_850418.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.08) | (assertEqualToResult (synthesize (: $proof (⍃ (fromNumber 2) (fromNumber 7))) kb rb (fromNumber 2))) | () | ((: (SuccMonotonicity (SuccMonotonicity ZeroLTSucc)) (⍃ (S (S Z)) (S (S (S (S (S (S (S Z)))))))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02](https://logicmoo.org/public/mettareports/_85118.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02) | (assertEqualToResult (match &self ($p is-a Color) $p)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12](https://logicmoo.org/public/mettareports/_85126.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12) | (assertEqual (of-same-type Color Shape)) | (T) | (T) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_85176.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_85182.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06](https://logicmoo.org/public/mettareports/_85246.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06) | (assertEqual (if (== (get-state (status (Goal $goal))) active) $goal (superpose ()))) | () | (lunch-order) | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/_85272.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/_85814.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.03) | (assertEqualToResult (add-atom &kb (: ModusPonens (-> (→ $p $q) (-> $p $q))))) | () | (()) | | PASS | [ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.04](https://logicmoo.org/public/mettareports/_85906.metta.html#ENTAIL.IMPLICATIONDIRECTINTRODUCTIONENTAILTEST.04) | (assertEqualToResult (match &self (⊢ (≞ (→ P Q) $tv)) $tv)) | ((ETV (STV 1 0))) | ((ETV (STV 1 0))) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.03](https://logicmoo.org/public/mettareports/_85918.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.03) | (assertEqual ((superpose (1 2 3)))) | ((1) (2) (3)) | ((1) (2) (3)) | | PASS | [EXPERIMENTS.NON-DETERMINISM.02](https://logicmoo.org/public/mettareports/_86208.metta.html#EXPERIMENTS.NON-DETERMINISM.02) | (assertEqualToResult (bar 2)) | (3 4 2 2) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26](https://logicmoo.org/public/mettareports/_86428.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02](https://logicmoo.org/public/mettareports/_8644.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02) | (assertEqualToResult (expression without known equalities)) | ((expression without known equalities)) | ((expression without known equalities)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://logicmoo.org/public/mettareports/_86654.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | PASS | [BACKWARD-CHAINING.BC-XP.31](https://logicmoo.org/public/mettareports/_8670.metta.html#BACKWARD-CHAINING.BC-XP.31) | (assertEqualToResult (bc_em C (fromNumber 2))) | (C C) | (C) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.31](https://logicmoo.org/public/mettareports/_8678.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.31) | (assertEqualToResult (bc_em C (fromNumber 2))) | (C C) | (C) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://logicmoo.org/public/mettareports/_86850.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [COMMON.MAYBETEST.01](https://logicmoo.org/public/mettareports/_87046.metta.html#COMMON.MAYBETEST.01) | (assertEqualToResult (Maybe< (Just 10) (Just 20))) | (True) | (True) | | PASS | [FORWARD-CHAINING.FC-XP.06](https://logicmoo.org/public/mettareports/_87444.metta.html#FORWARD-CHAINING.FC-XP.06) | (assertEqualToResult (fc_bare A kb_bare rb_bare (fromNumber 2))) | (A B C) | (A B C) | | PASS | [FORWARD-CHAINER.FORWARD-CHAINER-XP.06](https://logicmoo.org/public/mettareports/_87450.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-XP.06) | (assertEqualToResult (fc_bare A kb_bare rb_bare (fromNumber 2))) | (A B C) | (A B C) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_87520.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/_87526.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03](https://logicmoo.org/public/mettareports/_87630.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03) | (assertEqual (Add (S Z) (S Z))) | ((S (S Z))) | ((S (S Z))) | | PASS | [BASIC.HYPERPOSING-SHARED.05](https://logicmoo.org/public/mettareports/_87718.metta.html#BASIC.HYPERPOSING-SHARED.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [BASIC.HYPERPOSING-UNSHARED.05](https://logicmoo.org/public/mettareports/_87718.metta.html#BASIC.HYPERPOSING-UNSHARED.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [COMPARISONS.ADD-ATOM-NAIVE-FIB.07](https://logicmoo.org/public/mettareports/_88242.metta.html#COMPARISONS.ADD-ATOM-NAIVE-FIB.07) | (assertEqualToResult (add-atom &other2 (= (foo) foo2))) | () | (()) | | PASS | [DEPENDENT-TYPES.MINERCURRIEDDTL.09](https://logicmoo.org/public/mettareports/_884052.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTL.09) | (assertEqualToResult (add-atom &kb (: apriori-rule (-> (minsup $aptrn) (-> (specializationOf $sptrn $aptrn) (supportOf $sptrn (countNat $sptrn))))))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.03](https://logicmoo.org/public/mettareports/_88554.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.03) | (assertEqual ((superpose (1 2 3)))) | ((1) (2) (3)) | ((1) (2) (3)) | | PASS | [PREV.TESTS0.03](https://logicmoo.org/public/mettareports/_88570.metta.html#PREV.TESTS0.03) | (assertEqualToResult (|- (({(a b) } --> mwawa) (1.0 0.9)))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://logicmoo.org/public/mettareports/_8858.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | PASS | [METTA-MORPH-TESTS.TESTS0.03](https://logicmoo.org/public/mettareports/_88672.metta.html#METTA-MORPH-TESTS.TESTS0.03) | (assertEqualToResult (|- (({(a b) } --> mwawa) (1.0 0.9)))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | | PASS | [CURRENT.TESTS4.01](https://logicmoo.org/public/mettareports/_88788.metta.html#CURRENT.TESTS4.01) | (assertEqualToResult (AddBeliefEvent (({(garfield) } --> cat) (1.0 0.9)))) | () | () | | PASS | [METTA-MORPH-TESTS.TESTS0.01](https://logicmoo.org/public/mettareports/_891074.metta.html#METTA-MORPH-TESTS.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | PASS | [HOL.NATDTLTEST.02](https://logicmoo.org/public/mettareports/_89320.metta.html#HOL.NATDTLTEST.02) | (assertEqualToResult (add-atom &kb (: $x Variable))) | () | (()) | | PASS | [INFERENCE-CONTROL.INF-CTL-XP.02](https://logicmoo.org/public/mettareports/_89324.metta.html#INFERENCE-CONTROL.INF-CTL-XP.02) | (assertEqual (bc depth-updater depth-updater depth-terminator (fromNumber 2) (: $prf A))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05](https://logicmoo.org/public/mettareports/_89656.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) (match &self (:= $r $r2) $r2))) | ((S (S Z))) | ((S (S Z))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://logicmoo.org/public/mettareports/_90274.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/_90320.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_79506)) | ((State (A B) $_79506)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://logicmoo.org/public/mettareports/_9034.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17](https://logicmoo.org/public/mettareports/_90536.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17) | (assertEqual (g 2)) | (102 102 102 102 102 102 102 102 102) | (102) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06](https://logicmoo.org/public/mettareports/_90666.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06) | (assertEqual (if (== (get-state (status (Goal $goal))) active) $goal (superpose ()))) | () | (lunch-order) | | FAIL | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.09](https://logicmoo.org/public/mettareports/_907124.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.09) | (assertEqualToResult rule) | (rule) | ("===== Prove that 2 < 3 (synthesizer) =====") | | FAIL | [FORWARD-CHAINER.FORWARD-CHAINER-TEST.01](https://logicmoo.org/public/mettareports/_90750.metta.html#FORWARD-CHAINER.FORWARD-CHAINER-TEST.01) | (assertEqualToResult ===) | (===) | ("=== Entail ===") | | PASS | [COMMON.LISTTEST.08](https://logicmoo.org/public/mettareports/_90946.metta.html#COMMON.LISTTEST.08) | (assertEqualToResult (sort (Cons 2 (Cons 1 Nil)))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://logicmoo.org/public/mettareports/_91378.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03](https://logicmoo.org/public/mettareports/_9142.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03) | (assertEqual (Add (S Z) Z)) | ((S Z)) | ((S Z)) | | PASS | [EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.06](https://logicmoo.org/public/mettareports/_9174.metta.html#EXPERIMENTS.SYNTHESIZE-VIA-TYPE-CHECKING.06) | (assertEqualToResult (prodWith * Nil (Cons 2 Nil))) | (Nil) | (Nil) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://logicmoo.org/public/mettareports/_91766.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $tv) $tv)) | (F) | (F) | | PASS | [HOL.NATSTANDALONETEST.06](https://logicmoo.org/public/mettareports/_91816.metta.html#HOL.NATSTANDALONETEST.06) | (assertEqualToResult (add-atom &kb (: plusBase (=== (plus Z $y) $y)))) | () | (()) | | PASS | [ITERATIVE-CHAINING.IBC-XP.06](https://logicmoo.org/public/mettareports/_9184.metta.html#ITERATIVE-CHAINING.IBC-XP.06) | (assertEqualToResult (add-atom &kb (: -> (-> $q $r) (-> (-> $p $q) (-> $p $r))))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04](https://logicmoo.org/public/mettareports/_92094.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04) | (assertEqual (Add Z (S Z))) | ((S Z)) | ((S Z)) | | PASS | [METTA-MORPH-TESTS.TESTS0.06](https://logicmoo.org/public/mettareports/_922448.metta.html#METTA-MORPH-TESTS.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A | B) --> cat) (1.0... | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | PASS | [ITERATIVE-CHAINING.IBC-XP.32](https://logicmoo.org/public/mettareports/_92512.metta.html#ITERATIVE-CHAINING.IBC-XP.32) | (assertEqualToResult (add-atom &kb (: ef (→ E F)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01](https://logicmoo.org/public/mettareports/_9314.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01) | (assertEqualToResult (ift (green $x) (add-atom &kb (Green $x)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03](https://logicmoo.org/public/mettareports/_93158.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03) | (assertEqual (Add (S Z) (S Z))) | ((S (S Z))) | ((S (S Z))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://logicmoo.org/public/mettareports/_93444.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | FAIL | [EXAMPLES.EXPRESSION.02](https://logicmoo.org/public/mettareports/_93580.metta.html#EXAMPLES.EXPRESSION.02) | (assertEqualToResult ((ana mapExpr nTimes) (, 2 (S (S Z))))) | ((Fix (mapExpr (ana mapExpr nTimes) (nTimes (S (S Z)))))) | ((Fix (Plus (Fix (Const 2)) (Fix (Const 2))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18](https://logicmoo.org/public/mettareports/_93702.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18) | (assertEqualToResult (bin)) | (0 1) | (0 1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03](https://logicmoo.org/public/mettareports/_93848.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03) | (assertEqual (Add (S Z) (S Z))) | ((S (S Z))) | ((S (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03](https://logicmoo.org/public/mettareports/_93862.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03) | (assertEqual (Add (S Z) (S Z))) | ((S (S Z))) | ((S (S Z))) | | PASS | [BACKWARD-CHAINING.BC-XP.41](https://logicmoo.org/public/mettareports/_93930.metta.html#BACKWARD-CHAINING.BC-XP.41) | (assertEqual (bc_dem (: $prf B) (fromNumber 1))) | ((: (ModusPonens ab a) B)) | ((: (ModusPonens ab a) B)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.41](https://logicmoo.org/public/mettareports/_93954.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.41) | (assertEqual (bc_dem (: $prf B) (fromNumber 1))) | ((: (ModusPonens ab a) B)) | ((: (ModusPonens ab a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02](https://logicmoo.org/public/mettareports/_93958.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02) | (assertEqual (get-type (drop (Cons 1 Nil)))) | ((Vec Number Z)) | ((Vec Number Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10](https://logicmoo.org/public/mettareports/_9410.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10) | (assertEqual (get-state (get-token))) | ((C D)) | ((C D)) | | PASS | [METTA-MORPH-TESTS.TESTS0.04](https://logicmoo.org/public/mettareports/_943872.metta.html#METTA-MORPH-TESTS.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [DEPENDENT-TYPES.MINERCURRIEDDTL.10](https://logicmoo.org/public/mettareports/_945972.metta.html#DEPENDENT-TYPES.MINERCURRIEDDTL.10) | (assertEqualToResult (add-atom &kb (: support-cnj (-> (minsup $ptrn1) (-> (minsup $ptrn2) (supportOf (, $ptrn1 $ptrn2) (countNat (, $ptrn1 $ptrn2)))))))) | () | (()) | | PASS | [DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.02](https://logicmoo.org/public/mettareports/_950832.metta.html#DEPENDENT-TYPES.IMPLICATIONDIRECTINTRODUCTIONDTLTEST.02) | (assertEqualToResult (base_prf)) | ((base_prf)) | ((base_prf)) | | PASS | [METTA-MORPH-TESTS.NALIFIER.01](https://logicmoo.org/public/mettareports/_95210.metta.html#METTA-MORPH-TESTS.NALIFIER.01) | (assertEqualToResult (let ($S $EV) (choiceQuery (((ExtSet sam) --> duck) ((ExtSet sam) --> swan) ((ExtSet sam) --> dog))) $S)) | ((((ExtSet sam) --> duck) (1.0 0.6183206106870229))) | ((((ExtSet sam) --> duck) (1.0 0.618320610687023))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11](https://logicmoo.org/public/mettareports/_9534.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11) | (assertEqual (get-type (pair (LeftP 5) "String"))) | ((Pair (EitherP Number) String)) | ((Pair (EitherP Number) String)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07](https://logicmoo.org/public/mettareports/_9548.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07) | (assertEqualToResult (get-type (= SocratesIsHuman PlatoIsHuman))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08](https://logicmoo.org/public/mettareports/_95490.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08) | (assertEqualToResult (get-type (= SocratesIsHuman SocratesIsMortal))) | (Type) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/_95514.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_90108)) | ((State 1 $_90108)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03](https://logicmoo.org/public/mettareports/_95696.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03) | (assertEqual (insert 2 (insert 1 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [NARS-V0.TESTS5.02](https://logicmoo.org/public/mettareports/_95902.metta.html#NARS-V0.TESTS5.02) | (assertEqualToResult (BeliefCycle (get-state ¤tTime))) | () | () | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.06](https://logicmoo.org/public/mettareports/_96010.metta.html#METTA-MORPH-TESTS.STATES-SPACES.06) | (assertEqual (match &WU $1 $1)) | (b) | (b) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.06](https://logicmoo.org/public/mettareports/_96024.metta.html#METTA-MORPH-TESTS.STATES-SPACES.06) | (assertEqual (match &WU $1 $1)) | (b) | (b) | | PASS | [NEW.TESTS2.06](https://logicmoo.org/public/mettareports/_965156.metta.html#NEW.TESTS2.06) | (assertEqualToResult (AddBeliefEvent (ballright (1.0 0.9)))) | () | () | | PASS | [COMMON.ORDEREDSETTEST.06](https://logicmoo.org/public/mettareports/_96522.metta.html#COMMON.ORDEREDSETTEST.06) | (assertEqual (elem 2 (insert 1 (insert 2 (insert 3 ∅))))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18](https://logicmoo.org/public/mettareports/_96594.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18) | (assertEqual (match &self (Green $who) (Green $who))) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://logicmoo.org/public/mettareports/_96830.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://logicmoo.org/public/mettareports/_96930.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | FAIL | [ITERATIVE-CHAINING.IFC-XP.32](https://logicmoo.org/public/mettareports/_9708.metta.html#ITERATIVE-CHAINING.IFC-XP.32) | (assertEqualToResult Entail) | (Entail) | ("=== Test Forward Chainer DTL Match ===") | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://logicmoo.org/public/mettareports/_97214.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/_97226.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_91820)) | ((State 1 $_91820)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02](https://logicmoo.org/public/mettareports/_9726.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02) | (assertEqual (ift (green $x) $x)) | (Fritz) | (Fritz) | | FAIL | [COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.11](https://logicmoo.org/public/mettareports/_97508.metta.html#COMPARISONS.INF-CTL-MONTH-XP-SHORT-3.11) | (assertEqualToResult (add-atom &kb (: ND (≼ Nov Dec)))) | (True) | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09](https://logicmoo.org/public/mettareports/_97590.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09) | (assertEqualToResult (== 4 (+ 2 2))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09](https://logicmoo.org/public/mettareports/_97604.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09) | (assertEqualToResult (== 4 (+ 2 2))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09](https://logicmoo.org/public/mettareports/_97650.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09) | (assertEqualToResult (== 4 (+ 2 2))) | (True) | (True) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://logicmoo.org/public/mettareports/_97776.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &belief_events $1 $1) ((%void% 42)))) | () | () | | PASS | [NEW.TESTS2.01](https://logicmoo.org/public/mettareports/_978626.metta.html#NEW.TESTS2.01) | (assertEqualToResult (AddBeliefEvent (ballleft (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05](https://logicmoo.org/public/mettareports/_97938.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05) | (assertEqual (collapse (shape))) | (((shape))) | (((shape))) | | PASS | [ITERATIVE-CHAINING.IBC-XP.21](https://logicmoo.org/public/mettareports/_98120.metta.html#ITERATIVE-CHAINING.IBC-XP.21) | (assertEqualToResult (get-atoms &space-test)) | (A B C) | (A B C) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/_98424.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [CURRENT.TESTS2.03](https://logicmoo.org/public/mettareports/_98460.metta.html#CURRENT.TESTS2.03) | (assertEqualToResult (AddBeliefEvent (ballhit (1.0 0.9)))) | () | () | | PASS | [NARS-V0.TESTS2.03](https://logicmoo.org/public/mettareports/_98466.metta.html#NARS-V0.TESTS2.03) | (assertEqualToResult (AddBeliefEvent (ballhit (1.0 0.9)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09](https://logicmoo.org/public/mettareports/_98772.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09) | (assertEqualToResult (== 4 (+ 2 2))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09](https://logicmoo.org/public/mettareports/_98786.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09) | (assertEqualToResult (== 4 (+ 2 2))) | (True) | (True) | | FAIL | [DEPENDENT-TYPES.MODUSPONENSDTLTEST.04](https://logicmoo.org/public/mettareports/_98966.metta.html#DEPENDENT-TYPES.MODUSPONENSDTLTEST.04) | (assertEqualToResult (synthesize (: $proof (≞ (see cow rabbit) (STV $s $c))) kb rb (fromNumber 2))) | () | ((: (ModusPonens (ModusPonens cow_is_big x_is_big_chases_dog) cow_chases_dog_sees_rabbit) (≞ (see cow rabbit) (STV 0.975859 0.99))) (let* (((: $_6108 (≞ (→ (→ (big $_6858) (chase $_6858 dog)) (see cow rabbit)) (STV $_6246 $_6264))) (synthesize (: $_6108 (≞ (→ (→ (big $_6858) (chase $_6858 dog)) (see cow rabbit)) (STV $_6246 $_6264))) kb rb (S Z)))) (: (ModusPonens x_is_big_chases_dog $_6108) (≞ (see cow rabbit) (STV (+ (* $_6246 0.99) (* 0.2 (- 1 0.99))) (if (< (if (< $_6264 1) $_6264 1) 0.99) (if (< $_6264 1) $_6264 1) 0.99))))) (let* (((: $_6108 (≞ (→ (→ (chase cow dog) (see cow rabbit)) (see cow rabbit)) (STV $_6246 $_6264))) (synthesize (: $_6108 (≞ (→ (→ (chase cow dog) (see cow rabbit)) (see cow rabbit)) (STV $_6246 $_6264))) kb rb (S Z)))) (: (ModusPonens cow_chases_dog_sees_rabbit $_6108) (≞ (see cow rabbit) (STV (+ (* $_6246 0.99) (* 0.2 (- 1 0.99))) (if (< (if (< $_6264 1) $_6264 1) 0.99) (if (< $_6264 1) $_6264 1) 0.99)))))) | | PASS | [NEW.TESTS5.01](https://logicmoo.org/public/mettareports/_991094.metta.html#NEW.TESTS5.01) | (assertEqualToResult ("sheep see")) | (("sheep see")) | (("sheep see")) | | PASS | [BASIC.HYPERPOSING-SHARED.03](https://logicmoo.org/public/mettareports/_9934.metta.html#BASIC.HYPERPOSING-SHARED.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [BASIC.HYPERPOSING-UNSHARED.03](https://logicmoo.org/public/mettareports/_9934.metta.html#BASIC.HYPERPOSING-UNSHARED.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05](https://logicmoo.org/public/mettareports/_99446.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05) | (assertEqual (let $v (new-state 1) (get-type $v))) | ((StateMonad Number)) | ((StateMonad Number)) | | FAIL | [DISTRIBUTED-PROCESSING.USE-TWO-SERVERS.02](https://logicmoo.org/public/mettareports/_99642.metta.html#DISTRIBUTED-PROCESSING.USE-TWO-SERVERS.02) | (assertEqualToResult (remote-eval "localhost:3025" (match &self (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop)))) | ((remote-eval "localhost:3025" (match &self (, ($_97264 is $_97276) ($_97276 is-a Color) ($_97264 is... | () | | PASS | [COMMON.LISTTEST.17](https://logicmoo.org/public/mettareports/_99758.metta.html#COMMON.LISTTEST.17) | (assertEqualToResult (insert_uniq 2 (insert_uniq 1 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02](https://logicmoo.org/public/mettareports/_99762.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02) | (assertEqualToResult (nop (change-state! (status (Goal lunch-order)) active))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15](https://logicmoo.org/public/mettareports/_99936.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15) | (assertEqual (f 2)) | (103 103 103 103) | (103) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01) | (assertEqualToResult (match &self (($_191758 leaf2) leaf3) $_191758)) | (leaf1 (leaf0 leaf1)) | (leaf1 (leaf0 leaf1)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01) | (assertEqualToResult (match &self (($_63328 leaf2) leaf3) $_63328)) | (leaf1 (leaf0 leaf1)) | (leaf1 (leaf0 leaf1)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01) | (assertEqualToResult (match &self (($x leaf2) leaf3) $x)) | (leaf1 (leaf0 leaf1)) | (leaf1 (leaf0 leaf1)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02) | (assertEqualToResult (match &self ($_123212 is a $_123250) ($_123212 the $_123250))) | ((Sam the frog) (Tom the cat) (Sophia the robot)) | ((Sam the frog) (Sophia the robot) (Tom the cat)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02) | (assertEqualToResult (match &self ($_251642 is a $_251680) ($_251642 the $_251680))) | ((Sam the frog) (Tom the cat) (Sophia the robot)) | ((Sam the frog) (Sophia the robot) (Tom the cat)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02) | (assertEqualToResult (match &self ($who is a $what) ($who the $what))) | ((Sam the frog) (Tom the cat) (Sophia the robot)) | ((Sam the frog) (Sophia the robot) (Tom the cat)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03) | (assertEqualToResult (match &self (:= (Green $_168784) T) ($_168784 is really green))) | ((Sam is really green)) | ((Sam is really green)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03) | (assertEqualToResult (match &self (:= (Green $_297214) T) ($_297214 is really green))) | ((Sam is really green)) | ((Sam is really green)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03) | (assertEqualToResult (match &self (:= (Green $who) T) ($who is really green))) | ((Sam is really green)) | ((Sam is really green)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04) | (assertEqualToResult (match &self (:= ($_195242 $_195264) T) ($_195264 is really $_195242))) | ((Sam is really Green) (Tom is really White)) | ((Sam is really Green) (Tom is really White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04) | (assertEqualToResult (match &self (:= ($_323672 $_323694) T) ($_323694 is really $_323672))) | ((Sam is really Green) (Tom is really White)) | ((Sam is really Green) (Tom is really White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04) | (assertEqualToResult (match &self (:= ($color $who) T) ($who is really $color))) | ((Sam is really Green) (Tom is really White)) | ((Sam is really Green) (Tom is really White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05) | (assertEqualToResult (match &self (:= ($_226392 $_226414) $_226436) ('It's' $_226436 that $_226414 is $_226392))) | (('It's' T that Sam is Green) ('It's' T that Tom is White) ('It's' F that Tom is Green)) | (('It's' F that Tom is Green) ('It's' T that Sam is Green) ('It's' T that Tom is White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05) | (assertEqualToResult (match &self (:= ($_354822 $_354844) $_354866) ('It's' $_354866 that $_354844 is $_354822))) | (('It's' T that Sam is Green) ('It's' T that Tom is White) ('It's' F that Tom is Green)) | (('It's' F that Tom is Green) ('It's' T that Sam is Green) ('It's' T that Tom is White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05) | (assertEqualToResult (match &self (:= ($color $who) $tv) ('It's' $tv that $who is $color))) | (('It's' T that Sam is Green) ('It's' T that Tom is White) ('It's' F that Tom is Green)) | (('It's' F that Tom is Green) ('It's' T that Sam is Green) ('It's' T that Tom is White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $_253922) $_253922)) | (F) | (F) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $_382352) $_382352)) | (F) | (F) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $tv) $tv)) | (F) | (F) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $_275944 color) $_275944)) | (red green blue) | (blue green red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $_404374 color) $_404374)) | (red green blue) | (blue green red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $color color) $color)) | (red green blue) | (blue green red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a2_opencoggy.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01) | (assertEqualToResult (match &self (EvaluationLink (PredicateNode "eats") (ListLink $_149558 (ConceptNode "flies"))) $_149558)) | ((ConceptNode "Sam") (ConceptNode "Fritz")) | ((ConceptNode "Fritz") (ConceptNode "Sam")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a2_opencoggy.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01) | (assertEqualToResult (match &self (EvaluationLink (PredicateNode "eats") (ListLink $_19320 (ConceptNode "flies"))) $_19320)) | ((ConceptNode "Sam") (ConceptNode "Fritz")) | ((ConceptNode "Fritz") (ConceptNode "Sam")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a2_opencoggy.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01) | (assertEqualToResult (match &self (EvaluationLink (PredicateNode "eats") (ListLink $x (ConceptNode "flies"))) $x)) | ((ConceptNode "Sam") (ConceptNode "Fritz")) | ((ConceptNode "Fritz") (ConceptNode "Sam")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01) | (assertEqualToResult (match &self (implies (Frog Sam) $_169102) $_169102)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01) | (assertEqualToResult (match &self (implies (Frog Sam) $_44558) $_44558)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01) | (assertEqualToResult (match &self (implies (Frog Sam) $what) $what)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02) | (assertEqualToResult (match &self (implies ($_200180 $_200202) (Green Sam)) ($_200202 might be $_200180))) | ((Sam might be Frog)) | ((Sam might be Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02) | (assertEqualToResult (match &self (implies ($_75636 $_75658) (Green Sam)) ($_75658 might be $_75636))) | ((Sam might be Frog)) | ((Sam might be Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02) | (assertEqualToResult (match &self (implies ($P $x) (Green Sam)) ($x might be $P))) | ((Sam might be Frog)) | ((Sam might be Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03) | (assertEqualToResult (match &self (, (Frog $_110364) (implies (Frog $_110364) $_110436)) $_110436)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03) | (assertEqualToResult (match &self (, (Frog $_234908) (implies (Frog $_234908) $_234980)) $_234980)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03) | (assertEqualToResult (match &self (, (Frog $x) (implies (Frog $x) $y)) $y)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04) | (assertEqualToResult (match &self (, (implies ($_135868 $_135890) (Green $_135890)) (implies ($_135868 $_135890) (Eats-flies $_135890))) (Then it is definitely $_135868))) | ((Then it is definitely Frog)) | ((Then it is definitely Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04) | (assertEqualToResult (match &self (, (implies ($_260412 $_260434) (Green $_260434)) (implies ($_260412 $_260434) (Eats-flies $_260434))) (Then it is definitely $_260412))) | ((Then it is definitely Frog)) | ((Then it is definitely Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04) | (assertEqualToResult (match &self (, (implies ($P $x) (Green $x)) (implies ($P $x) (Eats-flies $x))) (Then it is definitely $P))) | ((Then it is definitely Frog)) | ((Then it is definitely Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01) | (assertEqualToResult (match &self (:= (S K K x) $_185822) $_185822)) | ((K x (K x))) | ((K x (K x))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01) | (assertEqualToResult (match &self (:= (S K K x) $_52880) $_52880)) | ((K x (K x))) | ((K x (K x))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01) | (assertEqualToResult (match &self (:= (S K K x) $r) $r)) | ((K x (K x))) | ((K x (K x))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $_215296) $_215296)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $_82354) $_82354)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $r) $r)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03) | (assertEqualToResult (match &self (:= (S K K x) $_108394) (match &self (:= $_108394 $_108474) $_108474))) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03) | (assertEqualToResult (match &self (:= (S K K x) $_241336) (match &self (:= $_241336 $_241416) $_241416))) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03) | (assertEqualToResult (match &self (:= (S K K x) $r) (match &self (:= $r $r2) $r2))) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $_144510) $_144510)) | ((Add (S (S Z)) Z)) | ((Add (S (S Z)) Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $_277452) $_277452)) | ((Add (S (S Z)) Z)) | ((Add (S (S Z)) Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) $r)) | ((Add (S (S Z)) Z)) | ((Add (S (S Z)) Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $_167252) (match &self (:= $_167252 $_167332) $_167332))) | ((S (S Z))) | ((S (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $_300194) (match &self (:= $_300194 $_300274) $_300274))) | ((S (S Z))) | ((S (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) (match &self (:= $r $r2) $r2))) | ((S (S Z))) | ((S (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01) | (assertEqual (S K K x)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02) | (assertEqualToResult (expression without known equalities)) | ((expression without known equalities)) | ((expression without known equalities)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03) | (assertEqual (Add (S Z) (S Z))) | ((S (S Z))) | ((S (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04) | (assertEqual (Something? (Add (S Z) (S Z)))) | ((Something? (S (S Z)))) | ((Something? (S (S Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05) | (assertEqual (eq (S K K x) x)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06) | (assertEqualToResult (eq Green Blue)) | ((eq Green Blue)) | ((eq Green Blue)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b2_backchain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01) | (assertEqualToResult (Frog Sam)) | ((Frog Sam)) | ((Frog Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b2_backchain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02) | (assertEqual (frog Sam)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b2_backchain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03) | (assertEqualToResult (frog Fritz)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b2_backchain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04) | (assertEqual (deduce (Evaluation (mortal Plato)))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b2_backchain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05) | (assertEqual (explain (Evaluation (mortal Plato)))) | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato... | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b3_direct.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01) | (assertEqual (green Fritz)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b3_direct.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02) | (assertEqual (ift (green $_77424) $_77424)) | (Fritz) | (Fritz) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b3_direct.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02) | (assertEqual (ift (green $x) $x)) | (Fritz) | (Fritz) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b3_direct.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03) | (assertEqualToResult (match &self (= ($_100860 Fritz) T) $_100860)) | (croaks eat_flies) | (croaks eat_flies) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b3_direct.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03) | (assertEqualToResult (match &self (= ($p Fritz) T) $p)) | (croaks eat_flies) | (croaks eat_flies) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01) | (assertEqual (match &self (= (color) $_149780) $_149780)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01) | (assertEqual (match &self (= (color) $x) $x)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02) | (assertEqual (collapse (match &self (= (shape) $_188798) $_188798))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02) | (assertEqual (collapse (match &self (= (shape) $x) $x))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03) | (assertEqual (color)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04) | (assertEqual (color)) | (green yellow red) | (green yellow red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05) | (assertEqual (collapse (shape))) | (((shape))) | (((shape))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06) | (assertEqualToResult (shape)) | ((shape)) | ((shape)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07) | (assertEqualToResult (pair (bin) (bin))) | ((A A) (A B) (B A) (B B)) | ((A A) (A B) (B A) (B B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08) | (assertEqual (find-equal (color) (foo))) | (red) | (red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09) | (assertEqualToResult (rev A (superpose (B C D)))) | ((B A) (C A) (D A)) | ((B A) (C A) (D A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10) | (assertEqual (is (air dry))) | ((start humidifier) (start kettle) (stop ventilation)) | ((stop ventilation) (start kettle) (start humidifier)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11) | (assertEqual (is (air wet))) | ((start ventilation) (stop humidifier) (stop kettle)) | ((stop kettle) (stop humidifier) (start ventilation)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01) | (assertEqual (Add S Z)) | (S) | (S) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03) | (assertEqual (Add (S Z) Z)) | ((S Z)) | ((S Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04) | (assertEqual (Add Z (S Z))) | ((S Z)) | ((S Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05) | (assertEqual (Add Something Z)) | (Something) | (Something) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06) | (assertEqualToResult (Add Z Ten)) | ((Add Z Ten)) | ((Add Z Ten)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07) | (assertEqualToResult (Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09) | (assertEqual (eq (Add Z Z) Z)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10) | (assertEqualToResult (eq Z (S Z))) | ((eq Z (S Z))) | ((eq Z (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12) | (assertEqual (of-same-type Color Shape)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13) | (assertEqual (of-same-type Green Red)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16) | (assertEqual (Green $_243098)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16) | (assertEqual (Green $who)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17) | (assertEqual (match &self (Green $_280688) $_280688)) | (Sam) | (Sam) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17) | (assertEqual (match &self (Green $who) $who)) | (Sam) | (Sam) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18) | (assertEqual (match &self (Green $_316734) (Green $_316734))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18) | (assertEqual (match &self (Green $who) (Green $who))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19) | (assertEqual (let $_350512 (Add (S Z) Z) (match &self (= (eq $_350512 (S Z)) $_350680) $_350680))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19) | (assertEqual (let $r (Add (S Z) Z) (match &self (= (eq $r (S Z)) $tv) $tv))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20) | (assertEqualToResult (match &self (= (eq (Add (S Z) Z) (S Z)) $_393298) $_393298)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20) | (assertEqualToResult (match &self (= (eq (Add (S Z) Z) (S Z)) $tv) $tv)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21) | (assertEqual (let (S (S $_418394)) (Add (S Z) (S Z)) $_418394)) | (Z) | (Z) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21) | (assertEqual (let (S (S $r)) (Add (S Z) (S Z)) $r)) | (Z) | (Z) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22) | (assertEqual (let* (($_453166 (Add Z Z)) ($_453228 (Add $_453166 (S Z))) ($_453316 (Add $_453228 (S Z)))) (match &self (= (eq (S (S Z)) $_453316) $_453510) $_453510))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22) | (assertEqual (let* (($r1 (Add Z Z)) ($r2 (Add $r1 (S Z))) ($r3 (Add $r2 (S Z)))) (match &self (= (eq (S (S Z)) $r3) $tv) $tv))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23) | (assertEqual (eqa (Add Z Z) (Add Z Z))) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24) | (assertEqualToResult (eqa Z (Add Z Z))) | (T) | ((eqa Z (Add Z Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25) | (assertEqual (eq Z (Add Z Z))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26) | (assertEqual (let $_60482 (Add Z Z) (eqa Z $_60482))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26) | (assertEqual (let $z (Add Z Z) (eqa Z $z))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01) | (assertEqualToResult (+ 2 (* 3 5.5))) | (18.5) | (18.5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02) | (assertEqualToResult (- 8 (/ 4 6.4))) | (7.375) | (7.375) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03) | (assertEqualToResult (% 21 17)) | (4) | (4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04) | (assertEqualToResult (< 4 (+ 2 (* 3 5)))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05) | (assertEqualToResult (and (> 4 2) (< 4 3))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06) | (assertEqualToResult (ln (+ 2 2))) | ((ln 4)) | ((ln 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07) | (assertEqualToResult (> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_270094 2))) | ((> 4 (+ $_270094 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_2742 2))) | ((> 4 (+ $_2742 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_284398 2))) | ((> 4 (+ $_284398 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_284412 2))) | ((> 4 (+ $_284412 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_284642 2))) | ((> 4 (+ $_284642 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_284656 2))) | ((> 4 (+ $_284656 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_468836 2))) | ((> 4 (+ $_468836 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_468850 2))) | ((> 4 (+ $_468850 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09) | (assertEqualToResult (== 4 (+ 2 2))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10) | (assertEqualToResult (== 2 3)) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11) | (assertEqualToResult (== (A B) (A B))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12) | (assertEqualToResult (== (A B) (A (B C)))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13) | (assertEqualToResult (== 4 (+ ln 2))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16) | (assertEqualToResult (sqr 4)) | (16) | (16) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17) | (assertEqual (+ (superpose (1 2 3)) 1)) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18) | (assertEqualToResult (bin)) | (0 1) | (0 1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19) | (assertEqualToResult (+ 1 (bin))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20) | (assertEqualToResult (let $x (+ 2 3) (* $x $x))) | (25) | (25) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21) | (assertEqual (fact 5)) | (120) | (120) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22) | (assertEqualToResult (fact 5)) | (120) | (120) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23) | (assertEqualToResult (let $t (gen 3) (if (== (subsum (:: 3 (:: 7 (:: 5 nil))) $t) 8) $t (superpose ())))) | ((:: 1 (:: 0 (:: 1 nil)))) | ((:: 1 (:: 0 (:: 1 nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c2_spaces.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01) | (assertEqualToResult (match &kb (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c2_spaces.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02) | (assertEqualToResult (match &self ($p is-a Color) $p)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c2_spaces.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03) | (assertEqual (match &kb (, (Venus orbit $x au) (Mars orbit $y au)) (- $y $x))) | (0.8) | (0.8) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c2_spaces.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04) | (assertEqualToResult (match &kb ($prop is-a Color) (match &self ($obj is $prop) $obj))) | (Ball) | (Ball) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c2_spaces.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05) | (assertEqualToResult (match &self (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01) | (assertEqual (TV (And (PA) (PB)))) | ((stv 0.3 0.8)) | ((stv 0.3 0.8)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02) | (assertEqual (TV (FA))) | () | ((stv 0.4 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02) | (assertEqual (TV (FA))) | ((stv 0.4 0.8)) | ((stv 0.4 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03) | (assertEqual (TV (croaks Fritz))) | ((stv 0.95 0.85)) | ((stv 0.95 0.85)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04) | (assertEqual (TV (frog Fritz))) | () | ((stv 0.783 0.68)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04) | (assertEqual (TV (frog Fritz))) | ((stv 0.783 0.68)) | ((stv 0.783 0.68)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05) | (assertEqual (TV (green Fritz))) | () | ((stv 0.7047 0.68)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05) | (assertEqual (TV (green Fritz))) | ((stv 0.7047 0.68)) | ((stv 0.7047 0.68)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01) | (assertEqual (get-type 5)) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02) | (assertEqual (get-type (+ 5 7))) | (Number) | (Number) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03) | (assertEqual (get-type +)) | () | ((-> Number Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03) | (assertEqual (get-type +)) | ((-> Number Number Number)) | ((-> Number Number Number)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04) | (assertEqualToResult (get-type (+ 5 "4"))) | (Number) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05) | (assertEqualToResult (get-type (+ -))) | (Expression) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05) | (assertEqualToResult (get-type (+ -))) | (Number) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06) | (assertEqual (get-type Either)) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07) | (assertEqual (get-type (Left 5))) | (Either) | (Either) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09) | (assertEqualToResult (get-type (isLeft 5))) | (Bool) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10) | (assertEqual (get-type (LeftP 5))) | ((EitherP Number)) | ((EitherP Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11) | (assertEqual (get-type (pair (LeftP 5) "String"))) | ((Pair (EitherP Number) String)) | ((Pair (EitherP Number) String)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12) | (assertEqual (get-type (Cons 5 (Cons 6 Nil)))) | ((List Number)) | ((List Number)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13) | (assertEqualToResult (get-type (Cons 5 (Cons "6" Nil)))) | ((List Number)) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14) | (assertEqual (let (List $t) (get-type (Cons 5 (Cons 6 Nil))) $t)) | (Number) | (Number) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01) | (assertEqual (get-type (curry +))) | () | ((-> Number (-> Number Number))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01) | (assertEqual (get-type (curry +))) | ((-> Number (-> Number Number))) | ((-> Number (-> Number Number))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02) | (assertEqual (get-type ((curry +) 2))) | () | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02) | (assertEqual (get-type ((curry +) 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03) | (assertEqualToResult ((curry +) 2)) | (((curry +) 2)) | (((curry +) 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04) | (assertEqual (((curry +) 2) 3)) | (5) | (5) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05) | (assertEqual (get-type (curry-a + 2))) | () | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05) | (assertEqual (get-type (curry-a + 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06) | (assertEqual (get-type ((curry-a + 2) 3))) | (Number) | (Number) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07) | (assertEqualToResult (get-type ((curry-a + 2) "S"))) | (Number) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08) | (assertEqual ((curry-a + 2) 3)) | (5) | (5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09) | (assertEqualToResult (is-socrates)) | ((curry-a is Socrates)) | ((curry-a is Socrates)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10) | (assertEqual ((curry-a is Socrates) Human)) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11) | (assertEqual ((is-socrates) Human)) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12) | (assertEqual ((lambda $x (+ $x 1)) 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13) | (assertEqual ((lambda ($x $y) (+ $x $y)) (2 7))) | (9) | (9) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14) | (assertEqual ((inc) 5)) | (6) | (6) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15) | (assertEqual (fmap (curry-a + 2) (Something 5))) | ((Something 7)) | ((Something 7)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16) | (assertEqual (fmap (curry-a + 2) (Nothing))) | ((Nothing)) | ((Nothing)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17) | (assertEqual (get-type (fmap (curry-a + 1) (Left 5)))) | () | ((Either Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17) | (assertEqual (get-type (fmap (curry-a + 1) (Left 5)))) | ((Either Number)) | ((Either Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18) | (assertEqual (fmap (curry-a + 2) (UntypedC 5))) | ((UntypedC 7)) | ((UntypedC 7)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19) | (assertEqual (fmap (curry-a + 2) (UntypedC 5 (UntypedC 8 (Null))))) | ((UntypedC 7 (UntypedC 10 (Null)))) | ((UntypedC 7 (UntypedC 10 (Null)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20) | (assertEqualToResult (get-type (fmap (curry-a + 2) (Left "5")))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC "5")))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC (Null) 5)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23) | (assertEqual (fmap-i (curry-a - 7) (Right 3))) | ((Right 4)) | ((Right 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24) | (assertEqual (fmap-i (curry-a * 2) (Cons 3 (Cons 4 Nil)))) | ((Cons 6 (Cons 8 Nil))) | ((Cons 6 (Cons 8 Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25) | (assertEqualToResult (fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27) | (assertEqual (sort (Cons 3 (Cons 1 (Cons 2 Nil))))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01) | (assertEqual (get-type (Cons 0 (Cons 1 Nil)))) | ((Vec Number (S (S Z)))) | ((Vec Number (S (S Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02) | (assertEqual (get-type (drop (Cons 1 Nil)))) | ((Vec Number Z)) | ((Vec Number Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03) | (assertEqual (drop (Cons 2 (Cons 1 Nil)))) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04) | (assertEqualToResult (get-type (drop Nil))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05) | (assertEqual (get-type (ConsN "1" (ConsN "2" NilN)))) | ((VecN String 2)) | ((VecN String 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06) | (assertEqual (get-type (dropN (ConsN "1" NilN)))) | ((VecN String 0)) | ((VecN String 0)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07) | (assertEqualToResult (dropN NilN)) | ((dropN NilN)) | ((dropN NilN)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01) | (assertEqual (get-type (Mortal Plato))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02) | (assertEqual (get-type (HumansAreMortal SocratesIsHuman))) | ((Mortal Socrates)) | ((Mortal Socrates)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03) | (assertEqualToResult (get-type (HumansAreMortal (Human Socrates)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04) | (assertEqual (get-type (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05) | (assertEqual (get-type (= (Mortal Socrates) (Mortal Plato)))) | (Type) | (Type) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07) | (assertEqualToResult (get-type (= SocratesIsHuman PlatoIsHuman))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08) | (assertEqualToResult (get-type (= SocratesIsHuman SocratesIsMortal))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | ((= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | ((= (+ 1 1) (- 3 1))) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | ((= (Mortal Socrates) T)) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | ((= (Mortal Plato) T)) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | () | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | ((= (Mortal Plato) T)) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | ((= (Human Sam) T)) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | ((= (= $_43042 $_43042) T)) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | ((= (= $_43082 $_43082) T)) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $x) $x)) | (Socrates Plato) | (Plato Socrates) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e1_kb_write.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01) | (assertEqualToResult (ift (green $x) (add-atom &kb (Green $x)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e1_kb_write.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02) | (assertEqualToResult (match &kb (Green $x) $x)) | (Fritz Sam) | (Fritz Sam) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01) | (assertEqual (get-state (get-token))) | ((A B)) | ((A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_238792)) | ((State (A B) $_238792)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_37124)) | ((State (A B) $_37124)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_395572)) | ((State (A B) $_395572)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_395638)) | ((State (A B) $_395638)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_397988)) | ((State (A B) $_397988)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_47958)) | ((State (A B) $_47958)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03) | (assertEqual (get-type (new-state 2))) | ((MonadicState Number)) | ((StateMonad Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03) | (assertEqual (get-type (new-state 2))) | ((StateMonad Number)) | ((StateMonad Number)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | (EmptyType) | ((StateMonad String)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | ((StateMonad String)) | ((StateMonad String)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05) | (assertEqual (let $v (new-state 1) (get-type $v))) | ((StateMonad Number)) | ((StateMonad Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06) | (assertEqual (get-type &state-token)) | ((StateMonad Expression)) | ((StateMonad Expression)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09) | (assertEqualToResult (nop (change-state! &state-token (C D)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10) | (assertEqual (get-state (get-token))) | ((C D)) | ((C D)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_123378)) | ((State 2 $_123378)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_194808)) | ((State 2 $_194808)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_323076)) | ((State 2 $_323076)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_323230)) | ((State 2 $_323230)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_4644)) | ((State 2 $_4644)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_81446)) | ((State 2 $_81446)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_109022)) | ((State 1 $_109022)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_160120)) | ((State 1 $_160120)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_219426)) | ((State 1 $_219426)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_33896)) | ((State 1 $_33896)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_353588)) | ((State 1 $_353588)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_353764)) | ((State 1 $_353764)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (inactive) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02) | (assertEqualToResult (nop (change-state! (status (Goal lunch-order)) active))) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (active) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04) | (assertEqualToResult (nop (change-state! &state-active inactive))) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05) | (assertEqual (match &self (= (status (Goal $goal)) &state-active) $goal)) | () | (meditation) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06) | (assertEqual (if (== (get-state (status (Goal $goal))) active) $goal (superpose ()))) | () | (lunch-order) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01) | (assertEqualToResult (get-type &self)) | (hyperon::space::DynSpace) | (hyperon::space::DynSpace) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_139180 (get-atoms &self) (get-type $_139180)))) | ((hyperon::space::DynSpace)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_293404 (get-atoms &self) (get-type $_293404)))) | ((hyperon::space::DynSpace)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_293434 (get-atoms &self) (get-type $_293434)))) | ((hyperon::space::DynSpace)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_293448 (get-atoms &self) (get-type $_293448)))) | ((hyperon::space::DynSpace)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_298710 (get-atoms &self) (get-type $_298710)))) | ((hyperon::space::DynSpace)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_439238 (get-atoms &self) (get-type $_439238)))) | ((Symbol)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_439252 (get-atoms &self) (get-type $_439252)))) | ((Symbol)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_444550 (get-atoms &self) (get-type $_444550)))) | ((hyperon::space::DynSpace)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_444564 (get-atoms &self) (get-type $_444564)))) | ((hyperon::space::DynSpace)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06) | (assertEqual (match &m (= (f 2) $x) $x)) | ((g 3)) | ((g 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09) | (assertEqual (g 2)) | (102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10) | (assertEqual (f 2)) | (103) | (103) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11) | (assertEqual &m) | (&m) | ((: g (-> Number Numer))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12) | (assertEqual (== (let* (($x (collapse (get-atoms &m))) ($y (car-atom $x))) (get-type $y)) (get-type &self))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14) | (assertEqual (g 2)) | (102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14) | (assertEqual (g 2)) | (102 102 102 102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15) | (assertEqual (f 2)) | (103) | (103) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15) | (assertEqual (f 2)) | (103 103 103 103) | (103) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16) | (assertEqualToResult (dup 2)) | (102 102 102 102 12) | (12 102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16) | (assertEqualToResult (dup 2)) | (102 12) | (12 102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17) | (assertEqual (g 2)) | (102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17) | (assertEqual (g 2)) | (102 102 102 102 102 102 102 102 102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18) | (assertEqual (f 2)) | (103) | (103) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18) | (assertEqual (f 2)) | (103 103 103 103 103 103 103 103 103) | (103) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19) | (assertEqualToResult (dup 2)) | (102 102 102 102 102 102 102 102 102 12 12) | (12 102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19) | (assertEqualToResult (dup 2)) | (102 12) | (12 102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.01) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.02) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.03) | (assertEqual ((superpose (1 2 3)))) | ((1) (2) (3)) | ((1) (2) (3)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.04) | (assertEqual (case (+ 1 5) ((5 Error) (6 OK) (6 Error)))) | (OK) | (OK) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.05) | (assertEqual (case (+ 1 5) (($x (+ 1 $x))))) | (7) | (7) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.06) | (assertEqual (case 5 ((6 OK)))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.07](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.07) | (assertEqual (case (+ 1 (superpose (1 2 3))) ((3 OK-3) (4 OK-4)))) | (OK-3 OK-4) | (OK-3 OK-4) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.08](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.08) | (assertEqual (case (+ 1 (superpose (1 2 3))) (($x (+ 1 $x))))) | (3 4 5) | (3 4 5) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.09](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.09) | (assertEqualToResult (superpose ())) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.10](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.10) | (assertEqualToResult (collapse (superpose ()))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.11](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.11) | (assertEqualToResult (superpose ((nop 1)))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.12](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.12) | (assertEqualToResult (collapse (superpose ((nop 1))))) | () | (()) | | FAIL | [HYPERON-METTALOG-SANITY.00-LANG-CASE.13](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.13) | (assertEqual (match &self $1 $1)) | ((Rel-P A B) (Rel-Q A C)) | ((= (Rel-P P P P) 10) (Rel-P A B) (Rel-Q A C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.14](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.14) | (assertEqualToResult (match &self ($Rel A $X) ($Rel A $X))) | ((Rel-P A B) (Rel-Q A C)) | ((Rel-P A B) (Rel-Q A C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.15](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.15) | (assertEqualToResult (superpose ((Rel-P B) (Rel-Q C)))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.16](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.16) | (assertEqual (match &self ($rel A $x) ($rel $x))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.17](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.17) | (assertEqual (superpose ((P B) (Q C)))) | ((P B) (Q C)) | ((P B) (Q C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.18](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.18) | (assertEqual (case (match &self ($rel B $x) ($rel $x)) (((Rel-P $y) (P $y)) ((Rel-Q $y) (Q $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/01_lang_inc.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.01) | (assertEqual (maybe-inc Nothing)) | (Nothing) | (Nothing) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/01_lang_inc.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.02) | (assertEqual (maybe-inc (Just 2))) | ((Just 3)) | ((Just 3)) | | PASS | [HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/02-curried-plus.metta.html#HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01) | (assertEqualToResult ((inc) 2)) | (3) | (3) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/03-soring-via-insert.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01) | (assertEqual (Cons 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/03-soring-via-insert.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02) | (assertEqual (insert 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/03-soring-via-insert.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03) | (assertEqual (insert 2 (insert 1 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/03-soring-via-insert.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04) | (assertEqual (insert 1 (insert 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/03-soring-via-insert.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01) | (assertEqualToResult (add-atom &kb (SS-P_AS A_AS B_AS))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02) | (assertEqualToResult (add-atom &kb (SS-Q_AS A_AS C_AS))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03) | (assertEqualToResult (match &kb ($SS A_AS $X) ($SS A_AS $X))) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04) | (assertEqual (match &kb ($rel A_AS $x) ($rel $x))) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05) | (assertEqual (superpose ((P_AS B_AS) (Q_AS C_AS)))) | ((P_AS B_AS) (Q_AS C_AS)) | ((P_AS B_AS) (Q_AS C_AS)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06) | (assertEqual (case (match &kb ($rel B_AS $x) ($rel $x)) (((SS-P_AS $y) (P_AS $y)) ((SS-Q_AS $y) (Q_AS $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01](https://logicmoo.org/public/mettareports/baseline_compat/hyperon-mettalog_sanity/structure-tests.metta.html#HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01) | (assertEqualToResult (collapse (superpose ((superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (4 5 6 4 5 6 4 5 6 4 5... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 ... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9)) | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/add_atom_match.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($A mortal) (mortal $A))))) | ((mortal man)) | ((mortal man)) | | PASS | [METTA-MORPH-TESTS.AND-OR.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/and_or.metta.html#METTA-MORPH-TESTS.AND-OR.01) | (assertEqualToResult (If (or (and True False) True) 1 2)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.COLLAPSE.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/collapse.metta.html#METTA-MORPH-TESTS.COLLAPSE.01) | (assertEqualToResult (collapse (1 2 3))) | (((1 2 3))) | (((1 2 3))) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/factorial.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/identity.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.IF.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/if.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [METTA-MORPH-TESTS.LETLET.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/letlet.metta.html#METTA-MORPH-TESTS.LETLET.01) | (assertEqualToResult (let $T (1.0 0.9) (let* ((($f1 $c1) $T)) ($f1 $c1)))) | ((1.0 0.9)) | ((1.0 0.9)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/let_superpose_if_case.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/let_superpose_if_case.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/let_superpose_list2.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/let_superpose_list.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqualToResult (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/let_superpose_list.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_feval.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $x) $y) $y)) | ((* 2 $_138668)) | ((* 2 $_138668)) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_feval.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $x) $y) $y)) | ((* 2 $_157502)) | ((* 2 $_157502)) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_feval.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $x) $y) $y)) | ((* 2 $_284976)) | ((* 2 $_284976)) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_feval.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $x) $y) $y)) | ((* 2 $_286080)) | ((* 2 $_286080)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_superposed_spaces.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (add-atom &attentional_focus 1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_superposed_spaces.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_superposed_spaces.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $1 $1)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_superposed_spaces.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $1 $1)) | (2) | (2) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_superposed_spaces.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $1 $1)) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.01) | (assertEqualToResult (match &belief_events $1 $1)) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.02) | (assertEqualToResult (add-atom &belief_events belief1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (match &belief_events $1 $1)) | (belief1) | (belief1) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case belief1 ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &belief_events $1 $1) ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.06](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.06) | (assertEqualToResult (case (match &belief_events $1 $1) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | () | () | | FAIL | [METTA-MORPH-TESTS.MINNARS.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/minnars.metta.html#METTA-MORPH-TESTS.MINNARS.01) | (assertEqualToResult (Question ((Sentence (((ExtSet garfield) --> cat) (1.0 0.9)) (1)) (Sentence (((cat x sky) --> like) (1.0 0.9)) (2)) (Sentence ((sky --> (IntSet blue)) (1.0 0.9)) (3)) (Sentence ((... | () | (((1.0 0.37946790052053214) (2 1 3 4))) | | PASS | [METTA-MORPH-TESTS.MINNARS.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/minnars.metta.html#METTA-MORPH-TESTS.MINNARS.01) | (assertEqualToResult (Question ((Sentence (((ExtSet garfield) --> cat) (1.0 0.9)) (1)) (Sentence (((cat x sky) --> like) (1.0 0.9)) (2)) (Sentence ((sky --> (IntSet blue)) (1.0 0.9)) (3)) (Sentence ((... | (((1.0 0.37946790052053214) (2 1 3 4))) | (((1.0 0.37946790052053214) (2 1 3 4))) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/multifunction.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | PASS | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/multifunction.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | (1764 1764) | (1764) | | PASS | [METTA-MORPH-TESTS.NALIFIER.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/nalifier.metta.html#METTA-MORPH-TESTS.NALIFIER.01) | (assertEqualToResult (let ($S $EV) (choiceQuery (((ExtSet sam) --> duck) ((ExtSet sam) --> swan) ((ExtSet sam) --> dog))) $S)) | ((((ExtSet sam) --> duck) (1.0 0.6183206106870229))) | ((((ExtSet sam) --> duck) (1.0 0.618320610687023))) | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/nested_parameters.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [METTA-MORPH-TESTS.PEANO.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/peano.metta.html#METTA-MORPH-TESTS.PEANO.01) | (assertEqualToResult (Add (S (S Z)) (S (S (S Z))))) | ((S (S (S (S (S Z)))))) | ((S (S (S (S (S Z)))))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (sequential ((increment) (increment) (increment)))))) | (10 11 12 13 14 15) | (10 11 12 13 14 15) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_109366)) | ((State 30)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_131200)) | ((State 30)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_136134)) | ((State 30)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_195816)) | ((State 30)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_73292)) | ((State 30)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.01) | (assertEqualToResult (get-state &FIFO)) | (45) | (45) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.02) | (assertEqualToResult (add-atom &WU a)) | () | (()) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.03](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.03) | (assertEqualToResult (match &WU $1 $1)) | (a) | (a) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.04](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.04) | (assertEqualToResult (add-atom &WU b)) | () | (()) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.05](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.05) | (assertEqualToResult (remove-atom &WU a)) | () | (()) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.06](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.06) | (assertEqual (match &WU $1 $1)) | (b) | (b) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.01) | (assertEqualToResult (TupleConcat (a b c) (e f g))) | ((a b c e f g)) | ((a b c e f g)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.02) | (assertEqualToResult (TupleConcat () (e f g))) | ((e f g)) | ((e f g)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.03](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.03) | (assertEqualToResult (TupleConcat (a b c) ())) | ((a b c)) | ((a b c)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.04](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.04) | (assertEqualToResult (range 1 1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.05](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.05) | (assertEqualToResult (range 1 3)) | ((1 2)) | ((1 2)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.06](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.06) | (assertEqualToResult (range 2 6)) | ((2 3 4 5)) | ((2 3 4 5)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.07](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.07) | (assertEqualToResult (range 1 10)) | ((1 2 3 4 5 6 7 8 9)) | ((1 2 3 4 5 6 7 8 9)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/superpose_nested.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.01) | (assertEqualToResult (superpose (a b c))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/superpose_nested.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.02) | (assertEqualToResult (superpose ((superpose (a b c))))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.03](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/superpose_nested.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.03) | (assertEqualToResult (superpose ((superpose (a b c)) (superpose (x y z))))) | (a b c x y z) | (a b c x y z) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.04](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/superpose_nested.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.04) | (assertEqualToResult (superpose ((superpose (a b c)) x y z))) | (a b c x y z) | (a b c x y z) | | PASS | [METTA-MORPH-TESTS.TESTS0.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | FAIL | [METTA-MORPH-TESTS.TESTS0.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | ((|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.... | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.TESTS0.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | | FAIL | [METTA-MORPH-TESTS.TESTS0.03](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.03) | (assertEqualToResult (|- (({(a b) } --> mwawa) (1.0 0.9)))) | ((({(a) } --> mwawa) (1.0 0.81))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.TESTS0.03](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.03) | (assertEqualToResult (|- (({(a b) } --> mwawa) (1.0 0.9)))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | ((({(a) } --> mwawa) (1.0 0.81)) (({(b) } --> mwawa) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.TESTS0.04](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | FAIL | [METTA-MORPH-TESTS.TESTS0.05](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.TESTS0.05](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.TESTS0.06](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A | B) --> cat) (1.0... | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | FAIL | [METTA-MORPH-TESTS.TESTS0.07](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [METTA-MORPH-TESTS.TESTS0.07](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [METTA-MORPH-TESTS.TYPES2.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/types2.metta.html#METTA-MORPH-TESTS.TYPES2.01) | (assertEqualToResult (get-type lion1)) | (Lion) | (Lion) | | PASS | [METTA-MORPH-TESTS.TYPES2.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/types2.metta.html#METTA-MORPH-TESTS.TYPES2.02) | (assertEqualToResult (reproduce lion1 lion2)) | (childlion) | (childlion) | | PASS | [METTA-MORPH-TESTS.TYPES2.03](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/types2.metta.html#METTA-MORPH-TESTS.TYPES2.03) | (assertEqualToResult (get-type Lion)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.TYPES2.04](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/types2.metta.html#METTA-MORPH-TESTS.TYPES2.04) | (assertEqualToResult (match &self (: Lion $1) $1)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.TYPES2.05](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/types2.metta.html#METTA-MORPH-TESTS.TYPES2.05) | (assertEqualToResult (match &self (: reproduce $1) $1)) | ((-> Lion Lion Lion)) | ((-> Lion Lion Lion)) | | PASS | [METTA-MORPH-TESTS.TYPES3.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/types3.metta.html#METTA-MORPH-TESTS.TYPES3.01) | (assertEqualToResult (match &self (GreaterThan $x $y) (If (and (== (get-type $x) Number) (== (get-type $y) Number)) (If (EqualOrGreater $x $y) yay)))) | (yay) | (yay) | | PASS | [METTA-MORPH-TESTS.TYPES.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/types.metta.html#METTA-MORPH-TESTS.TYPES.01) | (assertEqualToResult (f 42)) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/zeroargs.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://logicmoo.org/public/mettareports/baseline_compat/metta-morph_tests/zeroargs.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [EDGES-TO-EDGES.NTE.01](https://logicmoo.org/public/mettareports/edges-to-edges/nte.metta.html#EDGES-TO-EDGES.NTE.01) | (assertEqualToResult (transform__ (, (conn $_ 0 $pid) (conn $_ 1 0 $sid) (conn $_ 1 1 $oid) (data $sind (id $sid)) (data $sind (data $s)) (data $pind (id $pid)) (data $pind (data $p)) (data $oind (id ... | () | (()) | | FAIL | [EDGES-TO-EDGES.NTE.02](https://logicmoo.org/public/mettareports/edges-to-edges/nte.metta.html#EDGES-TO-EDGES.NTE.02) | (assertEqualToResult (? (NTE $s $p "DISNEYLAND"))) | () | ((NTE "ART CORNER SHOPS" "part of" "DISNEYLAND") (NTE "CREATIVE TALENT OF STUDIO - THEATRICAL FILMS" "feeds products" "DISNEYLAND") (NTE "CREATIVE TALENT OF STUDIO - THEATRICAL FILMS" "helps out" "DISNEYLAND") (NTE "CREATIVE TALENT OF STUDIO - THEATRICAL FILMS" "inspires" "DISNEYLAND") (NTE "MERCHANDISE LICENSING" "provides concessionnaires" "DISNEYLAND") (NTE "MERCHANDISE LICENSING" "publicizes" "DISNEYLAND") (NTE "TV" "plugs" "DISNEYLAND") (NTE "WALT DISNEY MAGAZINE" "plugs" "DISNEYLAND")) | | FAIL | [EDGES-TO-EDGES.NTE.03](https://logicmoo.org/public/mettareports/edges-to-edges/nte.metta.html#EDGES-TO-EDGES.NTE.03) | (assertEqualToResult (? (NTE $s "provides talent" $o))) | () | ((NTE "CREATIVE TALENT OF STUDIO - THEATRICAL FILMS" "provides talent" "MUSIC") (NTE "CREATIVE TALENT OF STUDIO - THEATRICAL FILMS" "provides talent" "TV") (NTE "TV" "provides talent" "MUSIC")) | | FAIL | [EDGES-TO-EDGES.NTE.04](https://logicmoo.org/public/mettareports/edges-to-edges/nte.metta.html#EDGES-TO-EDGES.NTE.04) | (assertEqualToResult (transform (NTE "TV" $p "MUSIC") $p)) | () | ("inspires" "provides talent" "publicizes") | | PASS | [PLN.CURRIED-CHAINER.01](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/curried-chainer.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqualToResult (add-atom &kb (: a A))) | () | (()) | | PASS | [PLN.CURRIED-CHAINER.02](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/curried-chainer.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqualToResult (add-atom &kb (: ab (→ A B)))) | () | (()) | | PASS | [PLN.CURRIED-CHAINER.03](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/curried-chainer.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (add-atom &kb (: ModusPonens (-> (→ $p $q) (-> $p $q))))) | () | (()) | | PASS | [PLN.CURRIED-CHAINER.04](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/curried-chainer.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [PLN.CURRIED-CHAINER.05](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/curried-chainer.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.06](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/curried-chainer.metta.html#PLN.CURRIED-CHAINER.06) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | FAIL | [PLN.CURRIED-CHAINER.07](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/curried-chainer.metta.html#PLN.CURRIED-CHAINER.07) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.07](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/curried-chainer.metta.html#PLN.CURRIED-CHAINER.07) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.08](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/curried-chainer.metta.html#PLN.CURRIED-CHAINER.08) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.GENE-PLN-XP.01](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.01) | (assertEqualToResult (match &self (: $_400412 (-> (transcribed_to $_400466 $_400488) (-> (translates_to $_400488 $_400560) (codes_for $_400466 $_400560)))) (: $_400412 (-> (transcribed_to $_400466 $_4... | ((: gene-codes-protein (-> (transcribed_to $_400466 $_400488) (-> (translates_to $_400488 $_400560) ... | ((: gene-codes-protein (-> (transcribed_to $_400466 $_400488) (-> (translates_to $_400488 $_400560) (codes_for $_400466 $_400560))))) | | PASS | [PLN.GENE-PLN-XP.01](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.01) | (assertEqualToResult (match &self (: $what (-> (transcribed_to $g $t) (-> (translates_to $t $p) (codes_for $g $p)))) (: $what (-> (transcribed_to $g $t) (-> (translates_to $t $p) (codes_for $g $p)))))... | ((: gene-codes-protein (-> (transcribed_to $_295480 $_295502) (-> (translates_to $_295502 $_295574) ... | ((: gene-codes-protein (-> (transcribed_to $_295480 $_295502) (-> (translates_to $_295502 $_295574) (codes_for $_295480 $_295574))))) | | PASS | [PLN.GENE-PLN-XP.01](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.01) | (assertEqualToResult (match &self (: $what (-> (transcribed_to $g $t) (-> (translates_to $t $p) (codes_for $g $p)))) (: $what (-> (transcribed_to $g $t) (-> (translates_to $t $p) (codes_for $g $p)))))... | ((: gene-codes-protein (-> (transcribed_to $_472350 $_472372) (-> (translates_to $_472372 $_472444) ... | ((: gene-codes-protein (-> (transcribed_to $_472350 $_472372) (-> (translates_to $_472372 $_472444) (codes_for $_472350 $_472444))))) | | PASS | [PLN.GENE-PLN-XP.02](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.02) | (assertEqualToResult (fc (: gene-a (gene a)) (fromNumber 2))) | ((: gene-a (gene a))) | ((: gene-a (gene a))) | | FAIL | [PLN.GENE-PLN-XP.03](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.03) | (assertEqualToResult (fc (match &self (: $_3382 (transcribed_to (gene a) $_3430)) (: $_3382 (transcribed_to (gene a) $_3430))) (fromNumber 2))) | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: (gene-codes-protein transcribe... | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: transcribed_to-a-t2 (transcribed_to (gene a) (transcript t2))) (: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_3664) (codes_for (gene a) $_3664))) (: (gene-codes-protein transcribed_to-a-t2) (-> (translates_to (transcript t2) $_3946) (codes_for (gene a) $_3946))) (: ((gene-codes-protein transcribed_to-a-t1) translates_to-t1-p1) (codes_for (gene a) (protein p1))) (: ((gene-codes-protein transcribed_to-a-t2) translates_to-t2-p2) (codes_for (gene a) (protein p2)))) | | FAIL | [PLN.GENE-PLN-XP.03](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.03) | (assertEqualToResult (fc (match &self (: $y (transcribed_to (gene a) $t)) (: $y (transcribed_to (gene a) $t))) (fromNumber 2))) | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: (gene-codes-protein transcribe... | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: transcribed_to-a-t2 (transcribed_to (gene a) (transcript t2))) (: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_125372) (codes_for (gene a) $_125372))) (: (gene-codes-protein transcribed_to-a-t2) (-> (translates_to (transcript t2) $_125756) (codes_for (gene a) $_125756))) (: ((gene-codes-protein transcribed_to-a-t1) translates_to-t1-p1) (codes_for (gene a) (protein p1))) (: ((gene-codes-protein transcribed_to-a-t2) translates_to-t2-p2) (codes_for (gene a) (protein p2)))) | | FAIL | [PLN.GENE-PLN-XP.03](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.03) | (assertEqualToResult (fc (match &self (: $y (transcribed_to (gene a) $t)) (: $y (transcribed_to (gene a) $t))) (fromNumber 2))) | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: (gene-codes-protein transcribe... | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: transcribed_to-a-t2 (transcribed_to (gene a) (transcript t2))) (: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_125756) (codes_for (gene a) $_125756))) (: (gene-codes-protein transcribed_to-a-t2) (-> (translates_to (transcript t2) $_125372) (codes_for (gene a) $_125372))) (: ((gene-codes-protein transcribed_to-a-t1) translates_to-t1-p1) (codes_for (gene a) (protein p1))) (: ((gene-codes-protein transcribed_to-a-t2) translates_to-t2-p2) (codes_for (gene a) (protein p2)))) | | PASS | [PLN.GENE-PLN-XP.03](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.03) | (assertEqualToResult (fc (match &self (: $y (transcribed_to (gene a) $t)) (: $y (transcribed_to (gene a) $t))) (fromNumber 2))) | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: (gene-codes-protein transcribe... | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: transcribed_to-a-t2 (transcribed_to (gene a) (transcript t2))) (: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_4648) (codes_for (gene a) $_4648))) (: (gene-codes-protein transcribed_to-a-t2) (-> (translates_to (transcript t2) $_4366) (codes_for (gene a) $_4366))) (: ((gene-codes-protein transcribed_to-a-t1) translates_to-t1-p1) (codes_for (gene a) (protein p1))) (: ((gene-codes-protein transcribed_to-a-t2) translates_to-t2-p2) (codes_for (gene a) (protein p2)))) | | FAIL | [PLN.GENE-PLN-XP.04](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.04) | (assertEqualToResult (fc (: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (fromNumber 2))) | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: (gene-codes-protein transcribe... | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_123996) (codes_for (gene a) $_123996))) (: ((gene-codes-protein transcribed_to-a-t1) translates_to-t1-p1) (codes_for (gene a) (protein p1)))) | | FAIL | [PLN.GENE-PLN-XP.04](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.04) | (assertEqualToResult (fc (: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (fromNumber 2))) | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: (gene-codes-protein transcribe... | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_83854) (codes_for (gene a) $_83854))) (: ((gene-codes-protein transcribed_to-a-t1) translates_to-t1-p1) (codes_for (gene a) (protein p1)))) | | PASS | [PLN.GENE-PLN-XP.04](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.04) | (assertEqualToResult (fc (: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (fromNumber 2))) | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: (gene-codes-protein transcribe... | ((: transcribed_to-a-t1 (transcribed_to (gene a) (transcript t1))) (: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_3522) (codes_for (gene a) $_3522))) (: ((gene-codes-protein transcribed_to-a-t1) translates_to-t1-p1) (codes_for (gene a) (protein p1)))) | | FAIL | [PLN.GENE-PLN-XP.05](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.05) | (assertEqualToResult (fc (: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_161280) (codes_for (gene a) $_161280))) (fromNumber 1))) | ((: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_198560) (codes_for... | ((: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_161280) (codes_for (gene a) $_161280))) (: ((gene-codes-protein transcribed_to-a-t1) translates_to-t1-p1) (codes_for (gene a) (protein p1)))) | | FAIL | [PLN.GENE-PLN-XP.05](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.05) | (assertEqualToResult (fc (: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $p) (codes_for (gene a) $p))) (fromNumber 1))) | ((: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_330750) (codes_for... | ((: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_286674) (codes_for (gene a) $_286674))) (: ((gene-codes-protein transcribed_to-a-t1) translates_to-t1-p1) (codes_for (gene a) (protein p1)))) | | PASS | [PLN.GENE-PLN-XP.05](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/pln/gene-pln-xp.metta.html#PLN.GENE-PLN-XP.05) | (assertEqualToResult (fc (: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $p) (codes_for (gene a) $p))) (fromNumber 1))) | ((: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_284570) (codes_for... | ((: (gene-codes-protein transcribed_to-a-t1) (-> (translates_to (transcript t1) $_284570) (codes_for (gene a) $_284570))) (: ((gene-codes-protein transcribed_to-a-t1) translates_to-t1-p1) (codes_for (gene a) (protein p1)))) | | PASS | [QUERY.GENE-QUERY.01](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/query/gene-query.metta.html#QUERY.GENE-QUERY.01) | (assertEqualToResult (match &self ($type $id) (: (W ($type $id)) ($type $id)))) | ((: (W (tad chr16_1000_2000_GRCh38)) (tad chr16_1000_2000_GRCh38)) (: (W (gene w)) (gene w)) (: (W (... | ((: (W (gene w)) (gene w)) (: (W (gene x)) (gene x)) (: (W (gene y)) (gene y)) (: (W (gene z)) (gene z)) (: (W (sequence_variant rs1000)) (sequence_variant rs1000)) (: (W (sequence_variant rs999)) (sequence_variant rs999)) (: (W (tad chr16_1000_2000_GRCh38)) (tad chr16_1000_2000_GRCh38))) | | FAIL | [QUERY.GENE-QUERY.02](https://logicmoo.org/public/mettareports/extended_compat/bio-atomspace/query/gene-query.metta.html#QUERY.GENE-QUERY.02) | (assertEqualToResult (match &self ($pred $s $t) (: (W $pred $s $t) ($pred ($pred $s $t))))) | ((: (W in-tad (tad chr16_1000_2000_GRCh38) (gene w)) (in-tad (in-tad (tad chr16_1000_2000_GRCh38) (g... | ((: (W : Error (-> Atom Atom ErrorType)) (: (: Error (-> Atom Atom ErrorType)))) (: (W : empty (-> %Undefined%)) (: (: empty (-> %Undefined%)))) (: (W : if (-> Bool Atom Atom $_7568)) (: (: if (-> Bool Atom Atom $_7568)))) (: (W : quote (-> Atom Atom)) (: (: quote (-> Atom Atom)))) (: (W : unify (-> Atom Atom Atom Atom %Undefined%)) (: (: unify (-> Atom Atom Atom Atom %Undefined%)))) (: (W : unify-or-empty (-> Atom Atom Atom)) (: (: unify-or-empty (-> Atom Atom Atom)))) (: (W = $_6458 $_6458) (= (= $_6458 $_6458))) (: (W = $_6746 $_6746) (= (= $_6746 $_6746))) (: (W = unified unified) (= (= unified unified))) (: (W alt (sequence_variant rs1000) C) (alt (alt (sequence_variant rs1000) C))) (: (W chr (sequence_variant rs1000) chr16) (chr (chr (sequence_variant rs1000) chr16))) (: (W in-tad (tad chr16_1000_2000_GRCh38) (gene w)) (in-tad (in-tad (tad chr16_1000_2000_GRCh38) (gene w)))) (: (W pos (sequence_variant rs1000) 1200) (pos (pos (sequence_variant rs1000) 1200))) (: (W ref (sequence_variant rs1000) A) (ref (ref (sequence_variant rs1000) A))) (: (W rsid (sequence_variant rs1000) rs1000) (rsid (rsid (sequence_variant rs1000) rs1000)))) | | PASS | [FIZZBUZZ.CLASSICAL.01](https://logicmoo.org/public/mettareports/fizzbuzz/classical.metta.html#FIZZBUZZ.CLASSICAL.01) | (assertEqualToResult (fizzbuzz 50)) | ((Nothing 1) (Nothing 2) (Fizz 3) (Nothing 4) (Buzz 5) (Fizz 6) (Nothing 7) (Nothing 8) (Fizz 9) (Bu... | ((Buzz 5) (Buzz 10) (Buzz 20) (Buzz 25) (Buzz 35) (Buzz 40) (Fizz 3) (Fizz 6) (Fizz 9) (Fizz 12) (Fizz 18) (Fizz 21) (Fizz 24) (Fizz 27) (Fizz 33) (Fizz 36) (Fizz 39) (Fizz 42) (Fizz 48) (FizzBuzz 15) (FizzBuzz 30) (FizzBuzz 45) (Nothing 1) (Nothing 2) (Nothing 4) (Nothing 7) (Nothing 8) (Nothing 11) (Nothing 13) (Nothing 14) (Nothing 16) (Nothing 17) (Nothing 19) (Nothing 22) (Nothing 23) (Nothing 26) (Nothing 28) (Nothing 29) (Nothing 31) (Nothing 32) (Nothing 34) (Nothing 37) (Nothing 38) (Nothing 41) (Nothing 43) (Nothing 44) (Nothing 46) (Nothing 47) (Nothing 49)) | | PASS | [FIZZBUZZ.SIMPLE.01](https://logicmoo.org/public/mettareports/fizzbuzz/simple.metta.html#FIZZBUZZ.SIMPLE.01) | (assertEqualToResult (fizzbuzz 50)) | ((Buzz 50) (Nothing 49) (Fizz 48) (Nothing 47) (Nothing 46) (FizzBuzz 45) (Nothing 44) (Nothing 43) ... | ((Buzz 5) (Buzz 10) (Buzz 20) (Buzz 25) (Buzz 35) (Buzz 40) (Buzz 50) (Fizz 3) (Fizz 6) (Fizz 9) (Fizz 12) (Fizz 18) (Fizz 21) (Fizz 24) (Fizz 27) (Fizz 33) (Fizz 36) (Fizz 39) (Fizz 42) (Fizz 48) (FizzBuzz 15) (FizzBuzz 30) (FizzBuzz 45) (Nothing 1) (Nothing 2) (Nothing 4) (Nothing 7) (Nothing 8) (Nothing 11) (Nothing 13) (Nothing 14) (Nothing 16) (Nothing 17) (Nothing 19) (Nothing 22) (Nothing 23) (Nothing 26) (Nothing 28) (Nothing 29) (Nothing 31) (Nothing 32) (Nothing 34) (Nothing 37) (Nothing 38) (Nothing 41) (Nothing 43) (Nothing 44) (Nothing 46) (Nothing 47) (Nothing 49)) | | PASS | [LOGIC.ALL-ANY.01](https://logicmoo.org/public/mettareports/logic/all_any.metta.html#LOGIC.ALL-ANY.01) | (assertEqualToResult (any (False False False False))) | (False) | (False) | | PASS | [LOGIC.ALL-ANY.02](https://logicmoo.org/public/mettareports/logic/all_any.metta.html#LOGIC.ALL-ANY.02) | (assertEqualToResult (all (True True True False))) | (False) | (False) | | PASS | [LOGIC.MEMB.01](https://logicmoo.org/public/mettareports/logic/memb.metta.html#LOGIC.MEMB.01) | (assertEqualToResult (let $res (and (memb $X (Cons 0 (Cons 2 Nil))) (memb $X (Cons 2 (Cons 3 Nil)))) (if $res $X None))) | (None None 2 2 2 2 2 2 2 2) | (2 None) | | PASS | [PROB-DEP-TYPES.INF-ORDER-PROBS.01](https://logicmoo.org/public/mettareports/prob-dep-types/inf_order_probs.metta.html#PROB-DEP-TYPES.INF-ORDER-PROBS.01) | (assertEqualToResult (sample ('a''))) | ('b'' 'c'') | ('b'' 'c'') | | PASS | [PROB-DEP-TYPES.INF-ORDER-PROBS.02](https://logicmoo.org/public/mettareports/prob-dep-types/inf_order_probs.metta.html#PROB-DEP-TYPES.INF-ORDER-PROBS.02) | (assertEqualToResult (sample ('a''))) | ('b'' 'c'') | ('b'' 'c'') | | FAIL | [PROB-DEP-TYPES.INF-ORDER-PROBS.03](https://logicmoo.org/public/mettareports/prob-dep-types/inf_order_probs.metta.html#PROB-DEP-TYPES.INF-ORDER-PROBS.03) | (assertEqualToResult (sample ((sample ('a''))))) | ('a'' 'c'' 'd'') | ((Error ((sample ('a''))) NoValidAlternatives)) | | PASS | [PROB-DEP-TYPES.INF-ORDER-PROBS.04](https://logicmoo.org/public/mettareports/prob-dep-types/inf_order_probs.metta.html#PROB-DEP-TYPES.INF-ORDER-PROBS.04) | (assertEqualToResult (sample ((sample ('a''))))) | ('a'' 'c'' 'd'') | ('a'' 'c'' 'd'') | | PASS | [PROB-DEP-TYPES.INF-ORDER-PROBS.05](https://logicmoo.org/public/mettareports/prob-dep-types/inf_order_probs.metta.html#PROB-DEP-TYPES.INF-ORDER-PROBS.05) | (assertEqualToResult (sample ('c''))) | ('d'') | ('d'') | | PASS | [PROB-DEP-TYPES.INF-ORDER-PROBS.06](https://logicmoo.org/public/mettareports/prob-dep-types/inf_order_probs.metta.html#PROB-DEP-TYPES.INF-ORDER-PROBS.06) | (assertEqualToResult (sample ((sample ('c''))))) | ('a'') | ('a'') | | PASS | [PROB-DEP-TYPES.INF-ORDER-PROBS.07](https://logicmoo.org/public/mettareports/prob-dep-types/inf_order_probs.metta.html#PROB-DEP-TYPES.INF-ORDER-PROBS.07) | (assertEqualToResult (sample ((sample ((sample ('c''))))))) | ('b'' 'c'') | ('b'' 'c'') | | PASS | [PROB-DEP-TYPES.INF-ORDER-PROBS.08](https://logicmoo.org/public/mettareports/prob-dep-types/inf_order_probs.metta.html#PROB-DEP-TYPES.INF-ORDER-PROBS.08) | (assertEqualToResult (match &self (: A $t) ($t))) | ((Type) (B) (D)) | ((B) (D) (Type)) | | PASS | [PROB-DEP-TYPES.INF-ORDER-PROBS.09](https://logicmoo.org/public/mettareports/prob-dep-types/inf_order_probs.metta.html#PROB-DEP-TYPES.INF-ORDER-PROBS.09) | (assertEqualToResult (Distribution (Distribution 'U_ABCD''))) | ('U_ABCD'') | ('U_ABCD'') | | PASS | [PROB-DEP-TYPES.INF-ORDER-PROBS.10](https://logicmoo.org/public/mettareports/prob-dep-types/inf_order_probs.metta.html#PROB-DEP-TYPES.INF-ORDER-PROBS.10) | (assertEqualToResult (match &self (: a $t) ($t))) | ((A)) | ((A)) | | PASS | [PROB-DEP-TYPES.INF-ORDER-PROBS.11](https://logicmoo.org/public/mettareports/prob-dep-types/inf_order_probs.metta.html#PROB-DEP-TYPES.INF-ORDER-PROBS.11) | (assertEqualToResult (match &self (: 'a'' $t) ($t))) | (('U_ABCD'')) | (('U_ABCD'')) | | PASS | [PROB-DEP-TYPES.PROB-DEP-TYPES.01](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.01) | (assertEqualToResult (sample (Bernoulli))) | (True False) | (False True) | | PASS | [PROB-DEP-TYPES.PROB-DEP-TYPES.02](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.02) | (assertEqualToResult (sample (Bernoulli))) | (True False) | (False True) | | PASS | [PROB-DEP-TYPES.PROB-DEP-TYPES.03](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.03) | (assertEqualToResult (sample (ColDist))) | (Red Green Red Blue) | (Blue Green Red) | | PASS | [PROB-DEP-TYPES.PROB-DEP-TYPES.04](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.04) | (assertEqualToResult (sample (ColDist))) | (Red Green Red Blue) | (Blue Green Red) | | PASS | [PROB-DEP-TYPES.PROB-DEP-TYPES.05](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.05) | (assertEqualToResult (sample (HybridDist))) | (True False Red Green Red Blue) | (Blue False Green Red True) | | PASS | [PROB-DEP-TYPES.PROB-DEP-TYPES.06](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.06) | (assertEqualToResult (sample (HybridDist))) | (True False Red Green Red Blue) | (Blue False Green Red True) | | FAIL | [PROB-DEP-TYPES.PROB-DEP-TYPES.07](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.07) | (assertEqualToResult (HybridPerm (sample (HybridDist)))) | (False (ColPerm True) True (ColPerm False) (Not Red) Green (Not Green) Blue (Not Red) Green (Not Blu... | (Blue False Green Red True) | | FAIL | [PROB-DEP-TYPES.PROB-DEP-TYPES.08](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.08) | (assertEqualToResult (HybridPerm (sample (HybridDist)))) | (False (ColPerm True) True (ColPerm False) (Not Red) Green (Not Green) Blue (Not Red) Green (Not Blu... | (Blue False Green Red True) | | FAIL | [PROB-DEP-TYPES.PROB-DEP-TYPES.09](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.09) | (assertEqualToResult (sample (SecondOrderColDist))) | ((thunk Red) (thunk Green) (thunk Red) (thunk Blue) (thunk Red) (thunk Green) (thunk Red) (thunk Red... | ((thunk (ColPerm (sample (ColDist)))) (thunk (random Red (random Green Blue)))) | | FAIL | [PROB-DEP-TYPES.PROB-DEP-TYPES.10](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.10) | (assertEqualToResult (sample (SecondOrderColDist))) | ((thunk Red) (thunk Green) (thunk Red) (thunk Blue) (thunk Red) (thunk Green) (thunk Red) (thunk Red... | ((thunk (ColPerm (sample (ColDist)))) (thunk (random Red (random Green Blue)))) | | PASS | [PROB-DEP-TYPES.PROB-DEP-TYPES.11](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.11) | (assertEqualToResult (sample (FlattenedColDist))) | (Red Green Red Blue Red Green Red Red Green Green Green Blue Green Green Green Red Red Green Red Blu... | (Blue Green Red) | | PASS | [PROB-DEP-TYPES.PROB-DEP-TYPES.12](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.12) | (assertEqualToResult (sample (FlattenedColDist))) | (Red Green Red Blue Red Green Red Red Green Green Green Blue Green Green Green Red Red Green Red Blu... | (Blue Green Red) | | FAIL | [PROB-DEP-TYPES.PROB-DEP-TYPES.13](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.13) | (assertEqualToResult (sample (SecondOrderHybridDist))) | ((thunk True) (thunk False) (thunk True) (thunk (ColPerm True)) (thunk True) (thunk True) (thunk Tru... | ((thunk (HybridPerm (sample (HybridDist)))) (thunk (f (sample (Bernoulli))))) | | FAIL | [PROB-DEP-TYPES.PROB-DEP-TYPES.14](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.14) | (assertEqualToResult (sample (SecondOrderHybridDist))) | ((thunk True) (thunk False) (thunk True) (thunk (ColPerm True)) (thunk True) (thunk True) (thunk Tru... | ((thunk (HybridPerm (sample (HybridDist)))) (thunk (f (sample (Bernoulli))))) | | FAIL | [PROB-DEP-TYPES.PROB-DEP-TYPES.15](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.15) | (assertEqualToResult (sample (FlattenedHybridDist))) | (True False True (ColPerm True) True True True (ColPerm False) True (Not Red) True Green True (Not G... | (Blue False Green Red True) | | FAIL | [PROB-DEP-TYPES.PROB-DEP-TYPES.16](https://logicmoo.org/public/mettareports/prob-dep-types/prob_dep_types.metta.html#PROB-DEP-TYPES.PROB-DEP-TYPES.16) | (assertEqualToResult (sample (FlattenedHybridDist))) | (True False True (ColPerm True) True True True (ColPerm False) True (Not Red) True Green True (Not G... | (Blue False Green Red True) | | PASS | [SICP-BOOK.CHAPTER-1-1.01](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.01) | (assertEqual (sqr 21)) | (441) | (441) | | PASS | [SICP-BOOK.CHAPTER-1-1.02](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.02) | (assertEqual (sqr (+ 2 5))) | (49) | (49) | | PASS | [SICP-BOOK.CHAPTER-1-1.03](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.03) | (assertEqual (sqr (sqr 3))) | (81) | (81) | | PASS | [SICP-BOOK.CHAPTER-1-1.04](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.04) | (assertEqual (sum-of-squares 3 4)) | (25) | (25) | | PASS | [SICP-BOOK.CHAPTER-1-1.05](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.05) | (assertEqual (f 5)) | (136) | (136) | | PASS | [SICP-BOOK.CHAPTER-1-1.06](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.06) | (assertEqual (abs -5)) | (5) | (5) | | PASS | [SICP-BOOK.CHAPTER-1-1.07](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.07) | (assertEqual (_abs -5)) | (5) | (5) | | PASS | [SICP-BOOK.CHAPTER-1-1.08](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.08) | (assertEqual (>= 6 5)) | (True) | (True) | | PASS | [SICP-BOOK.CHAPTER-1-1.09](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.09) | (assertEqual (exercise_1_3 1 2 5)) | (29) | (29) | | PASS | [SICP-BOOK.CHAPTER-1-1.10](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.10) | (assertEqual (exercise_1_3 1 5 2)) | (29) | (29) | | PASS | [SICP-BOOK.CHAPTER-1-1.11](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.11) | (assertEqual (exercise_1_3 2 1 5)) | (29) | (29) | | PASS | [SICP-BOOK.CHAPTER-1-1.12](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.12) | (assertEqual (exercise_1_3 2 5 1)) | (29) | (29) | | PASS | [SICP-BOOK.CHAPTER-1-1.13](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.13) | (assertEqual (exercise_1_3 5 1 2)) | (29) | (29) | | PASS | [SICP-BOOK.CHAPTER-1-1.14](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.14) | (assertEqual (exercise_1_3 5 2 1)) | (29) | (29) | | PASS | [SICP-BOOK.CHAPTER-1-1.15](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.15) | (assertEqual (a-plus-abs-b 5 -5)) | (10) | (10) | | PASS | [SICP-BOOK.CHAPTER-1-1.16](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.16) | (assertEqualToResult (test 0 (p))) | (0) | (0) | | PASS | [SICP-BOOK.CHAPTER-1-1.17](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.17) | (assertEqual (sqrt 9)) | (3.00009155413138) | (3.00009155413138) | | PASS | [SICP-BOOK.CHAPTER-1-1.18](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.18) | (assertEqual (sqrt (+ (sqrt 2) (sqrt 3)))) | (1.7739013287063172) | (1.7739279023207892) | | PASS | [SICP-BOOK.CHAPTER-1-1.19](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.19) | (assertEqual (better-sqrt 9)) | (3.0) | (3.0) | | PASS | [SICP-BOOK.CHAPTER-1-1.20](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.20) | (assertEqual (better-sqrt (+ (better-sqrt 2) (better-sqrt 3)))) | (1.773771228186423) | (1.773771228186423) | | PASS | [SICP-BOOK.CHAPTER-1-1.21](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.21) | (assertEqual (better-sqrt (sqr 1000))) | (1000.0) | (1000) | | PASS | [SICP-BOOK.CHAPTER-1-1.22](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_1.metta.html#SICP-BOOK.CHAPTER-1-1.22) | (assertEqual (cube (cubert 8))) | (8.000000000144743) | (8.000000000144743) | | PASS | [SICP-BOOK.CHAPTER-1-2.01](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.01) | (assertEqualToResult (extend-py! additional_funcs)) | () | () | | PASS | [SICP-BOOK.CHAPTER-1-2.02](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.02) | (assertEqual (factorial 5)) | (120) | (120) | | PASS | [SICP-BOOK.CHAPTER-1-2.03](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.03) | (assertEqual (ifactorial 5)) | (120) | (120) | | PASS | [SICP-BOOK.CHAPTER-1-2.04](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.04) | (assertEqual (fib 7)) | (13) | (13) | | PASS | [SICP-BOOK.CHAPTER-1-2.05](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.05) | (assertEqual (ifib 7)) | (13) | (13) | | PASS | [SICP-BOOK.CHAPTER-1-2.06](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.06) | (assertEqual (count-change 20)) | (9) | (9) | | PASS | [SICP-BOOK.CHAPTER-1-2.07](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.07) | (assertEqual (exercise_1_11r 7)) | (37) | (37) | | PASS | [SICP-BOOK.CHAPTER-1-2.08](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.08) | (assertEqual (exercise_1_11i 7)) | (37) | (37) | | PASS | [SICP-BOOK.CHAPTER-1-2.09](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.09) | (assertEqual (pascal_triangle_element 5 3)) | (6) | (6) | | PASS | [SICP-BOOK.CHAPTER-1-2.10](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.10) | (assertEqual (pascal_triangle_element 4 3)) | (3) | (3) | | PASS | [SICP-BOOK.CHAPTER-1-2.11](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.11) | (assertEqual (expt 2 3)) | (8) | (8) | | PASS | [SICP-BOOK.CHAPTER-1-2.12](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.12) | (assertEqual (iexpt 2 3)) | (8) | (8) | | PASS | [SICP-BOOK.CHAPTER-1-2.13](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.13) | (assertEqual (fast-expt 2 3)) | (8) | (8) | | PASS | [SICP-BOOK.CHAPTER-1-2.14](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.14) | (assertEqual (ifast-expt 2 3)) | (8) | (8) | | PASS | [SICP-BOOK.CHAPTER-1-2.15](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.15) | (assertEqual (mul 15 24)) | (360) | (360) | | PASS | [SICP-BOOK.CHAPTER-1-2.16](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.16) | (assertEqual (imul 15 24)) | (360) | (360) | | PASS | [SICP-BOOK.CHAPTER-1-2.17](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.17) | (assertEqual (lfib 8)) | (21) | (21) | | PASS | [SICP-BOOK.CHAPTER-1-2.18](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.18) | (assertEqual (gcd 206 40)) | (2) | (2) | | PASS | [SICP-BOOK.CHAPTER-1-2.19](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.19) | (assertEqual (prime? 10)) | (False) | (False) | | PASS | [SICP-BOOK.CHAPTER-1-2.20](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_2.metta.html#SICP-BOOK.CHAPTER-1-2.20) | (assertEqual (prime? 11)) | (True) | (True) | | PASS | [SICP-BOOK.CHAPTER-1-3.01](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_3.metta.html#SICP-BOOK.CHAPTER-1-3.01) | (assertEqual (sum-cubes 1 10)) | (3025) | (3025) | | PASS | [SICP-BOOK.CHAPTER-1-3.02](https://logicmoo.org/public/mettareports/SICP_book/chapter_1_3.metta.html#SICP-BOOK.CHAPTER-1-3.02) | (assertEqual (sum-integers 1 10)) | (55) | (55) | | FAIL | [STACK-BASED.INTERPRETER.01](https://logicmoo.org/public/mettareports/stack-based/interpreter.metta.html#STACK-BASED.INTERPRETER.01) | (assertEqualToResult (f1 (basic E))) | ((basic ((E 2) $_516692)) (basic E) (basic E) (basic E)) | ((basic E)) | | PASS | [STACK-BASED.REWRITES.01](https://logicmoo.org/public/mettareports/stack-based/rewrites.metta.html#STACK-BASED.REWRITES.01) | (assertEqualToResult (E (put 2))) | ((E 2)) | ((E 2)) | | PASS | [STACK-BASED.REWRITES.02](https://logicmoo.org/public/mettareports/stack-based/rewrites.metta.html#STACK-BASED.REWRITES.02) | (assertEqualToResult ((E (put 2)) (put 3))) | (((E 2) 3) ((E 2) 3)) | (((E 2) 3)) | | FAIL | [STACK-BASED.REWRITES.03](https://logicmoo.org/public/mettareports/stack-based/rewrites.metta.html#STACK-BASED.REWRITES.03) | (assertEqualToResult (((E (put 2)) (put 3)) add)) | ((E (+ (put 2) (put 3))) (E (+ (put 2) 3)) (E (+ 2 $_461972)) (E (+ 2 $_461936)) (E (+ 2 $_461900)) ... | ((E 5)) | | PASS | [TRAVERSER.BASIC.01](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.01) | (assertEqualToResult (transform (json $_ (id $id)) $id)) | (1 2 3 4 5 6) | (1 2 3 4 5 6) | | FAIL | [TRAVERSER.BASIC.02](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.02) | (assertEqualToResult (transform_ (, (json $i (id $id)) (json $i (label $label))) (Node $label $id))) | ((Node person $_186356) (Node person $_186332) (Node software $_186308) (Node person $_186284) (Node... | ((Node person 1) (Node person 2) (Node person 4) (Node person 6) (Node software 3) (Node software 5)) | | FAIL | [TRAVERSER.BASIC.03](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.03) | (assertEqualToResult (transform_ (, (json $i (id $id)) (json $i (properties (age 0 (value $age))))) (Prop age $age $id))) | ((Prop age 29 $_423642) (Prop age 27 $_423612) (Prop age 32 $_423582) (Prop age 35 $_423552)) | ((Prop age 27 2) (Prop age 29 1) (Prop age 32 4) (Prop age 35 6)) | | FAIL | [TRAVERSER.BASIC.04](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.04) | (assertEqualToResult (transform_ (, (json $i (id $id)) (json $i (properties (name 0 (value $name))))) (Prop name $name $id))) | ((Prop name marko $_191814) (Prop name vadas $_191784) (Prop name lop $_191754) (Prop name josh $_19... | ((Prop name josh 4) (Prop name lop 3) (Prop name marko 1) (Prop name peter 6) (Prop name ripple 5) (Prop name vadas 2)) | | FAIL | [TRAVERSER.BASIC.05](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.05) | (assertEqualToResult (transform_ (, (json $i (id $src)) (json $i (outE ($label $k (inV $dst)))) (json $i (outE ($label $k (properties (weight $weight)))))) (Outgoing $src $label $dst $weight))) | () | ((Outgoing 1 created 3 0.4) (Outgoing 1 knows 2 0.5) (Outgoing 1 knows 4 1.0) (Outgoing 4 created 3 0.4) (Outgoing 4 created 5 1.0) (Outgoing 6 created 3 0.2)) | | FAIL | [TRAVERSER.BASIC.06](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.06) | (assertEqualToResult (V)) | ((Node person $_182644) (Node person $_182620) (Node software $_182596) (Node person $_182572) (Node... | ((Node person 1) (Node person 2) (Node person 4) (Node person 6) (Node software 3) (Node software 5)) | | FAIL | [TRAVERSER.BASIC.07](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.07) | (assertEqualToResult (V 1)) | ((Node person 1) (Node person 1) (Node software 1) (Node person 1) (Node software 1) (Node person 1)... | ((Node person 1)) | | FAIL | [TRAVERSER.BASIC.08](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.08) | (assertEqualToResult (values name (V 1))) | (marko vadas lop josh ripple peter marko vadas lop josh ripple peter marko vadas lop josh ripple pet... | (marko) | | FAIL | [TRAVERSER.BASIC.09](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.09) | (assertEqualToResult (outE knows (V 1))) | () | ((Outgoing 1 knows 2 0.5) (Outgoing 1 knows 4 1.0)) | | FAIL | [TRAVERSER.BASIC.10](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.10) | (assertEqualToResult (values name (inV (outE knows (V 1))))) | ((values name (inV (outE knows (V 1))))) | (josh vadas) | | FAIL | [TRAVERSER.BASIC.11](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.11) | (assertEqualToResult (values name (out knows (V 1)))) | ((values name (out knows (V 1)))) | (josh vadas) | | FAIL | [TRAVERSER.BASIC.12](https://logicmoo.org/public/mettareports/traverser/basic.metta.html#TRAVERSER.BASIC.12) | (assertEqualToResult (values name (has age (gt 30) (out knows (V 1))))) | ((values name (has age (gt 30) (out knows (V 1))))) | (josh) | | FAIL | [TRAVERSER.CREATION.01](https://logicmoo.org/public/mettareports/traverser/creation.metta.html#TRAVERSER.CREATION.01) | (assertEqualToResult (addE v1 created v2 0.4)) | ((Outgoing created 0 created 0 0.4)) | ((Outgoing created 0 created 1 0.4)) | | FAIL | [TRAVERSER.CREATION.02](https://logicmoo.org/public/mettareports/traverser/creation.metta.html#TRAVERSER.CREATION.02) | (assertEqualToResult (? (Node $label $id))) | ((Node person 0) (Node software 0)) | ((Node person 0) (Node software 1)) | | FAIL | [TRAVERSER.CREATION.03](https://logicmoo.org/public/mettareports/traverser/creation.metta.html#TRAVERSER.CREATION.03) | (assertEqualToResult (? (Prop $p $v $id))) | () | ((Prop age 29 0) (Prop lang java 1) (Prop name lop 1) (Prop name marko 0)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_100812.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_100916.metta.html#FORMULA.DEDUCTIONFORMULATEST.01) | (assertEqualToResult (max 3 4)) | (4) | (4) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_101060.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.20](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_101382.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.20) | (assertEqual (bc_em (→ A B) (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_101390.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &goal_events $_95478 $_95478) ((%void% 42)))) | () | () | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.29](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_102978.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.29) | (assertEqual (bc_dem (: $_2500 (→ A C)) (fromNumber 2))) | ((: (Deduction ab bc) (→ A C))) | ((: (Deduction ab bc) (→ A C))) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_103774.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.11) | (assertEqual (bc_bem A Z)) | (A) | (A) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_103828.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04) | (assertEqualToResult (match &kb ($_92140 is-a Color) (match &self ($_92210 is $_92140) $_92210))) | (Ball) | (Ball) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_103966.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.06) | (assertEqualToResult (range 2 6)) | ((2 3 4 5)) | ((2 3 4 5)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_104132.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_101108)) | ((State (A B) $_101108)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_105276.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_105658.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_105778.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_102862)) | ((State 30)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_105780.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_105884.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03) | (assertEqual (insert 2 (insert 1 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_105920.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_106066.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07) | (assertEqualToResult (get-type ((curry-a + 2) "S"))) | (Number) | () | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_10646.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.02) | (assertEqual (bc_bare B kb_bare rb_bare (fromNumber 1))) | (B) | (B) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_107158.metta.html#METTA-MORPH-TESTS.MATCH-VOID.02) | (assertEqualToResult (add-atom &belief_events belief1)) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_108042.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03) | (assertEqual (match &self (= (status (Goal $_102296)) &state-active) $_102296)) | () | (meditation) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_10844.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06) | (assertEqual (case (match &kb ($_2448 B_AS $_2472) ($_2448 $_2472)) (((SS-P_AS $_2532) (P_AS $_2532)) ((SS-Q_AS $_2532) (Q_AS $_2532)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_109952.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC "5")))) | () | () | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_11072.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($A mortal) (mortal $A))))) | ((mortal man)) | ((mortal man)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_110824.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $_96046 $_96046) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_110838.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $_96060 $_96060) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_110892.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13) | (assertEqual (of-same-type Green Red)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_111288.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_111444.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_111764.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22) | (assertEqualToResult (fact 5)) | (120) | (120) | | PASS | [COMMON.NUMTEST.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_112678.metta.html#COMMON.NUMTEST.10) | (assertEqual (synthesize (: $_40284 (⍃ (fromNumber 2) (fromNumber 7))) kb rb (fromNumber 5))) | ((: (SuccMonotonicity (SuccMonotonicity ZeroLTSucc)) (⍃ (S (S Z)) (S (S (S (S (S (S (S Z)))))))))) | ((: (SuccMonotonicity (SuccMonotonicity ZeroLTSucc)) (⍃ (S (S Z)) (S (S (S (S (S (S (S Z)))))))))) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_113528.metta.html#FORMULA.DEDUCTIONFORMULATEST.02) | (assertEqualToResult (min 3 4)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_114782.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $_103776 $_103776) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_114796.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $_103790 $_103790) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_114968.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $1 $1)) | (1 2) | (1 2) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_116684.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.06) | (assertEqual (case 5 ((6 OK)))) | () | () | | PASS | [BACKWARD-CHAINING.BC-XP.19](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_116758.metta.html#BACKWARD-CHAINING.BC-XP.19) | (assertEqualToResult (bc_em C (fromNumber 2))) | (C) | (C) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_11680.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04) | (assertEqual (Add Z (S Z))) | ((S Z)) | ((S Z)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_117288.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_118198.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04) | (assertEqual (insert 1 (insert 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_118578.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_115648)) | ((State 30)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_118896.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09) | (assertEqual (g 2)) | (102) | (102) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_119262.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $_104484 $_104484) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_119692.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_120506.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08) | (assertEqualToResult (get-type (= SocratesIsHuman SocratesIsMortal))) | (Type) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_121162.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $_111752) $_111752)) | (F) | (F) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_121220.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06) | (assertEqual (if (== (get-state (status (Goal $_101558))) active) $_101558 (superpose ()))) | () | (lunch-order) | | PASS | [METTA-MORPH-TESTS.TESTS0.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_121998.metta.html#METTA-MORPH-TESTS.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A | B) --> cat) (1.0... | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_122628.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07) | (assertEqual (get-type (Left 5))) | (Either) | (Either) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_12316.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_12450.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04) | (assertEqual (Something? (Add (S Z) (S Z)))) | ((Something? (S (S Z)))) | ((Something? (S (S Z)))) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_125616.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.02) | (assertEqualToResult (add-atom &kb (: ab (→ A B)))) | () | (()) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_125906.metta.html#FORMULA.DEDUCTIONFORMULATEST.03) | (assertEqualToResult (and True True)) | (True) | (True) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_126282.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03) | (assertEqual (get-type (new-state 2))) | ((MonadicState Number)) | ((StateMonad Number)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_12630.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (add-atom &attentional_focus 1)) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.21](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_126434.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.21) | (assertEqual (bc_em (→ B C) (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_126478.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03) | (assertEqual (Add (S Z) (S Z))) | ((S (S Z))) | ((S (S Z))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_12702.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_9786)) | ((State 30)) | | PASS | [BACKWARD-CHAINING.BC-XP.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_127292.metta.html#BACKWARD-CHAINING.BC-XP.03) | (assertEqual (bc_bare C kb_bare rb_bare (fromNumber 2))) | (C) | (C) | | PASS | [METTA-MORPH-TESTS.TESTS0.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_127816.metta.html#METTA-MORPH-TESTS.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A | B) --> cat) (1.0... | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_127846.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_128212.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12) | (assertEqual ((lambda $_117622 (+ $_117622 1)) 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_128684.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_128984.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04) | (assertEqual (if (== (get-state (status (Goal $_118648))) active) $_118648 (superpose ()))) | () | (lunch-order) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_129008.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $_118002 $_118002) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [BACKWARD-CHAINING.BC-XP.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_129284.metta.html#BACKWARD-CHAINING.BC-XP.11) | (assertEqual (bc_bem A Z)) | (A) | (A) | | FAIL | [METTA-MORPH-TESTS.MINNARS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_129494.metta.html#METTA-MORPH-TESTS.MINNARS.01) | (assertEqualToResult (Question ((Sentence (((ExtSet garfield) --> cat) (1.0 0.9)) (1)) (Sentence (((cat x sky) --> like) (1.0 0.9)) (2)) (Sentence ((sky --> (IntSet blue)) (1.0 0.9)) (3)) (Sentence ((... | () | (((1.0 0.37946790052053214) (2 1 3 4))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_129932.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04) | (assertEqual (color)) | (green yellow red) | (green yellow red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_130534.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05) | (assertEqual (let $_115896 (new-state 1) (get-type $_115896))) | ((StateMonad Number)) | ((StateMonad Number)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_131336.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_131398.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_133242.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_133300.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (match &belief_events $1 $1)) | (belief1) | (belief1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_133936.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_134134.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25) | (assertEqual (eq Z (Add Z Z))) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_13548.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03) | (assertEqual (get-type (new-state 2))) | ((MonadicState Number)) | ((StateMonad Number)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_135836.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $_126162 $_126162) ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_135850.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $_126176 $_126176) ((%void% 42)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_136654.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01) | (assertEqual (match &self (= (color) $_130336) $_130336)) | (green yellow red) | (red yellow green) | | PASS | [BACKWARD-CHAINING.BC-XP.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_137256.metta.html#BACKWARD-CHAINING.BC-XP.07) | (assertEqualToResult (bc_eq C kb_eq (fromNumber 2))) | (C) | (C) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_137738.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.08) | (assertEqual (bc_eq (→ A B) kb_eq (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_138008.metta.html#FORMULA.DEDUCTIONFORMULATEST.04) | (assertEqualToResult (or True False)) | (True) | (True) | | FAIL | [CURRIED-CHAINING.CURRIED-CHAINER.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_138442.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.07) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_138744.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.08) | (assertEqual (case (+ 1 (superpose (1 2 3))) (($_118604 (+ 1 $_118604))))) | (3 4 5) | (3 4 5) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_138988.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.07) | (assertEqual (case (+ 1 (superpose (1 2 3))) ((3 OK-3) (4 OK-4)))) | (OK-3 OK-4) | (OK-3 OK-4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_140558.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10) | (assertEqual (is (air dry))) | ((start humidifier) (start kettle) (stop ventilation)) | ((stop ventilation) (start kettle) (start humidifier)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_140980.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.12) | (assertEqual (bc_bem B (fromNumber 1))) | (B) | (B) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_141224.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_141256.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_141596.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_141610.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [BACKWARD-CHAINING.BC-XP.20](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_142166.metta.html#BACKWARD-CHAINING.BC-XP.20) | (assertEqual (bc_em (→ A B) (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | PASS | [BACKWARD-CHAINING.BC-XP.29](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_143262.metta.html#BACKWARD-CHAINING.BC-XP.29) | (assertEqual (bc_dem (: $_29290 (→ A C)) (fromNumber 2))) | ((: (Deduction ab bc) (→ A C))) | ((: (Deduction ab bc) (→ A C))) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_14480.metta.html#METTA-MORPH-TESTS.STATES-SPACES.06) | (assertEqual (match &WU $_2274 $_2274)) | (b) | (b) | | PASS | [METTA-MORPH-TESTS.TESTS0.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_145994.metta.html#METTA-MORPH-TESTS.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_146166.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04) | (assertEqual (Something? (Add (S Z) (S Z)))) | ((Something? (S (S Z)))) | ((Something? (S (S Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_146294.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04) | (assertEqualToResult (< 4 (+ 2 (* 3 5)))) | (True) | (True) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_14632.metta.html#METTA-MORPH-TESTS.MATCH-VOID.06) | (assertEqualToResult (case (match &belief_events $_3626 $_3626) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_14674.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14) | (assertEqual (let (List $_3096) (get-type (Cons 5 (Cons 6 Nil))) $_3096)) | (Number) | (Number) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_14738.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_147406.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_148344.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01) | (assertEqual (get-type (Mortal Plato))) | (Type) | (Type) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_14922.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (match &concepts $_8568 $_8568)) | (2) | (2) | | PASS | [FORMULA.DEDUCTIONFORMULATEST.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_149888.metta.html#FORMULA.DEDUCTIONFORMULATEST.05) | (assertEqualToResult (<= 5 4)) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_150034.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_150062.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $_140388 $_140388) ((%void% 42)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_15068.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_151080.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_151514.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_152948.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.03) | (assertEqual (+ 1 2)) | (3) | (3) | | FAIL | [METTA-MORPH-TESTS.TESTS0.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_15298.metta.html#METTA-MORPH-TESTS.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | ((|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.... | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_153864.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_153924.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04) | (assertEqual (deduce (Evaluation (mortal Plato)))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_154054.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10) | (assertEqual (f 2)) | (103) | (103) | | FAIL | [METTA-MORPH-TESTS.TESTS0.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_154336.metta.html#METTA-MORPH-TESTS.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | ((|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.... | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.TESTS0.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_154656.metta.html#METTA-MORPH-TESTS.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_154702.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | (EmptyType) | ((StateMonad String)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_157580.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26) | (assertEqual (let $_145490 (Add Z Z) (eqa Z $_145490))) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_158860.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case belief1 ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_159752.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_160694.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_161162.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.09) | (assertEqualToResult (superpose ())) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_161338.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.08) | (assertEqual (case (+ 1 (superpose (1 2 3))) (($_154180 (+ 1 $_154180))))) | (3 4 5) | (3 4 5) | | FAIL | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.22](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_161712.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.22) | (assertEqual (bc_em (→ A C) (fromNumber 2))) | () | ((→ A C)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_161724.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_161898.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $_152222 color) $_152222)) | (red green blue) | (blue green red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_162712.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05) | (assertEqual (eq (S K K x) x)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_163554.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01) | (assertEqual (get-type (curry +))) | ((-> Number (-> Number Number))) | ((-> Number (-> Number Number))) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_163766.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.04) | (assertEqualToResult (bc_bare D kb_bare rb_bare (fromNumber 4))) | () | () | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_163928.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_164512.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_164534.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08) | (assertEqual ((curry-a + 2) 3)) | (5) | (5) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_166358.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [BACKWARD-CHAINING.BC-XP.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_166474.metta.html#BACKWARD-CHAINING.BC-XP.12) | (assertEqual (bc_bem B (fromNumber 1))) | (B) | (B) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_166864.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09) | (assertEqual (eq (Add Z Z) Z)) | (T) | (T) | | PASS | [BACKWARD-CHAINING.BC-XP.21](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_167202.metta.html#BACKWARD-CHAINING.BC-XP.21) | (assertEqual (bc_em (→ B C) (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_168860.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05) | (assertEqual (collapse (shape))) | (((shape))) | (((shape))) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_169116.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $_153674 $_153674) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_169130.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $_153688 $_153688) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_170222.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06) | (assertEqual (get-type &state-token)) | ((StateMonad Expression)) | ((StateMonad Expression)) | | PASS | [COMMON.INTEST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_170814.metta.html#COMMON.INTEST.01) | (assertEqual (synthesize (: $_149000 (∉ Z ∅)) kb rb Z)) | ((: NotInEmpty (∉ Z ∅))) | ((: NotInEmpty (∉ Z ∅))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_172646.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02) | (assertEqual (collapse (match &self (= (shape) $_166952) $_166952))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_173504.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06) | (assertEqualToResult (eq Green Blue)) | ((eq Green Blue)) | ((eq Green Blue)) | | PASS | [PLN.CURRIED-CHAINER.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_176070.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_176076.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_176194.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.09) | (assertEqualToResult (superpose ())) | () | () | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_176392.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_177554.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $_162112 $_162112) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_178484.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.03) | (assertEqualToResult (add-atom &kb (: ModusPonens (-> (→ $_155450 $_155472) (-> $_155450 $_155472))))) | () | (()) | | PASS | [BACKWARD-CHAINING.BC-XP.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_178698.metta.html#BACKWARD-CHAINING.BC-XP.08) | (assertEqual (bc_eq (→ A B) kb_eq (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_178788.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.09) | (assertEqual (bc_eq (→ B C) kb_eq (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_179370.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01) | (assertEqual (Add S Z)) | (S) | (S) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_180282.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_180684.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13) | (assertEqual ((lambda ($_167050 $_167072) (+ $_167050 $_167072)) (2 7))) | (9) | (9) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_18178.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04) | (assertEqual (insert 1 (insert 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_182368.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05) | (assertEqual (let $_175500 (new-state 1) (get-type $_175500))) | ((StateMonad Number)) | ((StateMonad Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_182552.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | (T) | | PASS | [COMMON.ORDEREDSETTEST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_183408.metta.html#COMMON.ORDEREDSETTEST.01) | (assertEqual (elem 1 ∅)) | (False) | (False) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_184190.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.10) | (assertEqualToResult (collapse (superpose ()))) | () | (()) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_186498.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_187124.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &belief_events $1 $1) ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_18750.metta.html#METTA-MORPH-TESTS.STATES-SPACES.01) | (assertEqual (match &WU $_12338 $_12338)) | (b) | (b) | | FAIL | [METTA-MORPH-TESTS.TESTS0.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_187844.metta.html#METTA-MORPH-TESTS.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | ((|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.... | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_188206.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.13) | (assertEqualToResult (bc_bem C (fromNumber 2))) | (C) | (C) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_188300.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05) | (assertEqual (get-type (ConsN "1" (ConsN "2" NilN)))) | ((VecN String 2)) | ((VecN String 2)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_190172.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_191290.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.10) | (assertEqualToResult (collapse (superpose ()))) | () | (()) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_192162.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_194602.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $_180492 $_180492) ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_194616.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $_180506 $_180506) ((%void% 42)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_198126.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05) | (assertEqual (explain (Evaluation (mortal Plato)))) | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato... | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato))))) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_19852.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.04) | (assertEqualToResult (range 1 1)) | () | (()) | | PASS | [COMMON.ORDEREDSETTEST.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_198948.metta.html#COMMON.ORDEREDSETTEST.02) | (assertEqual (elem 1 (insert 1 ∅))) | (True) | (True) | | PASS | [PLN.CURRIED-CHAINER.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_199470.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_200500.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_201684.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11) | (assertEqual (is (air wet))) | ((start ventilation) (stop humidifier) (stop kettle)) | ((stop kettle) (stop humidifier) (start ventilation)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_20244.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | FAIL | [BACKWARD-CHAINING.BC-XP.22](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_202464.metta.html#BACKWARD-CHAINING.BC-XP.22) | (assertEqual (bc_em (→ A C) (fromNumber 2))) | () | ((→ A C)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_203040.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $_188930 $_188930) ((%void% 42)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_203126.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05) | (assertEqualToResult (and (> 4 2) (< 4 3))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_204604.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06) | (assertEqualToResult (shape)) | ((shape)) | ((shape)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_205482.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.06) | (assertEqualToResult (range 2 6)) | ((2 3 4 5)) | ((2 3 4 5)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_205764.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03) | (assertEqual (color)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_206116.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.11) | (assertEqualToResult (superpose ((nop 1)))) | () | () | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_20674.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_17758)) | ((State 30)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_207160.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.11) | (assertEqualToResult (superpose ((nop 1)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_207296.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06) | (assertEqual (get-type &state-token)) | ((StateMonad Expression)) | ((StateMonad Expression)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_210146.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_210320.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.05) | (assertEqual (match &m (= (f 2) $_204062) $_204062)) | ((g 3)) | ((g 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_210766.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01) | (assertEqual (TV (And (PA) (PB)))) | ((stv 0.3 0.8)) | ((stv 0.3 0.8)) | | PASS | [BACKWARD-CHAINING.BC-XP.28](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_21144.metta.html#BACKWARD-CHAINING.BC-XP.28) | (assertEqual (bc_dem (: $_11950 (→ B C)) (fromNumber 0))) | ((: bc (→ B C))) | ((: bc (→ B C))) | | PASS | [BACKWARD-CHAINING.BC-XP.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_212850.metta.html#BACKWARD-CHAINING.BC-XP.04) | (assertEqualToResult (bc_bare D kb_bare rb_bare (fromNumber 4))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_213018.metta.html#METTA-MORPH-TESTS.MATCH-VOID.06) | (assertEqualToResult (case (match &belief_events $1 $1) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_21326.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20) | (assertEqualToResult (get-type (fmap (curry-a + 2) (Left "5")))) | () | () | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_21348.metta.html#METTA-MORPH-TESTS.STATES-SPACES.06) | (assertEqual (match &WU $_6560 $_6560)) | (b) | (b) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_213580.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.06) | (assertEqualToResult (range 2 6)) | ((2 3 4 5)) | ((2 3 4 5)) | | PASS | [BACKWARD-CHAINING.BC-XP.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_213684.metta.html#BACKWARD-CHAINING.BC-XP.13) | (assertEqualToResult (bc_bem C (fromNumber 2))) | (C) | (C) | | PASS | [COMMON.ORDEREDSETTEST.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_214234.metta.html#COMMON.ORDEREDSETTEST.03) | (assertEqual (elem 1 (insert 2 ∅))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_214412.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10) | (assertEqualToResult (eq Z (S Z))) | ((eq Z (S Z))) | ((eq Z (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_216040.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15) | (assertEqual (fmap (curry-a + 2) (Something 5))) | ((Something 7)) | ((Something 7)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_21786.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &belief_events $_7678 $_7678) ((%void% 42)))) | () | () | | PASS | [BACKWARD-CHAINING.BC-XP.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_219732.metta.html#BACKWARD-CHAINING.BC-XP.09) | (assertEqual (bc_eq (→ B C) kb_eq (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_220070.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_220328.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.07) | (assertEqualToResult (range 1 10)) | ((1 2 3 4 5 6 7 8 9)) | ((1 2 3 4 5 6 7 8 9)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_221140.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.12) | (assertEqualToResult (collapse (superpose ((nop 1))))) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_221656.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.14) | (assertEqual (bc_bem (→ A B) (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_222592.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02) | (assertEqual (get-type ((curry +) 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_225498.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | FAIL | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_227054.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.10) | (assertEqual (bc_eq (→ A C) kb_eq (fromNumber 2))) | () | ((→ A C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_227488.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06) | (assertEqualToResult (Add Z Ten)) | ((Add Z Ten)) | ((Add Z Ten)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_227604.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09) | (assertEqualToResult (get-type (isLeft 5))) | (Bool) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_22808.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02) | (assertEqualToResult (match &self ($_14956 is-a Color) $_14956)) | () | () | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_22872.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.05) | (assertEqualToResult (range 1 3)) | ((1 2)) | ((1 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_22884.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22) | (assertEqual (let* (($_2544 (Add Z Z)) ($_2592 (Add $_2544 (S Z))) ($_2652 (Add $_2592 (S Z)))) (match &self (= (eq (S (S Z)) $_2652) $_2784) $_2784))) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_229622.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_230110.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02) | (assertEqual (TV (FA))) | () | ((stv 0.4 0.8)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_231162.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_231650.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.07) | (assertEqualToResult (range 1 10)) | ((1 2 3 4 5 6 7 8 9)) | ((1 2 3 4 5 6 7 8 9)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_231660.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.12) | (assertEqualToResult (collapse (superpose ((nop 1))))) | () | (()) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_23230.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | FAIL | [METTA-MORPH-TESTS.TESTS0.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_232594.metta.html#METTA-MORPH-TESTS.TESTS0.03) | (assertEqualToResult (|- (({ a b } --> mwawa) (1.0 0.9)))) | ((({ a } --> mwawa) (1.0 0.81))) | ((({ a } --> mwawa) (1.0 0.81)) (({ b } --> mwawa) (1.0 0.81))) | | FAIL | [METTA-MORPH-TESTS.TESTS0.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_234226.metta.html#METTA-MORPH-TESTS.TESTS0.03) | (assertEqualToResult (|- (({ a b } --> mwawa) (1.0 0.9)))) | ((({ a } --> mwawa) (1.0 0.81))) | ((({ a } --> mwawa) (1.0 0.81)) (({ b } --> mwawa) (1.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_234452.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24) | (assertEqual (fmap-i (curry-a * 2) (Cons 3 (Cons 4 Nil)))) | ((Cons 6 (Cons 8 Nil))) | ((Cons 6 (Cons 8 Nil))) | | PASS | [COMMON.ORDEREDSETTEST.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_234782.metta.html#COMMON.ORDEREDSETTEST.04) | (assertEqual (elem 1 (insert 1 (insert 2 ∅)))) | (True) | (True) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_236214.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_238702.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04) | (assertEqual (color)) | (green yellow red) | (green yellow red) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_238750.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11) | (assertEqual &m) | (&m) | ((: g (-> Number Numer))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_239842.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01) | (assertEqual (TV (And (PA) (PB)))) | ((stv 0.3 0.8)) | ((stv 0.3 0.8)) | | PASS | [METTA-MORPH-TESTS.TESTS0.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_241470.metta.html#METTA-MORPH-TESTS.TESTS0.03) | (assertEqualToResult (|- (({ a b } --> mwawa) (1.0 0.9)))) | ((({ a } --> mwawa) (1.0 0.81)) (({ b } --> mwawa) (1.0 0.81))) | ((({ a } --> mwawa) (1.0 0.81)) (({ b } --> mwawa) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_244590.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (sequential ((increment) (increment) (increment)))))) | (10 11 12 13 14 15) | (10 11 12 13 14 15) | | PASS | [BACKWARD-CHAINING.BC-XP.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_247118.metta.html#BACKWARD-CHAINING.BC-XP.14) | (assertEqual (bc_bem (→ A B) (fromNumber 0))) | ((→ A B)) | ((→ A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_24856.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03) | (assertEqualToResult (match &self (:= (Green $_14136) T) ($_14136 is really green))) | ((Sam is really green)) | ((Sam is really green)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_250222.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06) | (assertEqual (get-type (dropN (ConsN "1" NilN)))) | ((VecN String 0)) | ((VecN String 0)) | | FAIL | [METTA-MORPH-TESTS.TESTS0.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_250498.metta.html#METTA-MORPH-TESTS.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_251906.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06) | (assertEqualToResult (ln (+ 2 2))) | ((ln 4)) | ((ln 4)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_25400.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01) | (assertEqualToResult (match &kb ($_18440 A_AS $_18470) ($_18440 A_AS $_18470))) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_254728.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.15) | (assertEqual (bc_bem (→ B C) (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_255348.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_256084.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16) | (assertEqual (fmap (curry-a + 2) (Nothing))) | ((Nothing)) | ((Nothing)) | | PASS | [COMMON.ORDEREDSETTEST.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_256190.metta.html#COMMON.ORDEREDSETTEST.05) | (assertEqual (elem 1 (insert 2 (insert 3 ∅)))) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_256276.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.COLLAPSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_256848.metta.html#METTA-MORPH-TESTS.COLLAPSE.01) | (assertEqualToResult (collapse (1 2 3))) | (((1 2 3))) | (((1 2 3))) | | PASS | [METTA-MORPH-TESTS.NALIFIER.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_256928.metta.html#METTA-MORPH-TESTS.NALIFIER.01) | (assertEqualToResult (let ($_2454 $_2472) (choiceQuery (((ExtSet sam) --> duck) ((ExtSet sam) --> swan) ((ExtSet sam) --> dog))) $_2454)) | ((((ExtSet sam) --> duck) (1.0 0.6183206106870229))) | ((((ExtSet sam) --> duck) (1.0 0.618320610687023))) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_259994.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_260660.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (sequential ((increment) (increment) (increment)))))) | (10 11 12 13 14 15) | (10 11 12 13 14 15) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_261338.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_261512.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.06) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_261994.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_263448.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05) | (assertEqual (collapse (shape))) | (((shape))) | (((shape))) | | FAIL | [METTA-MORPH-TESTS.TESTS0.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_263946.metta.html#METTA-MORPH-TESTS.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [METTA-MORPH-TESTS.LETLET.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_265832.metta.html#METTA-MORPH-TESTS.LETLET.01) | (assertEqualToResult (let $_248816 (1.0 0.9) (let* ((($_248902 $_248924) $_248816)) ($_248902 $_248924)))) | ((1.0 0.9)) | ((1.0 0.9)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_266734.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | FAIL | [BACKWARD-CHAINING.BC-XP.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_267982.metta.html#BACKWARD-CHAINING.BC-XP.10) | (assertEqual (bc_eq (→ A C) kb_eq (fromNumber 2))) | () | ((→ A C)) | | PASS | [METTA-MORPH-TESTS.TYPES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_268454.metta.html#METTA-MORPH-TESTS.TYPES.01) | (assertEqualToResult (f 42)) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.COLLAPSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_269232.metta.html#METTA-MORPH-TESTS.COLLAPSE.01) | (assertEqualToResult (collapse (1 2 3))) | (((1 2 3))) | (((1 2 3))) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_270268.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [METTA-MORPH-TESTS.TESTS0.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_271570.metta.html#METTA-MORPH-TESTS.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_271918.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17) | (assertEqual (g 2)) | (102) | (102) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_272508.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $_259530) $_259552) $_259552)) | ((* 2 $_259530)) | ((* 2 $_259530)) | | PASS | [COMMON.NUMTEST.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_27254.metta.html#COMMON.NUMTEST.09) | (assertEqual (synthesize (: $_2720 (⍃ (fromNumber 1) (fromNumber 3))) kb rb (S Z))) | ((: (SuccMonotonicity ZeroLTSucc) (⍃ (S Z) (S (S (S Z)))))) | ((: (SuccMonotonicity ZeroLTSucc) (⍃ (S Z) (S (S (S Z)))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_272620.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03) | (assertEqual (TV (croaks Fritz))) | ((stv 0.95 0.85)) | ((stv 0.95 0.85)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_273064.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16) | (assertEqualToResult (sqr 4)) | (16) | (16) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_273076.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_274378.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_274506.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25) | (assertEqualToResult (fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_274594.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | PASS | [METTA-MORPH-TESTS.COLLAPSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_275148.metta.html#METTA-MORPH-TESTS.COLLAPSE.01) | (assertEqualToResult (collapse (1 2 3))) | (((1 2 3))) | (((1 2 3))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_276374.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02) | (assertEqual (TV (FA))) | () | ((stv 0.4 0.8)) | | PASS | [METTA-MORPH-TESTS.IF.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_276576.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_277338.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_277360.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_277858.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.01) | (assertEqual (maybe-inc Nothing)) | (Nothing) | (Nothing) | | PASS | [METTA-MORPH-TESTS.LETLET.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_278216.metta.html#METTA-MORPH-TESTS.LETLET.01) | (assertEqualToResult (let $_261200 (1.0 0.9) (let* ((($_261286 $_261308) $_261200)) ($_261286 $_261308)))) | ((1.0 0.9)) | ((1.0 0.9)) | | PASS | [METTA-MORPH-TESTS.PEANO.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_279278.metta.html#METTA-MORPH-TESTS.PEANO.01) | (assertEqualToResult (Add (S (S Z)) (S (S (S Z))))) | ((S (S (S (S (S Z)))))) | ((S (S (S (S (S Z)))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_279496.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21) | (assertEqual (fact 5)) | (120) | (120) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_27950.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.04) | (assertEqualToResult (range 1 1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_279596.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_279610.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [BACKWARD-CHAINING.BC-XP.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_280174.metta.html#BACKWARD-CHAINING.BC-XP.15) | (assertEqual (bc_bem (→ B C) (fromNumber 0))) | ((→ B C)) | ((→ B C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_280440.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_280520.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | PASS | [METTA-MORPH-TESTS.TYPES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_280838.metta.html#METTA-MORPH-TESTS.TYPES.01) | (assertEqualToResult (f 42)) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_280962.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09) | (assertEqual (get-state (get-token))) | ((C D)) | ((C D)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_281454.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03) | (assertEqualToResult ((curry +) 2)) | (((curry +) 2)) | (((curry +) 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_281648.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_282148.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07) | (assertEqualToResult (dropN NilN)) | ((dropN NilN)) | ((dropN NilN)) | | FAIL | [HYPERON-METTALOG-SANITY.00-LANG-CASE.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_282164.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.13) | (assertEqual (match &self $_276076 $_276076)) | ((Rel-P A B) (Rel-Q A C)) | ((= (Rel-P P P P) 10) (Rel-P A B) (Rel-Q A C)) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_282656.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_28362.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.02) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [METTA-MORPH-TESTS.TYPES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_283798.metta.html#METTA-MORPH-TESTS.TYPES.01) | (assertEqualToResult (f 42)) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.COLLAPSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_283888.metta.html#METTA-MORPH-TESTS.COLLAPSE.01) | (assertEqualToResult (collapse (1 2 3))) | (((1 2 3))) | (((1 2 3))) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_28412.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $_21590 $_21590)) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_284892.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $_271914) $_271936) $_271936)) | ((* 2 $_271914)) | ((* 2 $_271914)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_285378.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04) | (assertEqual (TV (frog Fritz))) | () | ((stv 0.783 0.68)) | | PASS | [COMMON.ORDEREDSETTEST.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_285474.metta.html#COMMON.ORDEREDSETTEST.06) | (assertEqual (elem 2 (insert 1 (insert 2 (insert 3 ∅))))) | (True) | (True) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_285616.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_286078.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_286314.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_287852.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $_271914) $_271936) $_271936)) | ((* 2 $_271914)) | ((* 2 $_271914)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_28844.metta.html#METTA-MORPH-TESTS.MATCH-VOID.06) | (assertEqualToResult (case (match &belief_events $_17838 $_17838) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.LETLET.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_288556.metta.html#METTA-MORPH-TESTS.LETLET.01) | (assertEqualToResult (let $_261200 (1.0 0.9) (let* ((($_261286 $_261308) $_261200)) ($_261286 $_261308)))) | ((1.0 0.9)) | ((1.0 0.9)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_28894.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [METTA-MORPH-TESTS.IF.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_288960.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_290266.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_291016.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_291138.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06) | (assertEqualToResult (shape)) | ((shape)) | ((shape)) | | PASS | [METTA-MORPH-TESTS.PEANO.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_291662.metta.html#METTA-MORPH-TESTS.PEANO.01) | (assertEqualToResult (Add (S (S Z)) (S (S (S Z))))) | ((S (S (S (S (S Z)))))) | ((S (S (S (S (S Z)))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_29178.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01) | (assertEqualToResult (ift (green $_21478) (add-atom &kb (Green $_21478)))) | () | (()) | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_291994.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [METTA-MORPH-TESTS.TYPES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_292538.metta.html#METTA-MORPH-TESTS.TYPES.01) | (assertEqualToResult (f 42)) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_294154.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18) | (assertEqual (f 2)) | (103) | (103) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_294356.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [METTA-MORPH-TESTS.PEANO.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_294622.metta.html#METTA-MORPH-TESTS.PEANO.01) | (assertEqualToResult (Add (S (S Z)) (S (S (S Z))))) | ((S (S (S (S (S Z)))))) | ((S (S (S (S (S Z)))))) | | PASS | [HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_294854.metta.html#HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01) | (assertEqualToResult ((inc) 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.IF.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_294858.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [METTA-MORPH-TESTS.IF.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_294872.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_295394.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17) | (assertEqual (get-type (fmap (curry-a + 1) (Left 5)))) | ((Either Number)) | ((Either Number)) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_29606.metta.html#TRUTHVALUE.TRUTHVALUETEST.08) | (assertEqual (inc-neg-count (STV 1 0))) | ((STV 0.0 0.5)) | ((STV 0 0.5)) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_296592.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $_280654) $_280676) $_280676)) | ((* 2 $_280654)) | ((* 2 $_280654)) | | PASS | [METTA-MORPH-TESTS.LETLET.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_297296.metta.html#METTA-MORPH-TESTS.LETLET.01) | (assertEqualToResult (let $_269940 (1.0 0.9) (let* ((($_270026 $_270048) $_269940)) ($_270026 $_270048)))) | ((1.0 0.9)) | ((1.0 0.9)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_297314.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05) | (assertEqualToResult (match &self (, ($_278062 is $_278092) ($_278092 is-a Color) ($_278062 is-a Planet)) (Color of Planet $_278062 is $_278092))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | FAIL | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_297474.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.16) | (assertEqual (bc_bem (→ A C) (fromNumber 2))) | () | ((→ A C)) | | PASS | [COMMON.ORDEREDSETTEST.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_298070.metta.html#COMMON.ORDEREDSETTEST.07) | (assertEqual (insert 1 ∅)) | ((:: 1 ∅)) | ((:: 1 ∅)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_298182.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02) | (assertEqual (get-type (HumansAreMortal SocratesIsHuman))) | ((Mortal Socrates)) | ((Mortal Socrates)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_298664.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqualToResult (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_299178.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.01) | (assertEqualToResult (superpose (a b c))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_299368.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_299382.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_299418.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10) | (assertEqual (let $_291892 (new-state 1) (change-state! $_291892 (+ (get-state $_291892) 1)))) | ((State 2 $_296450)) | ((State 2 $_296450)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_300678.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05) | (assertEqual (TV (green Fritz))) | () | ((stv 0.7047 0.68)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_30210.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &belief_events $_16102 $_16102) ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_302654.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_302808.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16) | (assertEqual (Green $_293886)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.TESTS0.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_302856.metta.html#METTA-MORPH-TESTS.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | FAIL | [METTA-MORPH-TESTS.TESTS0.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_303194.metta.html#METTA-MORPH-TESTS.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.PEANO.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_303362.metta.html#METTA-MORPH-TESTS.PEANO.01) | (assertEqualToResult (Add (S (S Z)) (S (S (S Z))))) | ((S (S (S (S (S Z)))))) | ((S (S (S (S (S Z)))))) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_303400.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | PASS | [METTA-MORPH-TESTS.IF.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_303598.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_30418.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02) | (assertEqual (get-type (drop (Cons 1 Nil)))) | ((Vec Number Z)) | ((Vec Number Z)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_304250.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_304366.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.02) | (assertEqual (maybe-inc (Just 2))) | ((Just 3)) | ((Just 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_304742.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09) | (assertEqualToResult (nop (change-state! &state-token (C D)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_306188.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01) | (assertEqualToResult (match &self (EvaluationLink (PredicateNode "eats") (ListLink $_295754 (ConceptNode "flies"))) $_295754)) | ((ConceptNode "Sam") (ConceptNode "Fritz")) | ((ConceptNode "Fritz") (ConceptNode "Sam")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_307154.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14) | (assertEqual ((inc) 5)) | (6) | (6) | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_308122.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_308202.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17) | (assertEqual (+ (superpose (1 2 3)) 1)) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_30840.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14) | (assertEqual (g 2)) | (102) | (102) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_308570.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_309020.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.14) | (assertEqualToResult (match &self ($_302164 A $_302194) ($_302164 A $_302194))) | ((Rel-P A B) (Rel-Q A C)) | ((Rel-P A B) (Rel-Q A C)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_31026.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_310288.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_311052.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqualToResult (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_311472.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07) | (assertEqualToResult (pair (bin) (bin))) | ((A A) (A B) (B A) (B B)) | ((A A) (A B) (B A) (B B)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_311562.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.01) | (assertEqualToResult (superpose (a b c))) | (a b c) | (a b c) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_311696.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.08) | (assertEqual (g 2)) | (102) | (102) | | PASS | [METTA-MORPH-TESTS.AND-OR.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_311988.metta.html#METTA-MORPH-TESTS.AND-OR.01) | (assertEqualToResult (If (or (and True False) True) 1 2)) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_313280.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $_307016 (new-state 1) $_307016)) | ((State 1 $_310312)) | ((State 1 $_310312)) | | PASS | [COMMON.ORDEREDSETTEST.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_313300.metta.html#COMMON.ORDEREDSETTEST.08) | (assertEqual (insert 2 (insert 1 ∅))) | ((:: 1 (:: 2 ∅))) | ((:: 1 (:: 2 ∅))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_31376.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16) | (assertEqual (g 2)) | (102) | (102) | | PASS | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_314016.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.02) | (assertEqual (synthesize (: $_65550 (≞ (→ P Q) $_65620)) kb rb Z)) | ((: PQm (≞ (→ P Q) (STV 0.8 0.4)))) | ((: PQm (≞ (→ P Q) (STV 0.8 0.4)))) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_314522.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.01) | (assertEqualToResult (superpose (a b c))) | (a b c) | (a b c) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_315830.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07) | (assertEqualToResult (> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_317310.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_318986.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10) | (assertEqual (get-type (LeftP 5))) | ((EitherP Number)) | ((EitherP Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_320420.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19) | (assertEqualToResult (dup 2)) | (102 12) | (12 102) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_322592.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | FAIL | [BACKWARD-CHAINING.BC-XP.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_322904.metta.html#BACKWARD-CHAINING.BC-XP.16) | (assertEqual (bc_bem (→ A C) (fromNumber 2))) | () | ((→ A C)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_323262.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.01) | (assertEqualToResult (superpose (a b c))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_323456.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.02) | (assertEqualToResult (superpose ((superpose (a b c))))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_324336.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqualToResult (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.AND-OR.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_324358.metta.html#METTA-MORPH-TESTS.AND-OR.01) | (assertEqualToResult (If (or (and True False) True) 1 2)) | (1) | (1) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_324486.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.15) | (assertEqualToResult (superpose ((Rel-P B) (Rel-Q C)))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.23](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_326658.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.23) | (assertEqual (bc_dem (: $_318322 A) Z)) | ((: a A)) | ((: a A)) | | FAIL | [METTA-MORPH-TESTS.TESTS0.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_328356.metta.html#METTA-MORPH-TESTS.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | ((|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.... | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [PLN.CURRIED-CHAINER.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_329786.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_329792.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_330110.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_330268.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12) | (assertEqual (== (let* (($_284236 (collapse (get-atoms &m))) ($_284306 (car-atom $_284236))) (get-type $_284306)) (get-type &self))) | (False) | (False) | | FAIL | [HYPERON-METTALOG-SANITY.00-LANG-CASE.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_330958.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.13) | (assertEqual (match &self $_318326 $_318326)) | ((Rel-P A B) (Rel-Q A C)) | ((= (Rel-P P P P) 10) (Rel-P A B) (Rel-Q A C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_33120.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_331332.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | PASS | [METTA-MORPH-TESTS.AND-OR.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_331764.metta.html#METTA-MORPH-TESTS.AND-OR.01) | (assertEqualToResult (If (or (and True False) True) 1 2)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_332234.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_333076.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqualToResult (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_333464.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10) | (assertEqual (get-state (get-token))) | ((C D)) | ((C D)) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_334914.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_335310.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01) | (assertEqualToResult (match &self (implies (Frog Sam) $_325200) $_325200)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_335326.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_335470.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09) | (assertEqual (f 2)) | (103) | (103) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_335604.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_335840.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.02) | (assertEqualToResult (superpose ((superpose (a b c))))) | (a b c) | (a b c) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_337850.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18) | (assertEqual (fmap (curry-a + 2) (UntypedC 5))) | ((UntypedC 7)) | ((UntypedC 7)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_33794.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.18) | (assertEqual (case (match &self ($_22232 B $_22262) ($_22232 $_22262)) (((Rel-P $_22360) (P $_22360)) ((Rel-Q $_22360) (Q $_22360)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_338100.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [COMMON.ORDEREDSETTEST.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_339088.metta.html#COMMON.ORDEREDSETTEST.09) | (assertEqual (insert 3 (insert 2 (insert 1 ∅)))) | ((:: 1 (:: 2 (:: 3 ∅)))) | ((:: 1 (:: 2 (:: 3 ∅)))) | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_339790.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($_320204 mortal) (mortal $_320204))))) | ((mortal man)) | ((mortal man)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_339818.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (add-atom &attentional_focus 1)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_340414.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04) | (assertEqual (((curry +) 2) 3)) | (5) | (5) | | PASS | [METTA-MORPH-TESTS.AND-OR.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_340504.metta.html#METTA-MORPH-TESTS.AND-OR.01) | (assertEqualToResult (If (or (and True False) True) 1 2)) | (1) | (1) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_341946.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.16) | (assertEqual (match &self ($_335074 A $_335104) ($_335074 $_335104))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_34194.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.05) | (assertEqualToResult (range 1 3)) | ((1 2)) | ((1 2)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_34272.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_34282.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01) | (assertEqual ((let $_28354 (get-atoms &self) (get-type $_28354)))) | (((let $_31738 (get-atoms &self) (get-type $_31738)))) | ((hyperon::space::DynSpace)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_343232.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.02) | (assertEqualToResult (superpose ((superpose (a b c))))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_343970.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_344658.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17) | (assertEqual (match &self (Green $_334562) $_334562)) | (Sam) | (Sam) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_345046.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01) | (assertEqualToResult (add-atom &kb (SS-P_AS A_AS B_AS))) | () | (()) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.24](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_345536.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.24) | (assertEqual (bc_dem (: $_336450 (→ A B)) Z)) | ((: ab (→ A B))) | ((: ab (→ A B))) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_347284.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_347298.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | PASS | [METTA-MORPH-TESTS.TYPES2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_347790.metta.html#METTA-MORPH-TESTS.TYPES2.01) | (assertEqualToResult (get-type lion1)) | (Lion) | (Lion) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_347956.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_347992.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_350814.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.03) | (assertEqualToResult (superpose ((superpose (a b c)) (superpose (x y z))))) | (a b c x y z) | (a b c x y z) | | PASS | [COMMON.NUMTEST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_351486.metta.html#COMMON.NUMTEST.01) | (assertEqual (fromNumber 1)) | ((S Z)) | ((S Z)) | | PASS | [METTA-MORPH-TESTS.TESTS0.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_351778.metta.html#METTA-MORPH-TESTS.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_351972.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.02) | (assertEqualToResult (superpose ((superpose (a b c))))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_352174.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($_332588 mortal) (mortal $_332588))))) | ((mortal man)) | ((mortal man)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_352294.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (add-atom &attentional_focus 1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.TESTS0.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_352682.metta.html#METTA-MORPH-TESTS.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A | B) --> cat) (1.0... | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | PASS | [PLN.CURRIED-CHAINER.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_353186.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_353200.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_353214.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_355276.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_356354.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_356494.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03) | (assertEqualToResult (get-type (HumansAreMortal (Human Socrates)))) | () | () | | PASS | [METTA-MORPH-TESTS.TESTS0.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_356508.metta.html#METTA-MORPH-TESTS.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_356730.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (add-atom &attentional_focus 1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_357050.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (sequential ((increment) (increment) (increment)))))) | (10 11 12 13 14 15) | (10 11 12 13 14 15) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_357274.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01) | (assertEqual (green Fritz)) | (T) | (T) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_357498.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_358090.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($_332588 mortal) (mortal $_332588))))) | ((mortal man)) | ((mortal man)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_358418.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_359252.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06) | (assertEqual (match &m (= (f 2) $_344402) $_344402)) | ((g 3)) | ((g 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_359358.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01) | (assertEqualToResult (get-type &self)) | (hyperon::space::DynSpace) | (hyperon::space::DynSpace) | | PASS | [HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_360238.metta.html#HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01) | (assertEqualToResult (collapse (superpose ((superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (4 5 6 4 5 6 4 5 6 4 5... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 ... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9)) | | PASS | [METTA-MORPH-TESTS.TYPES2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_360264.metta.html#METTA-MORPH-TESTS.TYPES2.01) | (assertEqualToResult (get-type lion1)) | (Lion) | (Lion) | | PASS | [COMMON.ORDEREDSETTEST.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_361066.metta.html#COMMON.ORDEREDSETTEST.11) | (assertEqual (insert (S Z) (insert (S (S Z)) (insert (S Z) (insert Z ∅))))) | ((:: Z (:: (S Z) (:: (S (S Z)) ∅))) (:: Z (:: (S Z) (:: (S (S Z)) ∅))) (:: Z (:: (S Z) (:: (S (S... | ((:: Z (:: (S Z) (:: (S (S Z)) ∅)))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_361678.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10) | (assertEqual &m) | (&m) | ((: g (-> Number Numer))) | | FAIL | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_361954.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | ((g 42 (1 2))) | (1764) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_362506.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01) | (assertEqualToResult (Frog Sam)) | ((Frog Sam)) | ((Frog Sam)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_363094.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.17) | (assertEqual (superpose ((P B) (Q C)))) | ((P B) (Q C)) | ((P B) (Q C)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_36310.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_363198.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.03) | (assertEqualToResult (superpose ((superpose (a b c)) (superpose (x y z))))) | (a b c x y z) | (a b c x y z) | | PASS | [METTA-MORPH-TESTS.TYPES2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_363224.metta.html#METTA-MORPH-TESTS.TYPES2.01) | (assertEqualToResult (get-type lion1)) | (Lion) | (Lion) | | PASS | [METTA-MORPH-TESTS.TYPES3.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_363666.metta.html#METTA-MORPH-TESTS.TYPES3.01) | (assertEqualToResult (match &self (GreaterThan $_332202 $_332224) (If (and (== (get-type $_332202) Number) (== (get-type $_332224) Number)) (If (EqualOrGreater $_332202 $_332224) yay)))) | (yay) | (yay) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_364136.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_36456.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.05) | (assertEqual (case (+ 1 5) (($_25204 (+ 1 $_25204))))) | (7) | (7) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_365470.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (add-atom &attentional_focus 1)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_366298.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03) | (assertEqual (TV (croaks Fritz))) | ((stv 0.95 0.85)) | ((stv 0.95 0.85)) | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_366830.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($_341328 mortal) (mortal $_341328))))) | ((mortal man)) | ((mortal man)) | | PASS | [BACKWARD-CHAINING.BC-XP.23](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_367394.metta.html#BACKWARD-CHAINING.BC-XP.23) | (assertEqual (bc_dem (: $_359074 A) Z)) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_367402.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07) | (assertEqualToResult (pair (bin) (bin))) | ((A A) (A B) (B A) (B B)) | ((A A) (A B) (B A) (B B)) | | PASS | [COMMON.NUMTEST.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_367990.metta.html#COMMON.NUMTEST.02) | (assertEqual (fromNat (S (S Z)))) | (2) | (2) | | FAIL | [METTA-MORPH-TESTS.TESTS0.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_368094.metta.html#METTA-MORPH-TESTS.TESTS0.03) | (assertEqualToResult (|- (({ a b } --> mwawa) (1.0 0.9)))) | ((({ a } --> mwawa) (1.0 0.81))) | ((({ a } --> mwawa) (1.0 0.81)) (({ b } --> mwawa) (1.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_368360.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18) | (assertEqualToResult (bin)) | (0 1) | (0 1) | | PASS | [PLN.CURRIED-CHAINER.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_368642.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [PLN.CURRIED-CHAINER.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_368656.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [PLN.CURRIED-CHAINER.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_368662.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [METTA-MORPH-TESTS.TYPES2.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_368756.metta.html#METTA-MORPH-TESTS.TYPES2.02) | (assertEqualToResult (reproduce lion1 lion2)) | (childlion) | (childlion) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_369048.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $_349800 (new-state 1) (change-state! $_349800 (+ (get-state $_349800) 1)))) | ((State 2 $_364504)) | ((State 2 $_364504)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_369210.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_369224.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_369376.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | () | () | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_369602.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.04) | (assertEqual (bc (: $_353294 A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_369830.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02) | (assertEqualToResult (match &self (implies ($_359690 $_359712) (Green Sam)) ($_359712 might be $_359690))) | ((Sam might be Frog)) | ((Sam might be Frog)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_371346.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | PASS | [METTA-MORPH-TESTS.TYPES2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_371964.metta.html#METTA-MORPH-TESTS.TYPES2.01) | (assertEqualToResult (get-type lion1)) | (Lion) | (Lion) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_373054.metta.html#METTA-MORPH-TESTS.STATES-SPACES.01) | (assertEqualToResult (get-state &FIFO)) | (45) | (45) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.25](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_373472.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.25) | (assertEqual (bc_dem (: $_354896 B) (fromNumber 1))) | ((: (ModusPonens ab a) B)) | ((: (ModusPonens ab a) B)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_373992.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_37538.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_375598.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_376012.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.04) | (assertEqualToResult (superpose ((superpose (a b c)) x y z))) | (a b c x y z) | (a b c x y z) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_376018.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01) | (assertEqualToResult (match &self (:= (S K K x) $_362412) $_362412)) | ((K x (K x))) | ((K x (K x))) | | PASS | [METTA-MORPH-TESTS.TYPES3.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_376050.metta.html#METTA-MORPH-TESTS.TYPES3.01) | (assertEqualToResult (match &self (GreaterThan $_344586 $_344608) (If (and (== (get-type $_344586) Number) (== (get-type $_344608) Number)) (If (EqualOrGreater $_344586 $_344608) yay)))) | (yay) | (yay) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_376368.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02) | (assertEqualToResult (add-atom &kb (SS-Q_AS A_AS C_AS))) | () | (()) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_376502.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.03) | (assertEqualToResult (superpose ((superpose (a b c)) (superpose (x y z))))) | (a b c x y z) | (a b c x y z) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_376720.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $_353700 2))) | ((> 4 (+ $_353700 2))) | ((> 4 (+ $_353700 2))) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_377778.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_378988.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_37932.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | PASS | [COMMON.ORDEREDSETTEST.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_381226.metta.html#COMMON.ORDEREDSETTEST.10) | (assertEqual (insert 2 (insert 3 (insert 2 (insert 1 ∅))))) | ((:: 1 (:: 2 (:: 3 ∅)))) | ((:: 1 (:: 2 (:: 3 ∅)))) | | PASS | [METTA-MORPH-TESTS.TYPES2.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_381230.metta.html#METTA-MORPH-TESTS.TYPES2.02) | (assertEqualToResult (reproduce lion1 lion2)) | (childlion) | (childlion) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_381608.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_38228.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10) | (assertEqual (is (air dry))) | ((start humidifier) (start kettle) (stop ventilation)) | ((stop ventilation) (start kettle) (start humidifier)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_382614.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.18) | (assertEqual (case (match &self ($_374866 B $_374896) ($_374866 $_374896)) (((Rel-P $_374994) (P $_374994)) ((Rel-Q $_374994) (Q $_374994)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_383392.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.01) | (assertEqualToResult (TupleConcat (a b c) (e f g))) | ((a b c e f g)) | ((a b c e f g)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_38378.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.18) | (assertEqual (bc_em B (fromNumber 1))) | (B) | (B) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_383952.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18) | (assertEqual (match &self (Green $_373498) (Green $_373498))) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_385242.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.03) | (assertEqualToResult (superpose ((superpose (a b c)) (superpose (x y z))))) | (a b c x y z) | (a b c x y z) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_385530.metta.html#METTA-MORPH-TESTS.STATES-SPACES.01) | (assertEqualToResult (get-state &FIFO)) | (45) | (45) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_386048.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [BACKWARD-CHAINING.BC-XP.24](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_386256.metta.html#BACKWARD-CHAINING.BC-XP.24) | (assertEqual (bc_dem (: $_377186 (→ A B)) Z)) | ((: ab (→ A B))) | ((: ab (→ A B))) | | PASS | [METTA-MORPH-TESTS.TYPES2.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_387146.metta.html#METTA-MORPH-TESTS.TYPES2.02) | (assertEqualToResult (reproduce lion1 lion2)) | (childlion) | (childlion) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_387442.metta.html#TRUTHVALUE.TRUTHVALUETEST.01) | (assertEqual (count->confidence 1)) | (0.5) | (0.5) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_387616.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $_355776 (superpose (3 4 5)) (If (> $_355776 3) (case (1 $_355776) (((1 3) (f 0)) ((1 4) (42 42)) ($_356082 (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_387728.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_388396.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.04) | (assertEqualToResult (superpose ((superpose (a b c)) x y z))) | (a b c x y z) | (a b c x y z) | | PASS | [METTA-MORPH-TESTS.TYPES2.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_389496.metta.html#METTA-MORPH-TESTS.TYPES2.03) | (assertEqualToResult (get-type Lion)) | (Cat) | (Cat) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_389648.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_390010.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04) | (assertEqual (TV (frog Fritz))) | () | ((stv 0.783 0.68)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_390254.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | PASS | [COMMON.NUMTEST.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_390720.metta.html#COMMON.NUMTEST.03) | (assertEqual (ceil 2.4)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_39202.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [PLN.CURRIED-CHAINER.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_392394.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | PASS | [METTA-MORPH-TESTS.TYPES3.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_393786.metta.html#METTA-MORPH-TESTS.TYPES3.01) | (assertEqualToResult (match &self (GreaterThan $_344586 $_344608) (If (and (== (get-type $_344586) Number) (== (get-type $_344608) Number)) (If (EqualOrGreater $_344586 $_344608) yay)))) | (yay) | (yay) | | PASS | [METTA-MORPH-TESTS.TESTS0.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_393818.metta.html#METTA-MORPH-TESTS.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_393990.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $_382062 (new-state 1) $_382062)) | ((State 1 $_389432)) | ((State 1 $_389432)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_394700.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_394788.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_394802.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_394818.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02) | (assertEqual (frog Sam)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_395070.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01) | (assertEqualToResult (match &self (($_385544 leaf2) leaf3) $_385544)) | (leaf1 (leaf0 leaf1)) | (leaf1 (leaf0 leaf1)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_395864.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.01) | (assertEqualToResult (TupleConcat (a b c) (e f g))) | ((a b c e f g)) | ((a b c e f g)) | | PASS | [METTA-MORPH-TESTS.TYPES2.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_395886.metta.html#METTA-MORPH-TESTS.TYPES2.02) | (assertEqualToResult (reproduce lion1 lion2)) | (childlion) | (childlion) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_39664.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_397220.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $_388546 $_388546)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_397346.metta.html#METTA-MORPH-TESTS.STATES-SPACES.01) | (assertEqualToResult (get-state &FIFO)) | (45) | (45) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_39746.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $_28100 $_28100) ((%void% 42)))) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_397550.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11) | (assertEqual (get-type (pair (LeftP 5) "String"))) | ((Pair (EitherP Number) String)) | ((Pair (EitherP Number) String)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_397570.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19) | (assertEqualToResult (+ 1 (bin))) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_39760.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $_28100 $_28100) ((%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_399122.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_399896.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11) | (assertEqual (== (let* (($_383168 (collapse (get-atoms &m))) ($_383238 (car-atom $_383168))) (get-type $_383238)) (get-type &self))) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_400004.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $_368164 (superpose (3 4 5)) (If (> $_368164 3) (case (1 $_368164) (((1 3) (f 0)) ((1 4) (42 42)) ($_368470 (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_400256.metta.html#METTA-MORPH-TESTS.STATES-SPACES.02) | (assertEqualToResult (add-atom &WU a)) | () | (()) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_401124.metta.html#TRUTHVALUE.TRUTHVALUETEST.02) | (assertEqual (count->confidence 10)) | (0.9090909090909091) | (0.9090909090909091) | | PASS | [METTA-MORPH-TESTS.TESTS0.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_401314.metta.html#METTA-MORPH-TESTS.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A | B) --> cat) (1.0... | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_401442.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02) | (assertEqual (ift (green $_386770) $_386770)) | (Fritz) | (Fritz) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_401572.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_401586.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.TYPES2.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_401970.metta.html#METTA-MORPH-TESTS.TYPES2.03) | (assertEqualToResult (get-type Lion)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.TESTS0.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_402308.metta.html#METTA-MORPH-TESTS.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.TYPES3.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_402526.metta.html#METTA-MORPH-TESTS.TYPES3.01) | (assertEqualToResult (match &self (GreaterThan $_353326 $_353348) (If (and (== (get-type $_353326) Number) (== (get-type $_353348) Number)) (If (EqualOrGreater $_353326 $_353348) yay)))) | (yay) | (yay) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_402734.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $_393630) $_393630)) | (x) | (x) | | FAIL | [METTA-MORPH-TESTS.TESTS0.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_403166.metta.html#METTA-MORPH-TESTS.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_403914.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01) | (assertEqual (get-type 5)) | (Number) | (Number) | | FAIL | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_40466.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.01) | (assertEqualToResult =====) | (=====) | ("===== Test synthesizer ====") | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_404736.metta.html#METTA-MORPH-TESTS.MATCH-VOID.01) | (assertEqualToResult (match &belief_events $_396928 $_396928)) | () | () | | PASS | [COMMON.NUMTEST.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_405054.metta.html#COMMON.NUMTEST.04) | (assertEqual (abs -10)) | (10) | (10) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_405070.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_405628.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $_391380 (get-atoms &self) (get-type $_391380)))) | (((let $_399968 (get-atoms &self) (get-type $_399968)))) | ((hyperon::space::DynSpace)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_406086.metta.html#METTA-MORPH-TESTS.STATES-SPACES.01) | (assertEqualToResult (get-state &FIFO)) | (45) | (45) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_406136.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.04) | (assertEqualToResult (superpose ((superpose (a b c)) x y z))) | (a b c x y z) | (a b c x y z) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_406212.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.01) | (assertEqualToResult (TupleConcat (a b c) (e f g))) | ((a b c e f g)) | ((a b c e f g)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_407858.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01) | (assertEqualToResult (ift (green $_371262) (add-atom &kb (Green $_371262)))) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_407862.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_409696.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $_401022 $_401022)) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_409942.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09) | (assertEqualToResult (is-socrates)) | ((curry-a is Socrates)) | ((curry-a is Socrates)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_409986.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01) | (assertEqual (S K K x)) | (x) | (x) | | PASS | [METTA-MORPH-TESTS.TYPES2.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_410842.metta.html#METTA-MORPH-TESTS.TYPES2.03) | (assertEqualToResult (get-type Lion)) | (Cat) | (Cat) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_411150.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.08) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A) (: ((ModusPonens ab) a) B)) | ((: a A) (: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_41158.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02) | (assertEqual (collapse (match &self (= (shape) $_31682) $_31682))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_412016.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.01) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [METTA-MORPH-TESTS.TYPES2.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_412578.metta.html#METTA-MORPH-TESTS.TYPES2.04) | (assertEqualToResult (match &self (: Lion $_403660) $_403660)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_412732.metta.html#METTA-MORPH-TESTS.STATES-SPACES.02) | (assertEqualToResult (add-atom &WU a)) | () | (()) | | PASS | [METTA-MORPH-TESTS.NALIFIER.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_413738.metta.html#METTA-MORPH-TESTS.NALIFIER.01) | (assertEqualToResult (let ($S $EV) (choiceQuery (((ExtSet sam) --> duck) ((ExtSet sam) --> swan) ((ExtSet sam) --> dog))) $S)) | ((((ExtSet sam) --> duck) (1.0 0.6183206106870229))) | ((((ExtSet sam) --> duck) (1.0 0.618320610687023))) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_413810.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_413970.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [BACKWARD-CHAINING.BC-XP.25](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_414176.metta.html#BACKWARD-CHAINING.BC-XP.25) | (assertEqual (bc_dem (: $_395616 B) (fromNumber 1))) | ((: (ModusPonens ab a) B)) | ((: (ModusPonens ab a) B)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_414622.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.02) | (assertEqualToResult (TupleConcat () (e f g))) | ((e f g)) | ((e f g)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_41484.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02) | (assertEqualToResult (match &kb (Green $_34928) $_34928)) | (Fritz Sam) | (Fritz Sam) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_414876.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.04) | (assertEqualToResult (superpose ((superpose (a b c)) x y z))) | (a b c x y z) | (a b c x y z) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_414952.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.01) | (assertEqualToResult (TupleConcat (a b c) (e f g))) | ((a b c e f g)) | ((a b c e f g)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_415384.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_416068.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09) | (assertEqualToResult (== 4 (+ 2 2))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_416990.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08) | (assertEqual (find-equal (color) (foo))) | (red) | (red) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_417174.metta.html#TRUTHVALUE.TRUTHVALUETEST.03) | (assertEqual (confidence->count 0.9)) | (9.000000000000002) | (9.000000000000002) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_417312.metta.html#METTA-MORPH-TESTS.MATCH-VOID.01) | (assertEqualToResult (match &belief_events $_409504 $_409504)) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_417336.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $_408662 $_408662)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_418492.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03) | (assertEqualToResult (match &self (, (Frog $_407524) (implies (Frog $_407524) $_407596)) $_407596)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_419030.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_419204.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $_403266 $_403266) T)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.TYPES2.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_419582.metta.html#METTA-MORPH-TESTS.TYPES2.03) | (assertEqualToResult (get-type Lion)) | (Cat) | (Cat) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_419718.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.14) | (assertEqualToResult (match &self ($_409252 A $_409282) ($_409252 A $_409282))) | ((Rel-P A B) (Rel-Q A C)) | ((Rel-P A B) (Rel-Q A C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_42002.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12) | (assertEqualToResult (== (A B) (A (B C)))) | (False) | (False) | | PASS | [COMMON.NUMTEST.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_420488.metta.html#COMMON.NUMTEST.05) | (assertEqual (approxEq 10 10.0001 0.001)) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_421442.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03) | (assertEqualToResult (match &self (= ($_412958 Fritz) T) $_412958)) | (croaks eat_flies) | (croaks eat_flies) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_421520.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $_409886 $_409886)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_421848.metta.html#METTA-MORPH-TESTS.STATES-SPACES.03) | (assertEqualToResult (match &WU $_413156 $_413156)) | (a) | (a) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_42214.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17) | (assertEqual (f 2)) | (103) | (103) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_422152.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $_368164 (superpose (3 4 5)) (If (> $_368164 3) (case (1 $_368164) (((1 3) (f 0)) ((1 4) (42 42)) ($_368470 (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_422430.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19) | (assertEqual (let $_410434 (Add (S Z) Z) (match &self (= (eq $_410434 (S Z)) $_410602) $_410602))) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_423224.metta.html#METTA-MORPH-TESTS.MATCH-VOID.01) | (assertEqualToResult (match &belief_events $_412456 $_412456)) | () | () | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_423788.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03) | (assertEqualToResult (match &kb ($_413098 A_AS $_413128) ($_413098 A_AS $_413128))) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | | PASS | [PLN.CURRIED-CHAINER.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_42402.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [PLN.CURRIED-CHAINER.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_42408.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [BACKWARD-CHAINING.BC-XP.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_42500.metta.html#BACKWARD-CHAINING.BC-XP.05) | (assertEqual (bc_eq A kb_eq Z)) | (A) | (A) | | PASS | [METTA-MORPH-TESTS.TYPES2.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_425052.metta.html#METTA-MORPH-TESTS.TYPES2.04) | (assertEqualToResult (match &self (: Lion $_416134) $_416134)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_425240.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | FAIL | [METTA-MORPH-TESTS.TESTS0.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_425298.metta.html#METTA-MORPH-TESTS.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_426846.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02) | (assertEqualToResult (match &kb (Green $_417926) $_417926)) | (Fritz Sam) | (Fritz Sam) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_427094.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.02) | (assertEqualToResult (TupleConcat () (e f g))) | ((e f g)) | ((e f g)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_427504.metta.html#METTA-MORPH-TESTS.STATES-SPACES.02) | (assertEqualToResult (add-atom &WU a)) | () | (()) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_427702.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.07) | (assertEqualToResult (range 1 10)) | ((1 2 3 4 5 6 7 8 9)) | ((1 2 3 4 5 6 7 8 9)) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_428686.metta.html#TRUTHVALUE.TRUTHVALUETEST.04) | (assertEqual (mode (STV 0.1 0.2))) | (0.1) | (0.1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_428766.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_429812.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $_421138 $_421138)) | (2) | (2) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_430260.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $_418626 $_418626)) | (1) | (1) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_430800.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05) | (assertEqual (TV (green Fritz))) | () | ((stv 0.7047 0.68)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_430892.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $_376904 (superpose (3 4 5)) (If (> $_376904 3) (case (1 $_376904) (((1 3) (f 0)) ((1 4) (42 42)) ($_377210 (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_431396.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03) | (assertEqualToResult (frog Fritz)) | () | () | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_431472.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_431964.metta.html#METTA-MORPH-TESTS.MATCH-VOID.01) | (assertEqualToResult (match &belief_events $_421196 $_421196)) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_43234.metta.html#METTA-MORPH-TESTS.MATCH-VOID.01) | (assertEqualToResult (case (match &belief_events $_36394 $_36394) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_432506.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03) | (assertEqualToResult (match &self (:= (S K K x) $_422458) (match &self (:= $_422458 $_422538) $_422538))) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_432620.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20) | (assertEqualToResult (let $_420788 (+ 2 3) (* $_420788 $_420788))) | (25) | (25) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_43342.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02) | (assertEqual (match &kb ($_36366 A_AS $_36396) ($_36366 $_36396))) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_4334.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01) | (assertEqualToResult (+ 2 (* 3 5.5))) | (18.5) | (18.5) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_433558.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_433572.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_434324.metta.html#METTA-MORPH-TESTS.STATES-SPACES.03) | (assertEqualToResult (match &WU $_425632 $_425632)) | (a) | (a) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_434494.metta.html#METTA-MORPH-TESTS.MATCH-VOID.02) | (assertEqualToResult (add-atom &belief_events belief1)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_435286.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02) | (assertEqual (get-type (+ 5 7))) | (Number) | (Number) | | PASS | [COMMON.NUMTEST.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_435650.metta.html#COMMON.NUMTEST.06) | (assertEqual (approxEq 10 10.0001 1.0e-9)) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.TYPES2.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_435778.metta.html#METTA-MORPH-TESTS.TYPES2.05) | (assertEqualToResult (match &self (: reproduce $_426632) $_426632)) | ((-> Lion Lion Lion)) | ((-> Lion Lion Lion)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_435800.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.07) | (assertEqualToResult (range 1 10)) | ((1 2 3 4 5 6 7 8 9)) | ((1 2 3 4 5 6 7 8 9)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_436244.metta.html#METTA-MORPH-TESTS.STATES-SPACES.02) | (assertEqualToResult (add-atom &WU a)) | () | (()) | | PASS | [METTA-MORPH-TESTS.TYPES2.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_436880.metta.html#METTA-MORPH-TESTS.TYPES2.04) | (assertEqualToResult (match &self (: Lion $_425002) $_425002)) | (Cat) | (Cat) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_436958.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07) | (assertEqualToResult (Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_437506.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_438666.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08) | (assertEqual (find-equal (color) (foo))) | (red) | (red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_438908.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02) | (assertEqualToResult (expression without known equalities)) | ((expression without known equalities)) | ((expression without known equalities)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_438912.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23) | (assertEqualToResult (let $_2468 (gen 3) (if (== (subsum (:: 3 (:: 7 (:: 5 nil))) $_2468) 8) $_2468 (superpose ())))) | ((:: 1 (:: 0 (:: 1 nil)))) | ((:: 1 (:: 0 (:: 1 nil)))) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_439544.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $_429038 $_429038)) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.MINNARS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_44154.metta.html#METTA-MORPH-TESTS.MINNARS.01) | (assertEqualToResult (Question ((Sentence (((ExtSet garfield) --> cat) (1.0 0.9)) (1)) (Sentence (((cat x sky) --> like) (1.0 0.9)) (2)) (Sentence ((sky --> (IntSet blue)) (1.0 0.9)) (3)) (Sentence ((... | (((1.0 0.37946790052053214) (2 1 3 4))) | (((1.0 0.37946790052053214) (2 1 3 4))) | | PASS | [METTA-MORPH-TESTS.TESTS0.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_441712.metta.html#METTA-MORPH-TESTS.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_441964.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02) | (assertEqualToResult (let $_410122 (superpose (3 4 5)) (If (> $_410122 3) (case (1 $_410122) (((1 3) (f 0)) ((1 4) (42 42)) ($_410428 (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_44358.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.06) | (assertEqual (bc_eq B kb_eq (fromNumber 1))) | (B) | (B) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_44408.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.06) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_444170.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01) | (assertEqual (Cons 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_444592.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $_432958 $_432958)) | (2) | (2) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_44488.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_445374.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.03) | (assertEqualToResult (TupleConcat (a b c) ())) | ((a b c)) | ((a b c)) | | PASS | [METTA-MORPH-TESTS.TYPES2.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_445620.metta.html#METTA-MORPH-TESTS.TYPES2.04) | (assertEqualToResult (match &self (: Lion $_433742) $_433742)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_445956.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_446310.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.02) | (assertEqualToResult (TupleConcat () (e f g))) | ((e f g)) | ((e f g)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_447070.metta.html#METTA-MORPH-TESTS.MATCH-VOID.02) | (assertEqualToResult (add-atom &belief_events belief1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.TESTS0.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_447082.metta.html#METTA-MORPH-TESTS.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_44778.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05) | (assertEqual (eq (S K K x) x)) | (T) | (T) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_448078.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.15) | (assertEqualToResult (superpose ((Rel-P B) (Rel-Q C)))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_448084.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04) | (assertEqualToResult (match &self (, (implies ($_436416 $_436438) (Green $_436438)) (implies ($_436416 $_436438) (Eats-flies $_436438))) (Then it is definitely $_436416))) | ((Then it is definitely Frog)) | ((Then it is definitely Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_448126.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (inactive) | | PASS | [METTA-MORPH-TESTS.TYPES2.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_448252.metta.html#METTA-MORPH-TESTS.TYPES2.05) | (assertEqualToResult (match &self (: reproduce $_439106) $_439106)) | ((-> Lion Lion Lion)) | ((-> Lion Lion Lion)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_448828.metta.html#METTA-MORPH-TESTS.STATES-SPACES.04) | (assertEqualToResult (add-atom &WU b)) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_450284.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.02) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [METTA-MORPH-TESTS.COLLAPSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_451804.metta.html#METTA-MORPH-TESTS.COLLAPSE.01) | (assertEqualToResult (collapse (1 2 3))) | (((1 2 3))) | (((1 2 3))) | | PASS | [METTA-MORPH-TESTS.TESTS0.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_451836.metta.html#METTA-MORPH-TESTS.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_452020.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $_441514 $_441514)) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_452052.metta.html#METTA-MORPH-TESTS.STATES-SPACES.03) | (assertEqualToResult (match &WU $_440400 $_440400)) | (a) | (a) | | FAIL | [COMMON.NUMTEST.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_452276.metta.html#COMMON.NUMTEST.07) | (assertEqual (â©» Z (S Z))) | (True (< Z (S Z))) | (True) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_45270.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_453168.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10) | (assertEqualToResult (== 2 3)) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_453332.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $_441698 $_441698)) | (2) | (2) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_454352.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02) | (assertEqualToResult (let $_422510 (superpose (3 4 5)) (If (> $_422510 3) (case (1 $_422510) (((1 3) (f 0)) ((1 4) (42 42)) ($_422816 (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_455050.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.02) | (assertEqualToResult (TupleConcat () (e f g))) | ((e f g)) | ((e f g)) | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_455792.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_455938.metta.html#METTA-MORPH-TESTS.MATCH-VOID.02) | (assertEqualToResult (add-atom &belief_events belief1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_456984.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_456998.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_457038.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04) | (assertEqual (match &kb ($_440876 A_AS $_440906) ($_440876 $_440906))) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_457846.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.03) | (assertEqualToResult (TupleConcat (a b c) ())) | ((a b c)) | ((a b c)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_459296.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (match &belief_events $_450604 $_450604)) | (belief1) | (belief1) | | PASS | [METTA-MORPH-TESTS.LETLET.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_459656.metta.html#METTA-MORPH-TESTS.LETLET.01) | (assertEqualToResult (let $T (1.0 0.9) (let* ((($f1 $c1) $T)) ($f1 $c1)))) | ((1.0 0.9)) | ((1.0 0.9)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_460792.metta.html#METTA-MORPH-TESTS.STATES-SPACES.03) | (assertEqualToResult (match &WU $_449140 $_449140)) | (a) | (a) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_461304.metta.html#METTA-MORPH-TESTS.STATES-SPACES.04) | (assertEqualToResult (add-atom &WU b)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_461708.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10) | (assertEqual ((curry-a is Socrates) Human)) | (True) | (True) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_462780.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.TYPES2.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_463036.metta.html#METTA-MORPH-TESTS.TYPES2.05) | (assertEqualToResult (match &self (: reproduce $_450930) $_450930)) | ((-> Lion Lion Lion)) | ((-> Lion Lion Lion)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_463896.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01) | (assertEqual (get-state (get-token))) | ((A B)) | ((A B)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.26](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_464190.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.26) | (assertEqualToResult (bc_dem (: $_385356 C) (fromNumber 2))) | ((: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deduction ab bc) a) C)) | ((: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deduction ab bc) a) C)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_464438.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20) | (assertEqualToResult (match &self (= (eq (Add (S Z) Z) (S Z)) $_456546) $_456546)) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_464678.metta.html#METTA-MORPH-TESTS.MATCH-VOID.02) | (assertEqualToResult (add-atom &belief_events belief1)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_465320.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09) | (assertEqualToResult (rev A (superpose (B C D)))) | ((B A) (C A) (D A)) | ((B A) (C A) (D A)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_465668.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (sequential ((increment) (increment) (increment)))))) | (10 11 12 13 14 15) | (10 11 12 13 14 15) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_465960.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_466244.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02) | (assertEqual (insert 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [METTA-MORPH-TESTS.TESTS0.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_46632.metta.html#METTA-MORPH-TESTS.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_466468.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_467062.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03) | (assertEqual (get-type +)) | ((-> Number Number Number)) | ((-> Number Number Number)) | | PASS | [METTA-MORPH-TESTS.TESTS0.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_467726.metta.html#METTA-MORPH-TESTS.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_468000.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03) | (assertEqual (Add (S Z) Z)) | ((S Z)) | ((S Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_468370.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19) | (assertEqual (fmap (curry-a + 2) (UntypedC 5 (UntypedC 8 (Null))))) | ((UntypedC 7 (UntypedC 10 (Null)))) | ((UntypedC 7 (UntypedC 10 (Null)))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_469382.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [METTA-MORPH-TESTS.TESTS0.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_469650.metta.html#METTA-MORPH-TESTS.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A | B) --> cat) (1.0... | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_469730.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13) | (assertEqual (g 2)) | (102) | (102) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_469746.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $x) $y) $y)) | ((* 2 $_452586)) | ((* 2 $_452586)) | | PASS | [METTA-MORPH-TESTS.IF.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_470026.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_471108.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_471228.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $_456290 $_456290)) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_47174.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [METTA-MORPH-TESTS.TYPES2.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_471776.metta.html#METTA-MORPH-TESTS.TYPES2.05) | (assertEqualToResult (match &self (: reproduce $_459670) $_459670)) | ((-> Lion Lion Lion)) | ((-> Lion Lion Lion)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_471872.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (match &belief_events $_463180 $_463180)) | (belief1) | (belief1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_472010.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09) | (assertEqualToResult (rev A (superpose (B C D)))) | ((B A) (C A) (D A)) | ((B A) (C A) (D A)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_472636.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_472824.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_472878.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27) | (assertEqual (sort (Cons 3 (Cons 1 (Cons 2 Nil))))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_473528.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (sequential ((increment) (increment) (increment)))))) | (10 11 12 13 14 15) | (10 11 12 13 14 15) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_473688.metta.html#METTA-MORPH-TESTS.STATES-SPACES.05) | (assertEqualToResult (remove-atom &WU a)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_474092.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01) | (assertEqual (get-type (Cons 0 (Cons 1 Nil)))) | ((Vec Number (S (S Z)))) | ((Vec Number (S (S Z)))) | | PASS | [METTA-MORPH-TESTS.PEANO.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_475574.metta.html#METTA-MORPH-TESTS.PEANO.01) | (assertEqualToResult (Add (S (S Z)) (S (S (S Z))))) | ((S (S (S (S (S Z)))))) | ((S (S (S (S (S Z)))))) | | FAIL | [METTA-MORPH-TESTS.MINNARS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_475718.metta.html#METTA-MORPH-TESTS.MINNARS.01) | (assertEqualToResult (Question ((Sentence (((ExtSet garfield) --> cat) (1.0 0.9)) (1)) (Sentence (((cat x sky) --> like) (1.0 0.9)) (2)) (Sentence ((sky --> (IntSet blue)) (1.0 0.9)) (3)) (Sentence ((... | () | (((1.0 0.37946790052053214) (2 1 3 4))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_475786.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12) | (assertEqual (get-type (Cons 5 (Cons 6 Nil)))) | ((List Number)) | ((List Number)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_476500.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.01) | (assertEqual (bc_bare A kb_bare rb_bare Z)) | (A) | (A) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_477280.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02) | (assertEqualToResult (match &self ($_465456 is a $_465494) ($_465456 the $_465494))) | ((Sam the frog) (Tom the cat) (Sophia the robot)) | ((Sam the frog) (Sophia the robot) (Tom the cat)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_478128.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_478502.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_479848.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_479968.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $_465030 $_465030)) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_480088.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $_469740) $_469740)) | ((Add (S (S Z)) Z)) | ((Add (S (S Z)) Z)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_480620.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.16) | (assertEqual (match &self ($_464562 A $_464592) ($_464562 $_464592))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.27](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_481870.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.27) | (assertEqual (bc_dem (: $_472660 (→ A B)) (fromNumber 0))) | ((: ab (→ A B))) | ((: ab (→ A B))) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_481988.metta.html#METTA-MORPH-TESTS.STATES-SPACES.04) | (assertEqualToResult (add-atom &WU b)) | () | (()) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_482538.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_48316.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (inactive) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_483696.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (match &belief_events $_472044 $_472044)) | (belief1) | (belief1) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_484002.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case belief1 ((%void% 42)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_484326.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04) | (assertEqual (get-type (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_484358.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14) | (assertEqual (f 2)) | (103) | (103) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_485934.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.03) | (assertEqualToResult (TupleConcat (a b c) ())) | ((a b c)) | ((a b c)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_486164.metta.html#METTA-MORPH-TESTS.STATES-SPACES.05) | (assertEqualToResult (remove-atom &WU a)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_486514.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02) | (assertEqualToResult (nop (change-state! (status (Goal lunch-order)) active))) | () | (()) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_488072.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | PASS | [METTA-MORPH-TESTS.NALIFIER.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_488416.metta.html#METTA-MORPH-TESTS.NALIFIER.01) | (assertEqualToResult (let ($_2454 $_2472) (choiceQuery (((ExtSet sam) --> duck) ((ExtSet sam) --> swan) ((ExtSet sam) --> dog))) $_2454)) | ((((ExtSet sam) --> duck) (1.0 0.6183206106870229))) | ((((ExtSet sam) --> duck) (1.0 0.618320610687023))) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_488726.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqualToResult (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_488928.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_488942.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_489294.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | PASS | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_489946.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.04) | (assertEqualToResult (synthesize (: $_12620 (≞ (→ P R) $_12674)) kb rb (S Z))) | ((: (Deduction Pm Qm Rm PQm QRm) (≞ (→ P R) (STV 0.8 0.1)))) | ((: (Deduction Pm Qm Rm PQm QRm) (≞ (→ P R) (STV 0.8 0.1))) (let* (((: $_12764 (≞ (→ P P) (STV $_12830 $_12848))) (synthesize (: $_12764 (≞ (→ P P) (STV $_12830 $_12848))) kb rb Z)) ((: $_12992 (≞ (→ P R) (STV $_13058 $_13076))) (synthesize (: $_12992 (≞ (→ P R) (STV $_13058 $_13076))) kb rb Z))) (: (Deduction Pm Pm Rm $_12764 $_12992) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.5) 1) 0.5)) 1 (/ (- (+ 0.5 0.5) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.5) 1) 0.5)) 1 (/ (- (+ 0.5 0.5) 1) 0.5))) $_12830) (<= $_12830 (if (> 0 (if (< 1 (/ 0.5 0.5)) 1 (/ 0.5 0.5))) 0 (if (< 1 (/ 0.5 0.5)) 1 (/ 0.5 0.5)))))) (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) $_13058) (<= $_13058 (if (> 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5))) 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5))))))) (STV (if (< 0.9999 0.5) 0.7 (+ (* $_12830 $_13058) (/ (* (- 1 $_12830) (- 0.7 (* 0.5 $_13058))) (- 1 0.5)))) (min 0.1 (min 0.1 (min 0.3 (min $_12848 $_13076))))) (STV 1 0))))) (let* (((: $_12764 (≞ (→ P R) (STV $_12830 $_12848))) (synthesize (: $_12764 (≞ (→ P R) (STV $_12830 $_12848))) kb rb Z)) ((: $_12992 (≞ (→ R R) (STV $_13058 $_13076))) (synthesize (: $_12992 (≞ (→ R R) (STV $_13058 $_13076))) kb rb Z))) (: (Deduction Pm Rm Rm $_12764 $_12992) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.7) 1) 0.5)) 1 (/ (- (+ 0.5 0.7) 1) 0.5))) $_12830) (<= $_12830 (if (> 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5))) 0 (if (< 1 (/ 0.7 0.5)) 1 (/ 0.7 0.5)))))) (and (< 0 0.7) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.7 0.7) 1) 0.7)) 1 (/ (- (+ 0.7 0.7) 1) 0.7))) 0 (if (< 1 (/ (- (+ 0.7 0.7) 1) 0.7)) 1 (/ (- (+ 0.7 0.7) 1) 0.7))) $_13058) (<= $_13058 (if (> 0 (if (< 1 (/ 0.7 0.7)) 1 (/ 0.7 0.7))) 0 (if (< 1 (/ 0.7 0.7)) 1 (/ 0.7 0.7))))))) (STV (if (< 0.9999 0.7) 0.7 (+ (* $_12830 $_13058) (/ (* (- 1 $_12830) (- 0.7 (* 0.7 $_13058))) (- 1 0.7)))) (min 0.1 (min 0.3 (min 0.3 (min $_12848 $_13076))))) (STV 1 0))))) (let* (((: $_12764 (≞ (→ P (→ P Q)) (STV $_12830 $_12848))) (synthesize (: $_12764 (≞ (→ P (→ P Q)) (STV $_12830 $_12848))) kb rb Z)) ((: $_12992 (≞ (→ (→ P Q) R) (STV $_13058 $_13076))) (synthesize (: $_12992 (≞ (→ (→ P Q) R) (STV $_13058 $_13076))) kb rb Z))) (: (Deduction Pm PQm Rm $_12764 $_12992) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.8) 1) 0.5)) 1 (/ (- (+ 0.5 0.8) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.8) 1) 0.5)) 1 (/ (- (+ 0.5 0.8) 1) 0.5))) $_12830) (<= $_12830 (if (> 0 (if (< 1 (/ 0.8 0.5)) 1 (/ 0.8 0.5))) 0 (if (< 1 (/ 0.8 0.5)) 1 (/ 0.8 0.5)))))) (and (< 0 0.8) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.8 0.7) 1) 0.8)) 1 (/ (- (+ 0.8 0.7) 1) 0.8))) 0 (if (< 1 (/ (- (+ 0.8 0.7) 1) 0.8)) 1 (/ (- (+ 0.8 0.7) 1) 0.8))) $_13058) (<= $_13058 (if (> 0 (if (< 1 (/ 0.7 0.8)) 1 (/ 0.7 0.8))) 0 (if (< 1 (/ 0.7 0.8)) 1 (/ 0.7 0.8))))))) (STV (if (< 0.9999 0.8) 0.7 (+ (* $_12830 $_13058) (/ (* (- 1 $_12830) (- 0.7 (* 0.8 $_13058))) (- 1 0.8)))) (min 0.1 (min 0.4 (min 0.3 (min $_12848 $_13076))))) (STV 1 0))))) (let* (((: $_12764 (≞ (→ P (→ Q R)) (STV $_12830 $_12848))) (synthesize (: $_12764 (≞ (→ P (→ Q R)) (STV $_12830 $_12848))) kb rb Z)) ((: $_12992 (≞ (→ (→ Q R) R) (STV $_13058 $_13076))) (synthesize (: $_12992 (≞ (→ (→ Q R) R) (STV $_13058 $_13076))) kb rb Z))) (: (Deduction Pm QRm Rm $_12764 $_12992) (≞ (→ P R) (if (and (and (< 0 0.5) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.5 0.9) 1) 0.5)) 1 (/ (- (+ 0.5 0.9) 1) 0.5))) 0 (if (< 1 (/ (- (+ 0.5 0.9) 1) 0.5)) 1 (/ (- (+ 0.5 0.9) 1) 0.5))) $_12830) (<= $_12830 (if (> 0 (if (< 1 (/ 0.9 0.5)) 1 (/ 0.9 0.5))) 0 (if (< 1 (/ 0.9 0.5)) 1 (/ 0.9 0.5)))))) (and (< 0 0.9) (and (<= (if (> 0 (if (< 1 (/ (- (+ 0.9 0.7) 1) 0.9)) 1 (/ (- (+ 0.9 0.7) 1) 0.9))) 0 (if (< 1 (/ (- (+ 0.9 0.7) 1) 0.9)) 1 (/ (- (+ 0.9 0.7) 1) 0.9))) $_13058) (<= $_13058 (if (> 0 (if (< 1 (/ 0.7 0.9)) 1 (/ 0.7 0.9))) 0 (if (< 1 (/ 0.7 0.9)) 1 (/ 0.7 0.9))))))) (STV (if (< 0.9999 0.9) 0.7 (+ (* $_12830 $_13058) (/ (* (- 1 $_12830) (- 0.7 (* 0.9 $_13058))) (- 1 0.9)))) (min 0.1 (min 0.5 (min 0.3 (min $_12848 $_13076))))) (STV 1 0)))))) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_490206.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.03) | (assertEqual ((superpose (1 2 3)))) | ((1) (2) (3)) | ((1) (2) (3)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_490728.metta.html#METTA-MORPH-TESTS.STATES-SPACES.04) | (assertEqualToResult (add-atom &WU b)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_492436.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (match &belief_events $_480784 $_480784)) | (belief1) | (belief1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_492610.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05) | (assertEqual (get-type (curry-a + 2))) | ((-> Number Number)) | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_492616.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC (Null) 5)))) | () | () | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_493618.metta.html#METTA-MORPH-TESTS.STATES-SPACES.06) | (assertEqual (match &WU $_483270 $_483270)) | (b) | (b) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_494674.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.03) | (assertEqualToResult (TupleConcat (a b c) ())) | ((a b c)) | ((a b c)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_49494.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_495380.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.04) | (assertEqualToResult (range 1 1)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_495424.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11) | (assertEqualToResult (== (A B) (A B))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_49598.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06) | (assertEqual (get-type ((curry-a + 2) 3))) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_496566.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21) | (assertEqual (let (S (S $_485720)) (Add (S Z) (S Z)) $_485720)) | (Z) | (Z) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_496570.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03) | (assertEqual (Add (S Z) (S Z))) | ((S (S Z))) | ((S (S Z))) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_496578.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case belief1 ((%void% 42)))) | () | () | | PASS | [COMMON.NUMTEST.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_496890.metta.html#COMMON.NUMTEST.08) | (assertEqual (synthesize (: $_484662 (⍃ Z (S Z))) kb rb Z)) | ((: ZeroLTSucc (⍃ Z (S Z)))) | ((: ZeroLTSucc (⍃ Z (S Z)))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_497418.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04) | (assertEqualToResult (get-type (+ 5 "4"))) | (Number) | () | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_498644.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02) | (assertEqualToResult (let $_444654 (superpose (3 4 5)) (If (> $_444654 3) (case (1 $_444654) (((1 3) (f 0)) ((1 4) (42 42)) ($_444960 (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_498970.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.28](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_499076.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.28) | (assertEqual (bc_dem (: $_489866 (→ B C)) (fromNumber 0))) | ((: bc (→ B C))) | ((: bc (→ B C))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_499150.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_499318.metta.html#TRUTHVALUE.TRUTHVALUETEST.05) | (assertEqual (mean (STV 0.1 0.9))) | (0.14) | (0.14) | | FAIL | [METTA-MORPH-TESTS.MINNARS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_499626.metta.html#METTA-MORPH-TESTS.MINNARS.01) | (assertEqualToResult (Question ((Sentence (((ExtSet garfield) --> cat) (1.0 0.9)) (1)) (Sentence (((cat x sky) --> like) (1.0 0.9)) (2)) (Sentence ((sky --> (IntSet blue)) (1.0 0.9)) (3)) (Sentence ((... | () | (((1.0 0.37946790052053214) (2 1 3 4))) | | PASS | [PLN.CURRIED-CHAINER.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_499750.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_499764.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [PLN.CURRIED-CHAINER.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_499770.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_499874.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15) | (assertEqualToResult (dup 2)) | (102 12) | (12 102) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_500260.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05) | (assertEqual (superpose ((P_AS B_AS) (Q_AS C_AS)))) | ((P_AS B_AS) (Q_AS C_AS)) | ((P_AS B_AS) (Q_AS C_AS)) | | PASS | [METTA-MORPH-TESTS.AND-OR.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_500698.metta.html#METTA-MORPH-TESTS.AND-OR.01) | (assertEqualToResult (If (or (and True False) True) 1 2)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_501326.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_501948.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01) | (assertEqual (match &self (= (color) $_491620) $_491620)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_502250.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03) | (assertEqual (insert 2 (insert 1 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_502962.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_496696)) | ((State (A B) $_496696)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_504142.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_504558.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.05) | (assertEqual (bc (: $_384986 B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [BACKWARD-CHAINING.BC-XP.26](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_504878.metta.html#BACKWARD-CHAINING.BC-XP.26) | (assertEqualToResult (bc_dem (: $_426060 C) (fromNumber 2))) | ((: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deduction ab bc) a) C)) | ((: (ModusPonens bc (ModusPonens ab a)) C) (: (ModusPonens (Deduction ab bc) a) C)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_505120.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13) | (assertEqualToResult (get-type (Cons 5 (Cons "6" Nil)))) | ((List Number)) | () | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_505346.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [BACKWARD-CHAINING.BC-XP.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_50574.metta.html#BACKWARD-CHAINING.BC-XP.17) | (assertEqual (bc_em A Z)) | (A) | (A) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_506094.metta.html#METTA-MORPH-TESTS.STATES-SPACES.06) | (assertEqual (match &WU $_495746 $_495746)) | (b) | (b) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_506172.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.01) | (assertEqual (maybe-inc Nothing)) | (Nothing) | (Nothing) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_506710.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.05) | (assertEqual (bc_eq A kb_eq Z)) | (A) | (A) | | FAIL | [METTA-MORPH-TESTS.TESTS0.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_506868.metta.html#METTA-MORPH-TESTS.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_507222.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $_496318) (match &self (:= $_496318 $_496398) $_496398))) | ((S (S Z))) | ((S (S Z))) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_507384.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02) | (assertEqualToResult (let $_453394 (superpose (3 4 5)) (If (> $_453394 3) (case (1 $_453394) (((1 3) (f 0)) ((1 4) (42 42)) ($_453700 (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_507672.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_507710.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_507852.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.04) | (assertEqualToResult (range 1 1)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_508292.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01) | (assertEqualToResult (match &kb (, ($_492812 is $_492842) ($_492842 is-a Color) ($_492812 is-a Planet)) (Color of Planet $_492812 is $_492842))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_509804.metta.html#METTA-MORPH-TESTS.STATES-SPACES.05) | (assertEqualToResult (remove-atom &WU a)) | () | (()) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_510404.metta.html#TRUTHVALUE.TRUTHVALUETEST.06) | (assertEqual (confidence (STV 0.1 0.2))) | (0.2) | (0.2) | | PASS | [HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_510542.metta.html#HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01) | (assertEqualToResult ((inc) 2)) | (3) | (3) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_511334.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &belief_events $_501662 $_501662) ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_511358.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case belief1 ((%void% 42)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_511944.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $_501102) $_501102)) | (Socrates Plato) | (Plato Socrates) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_51226.metta.html#METTA-MORPH-TESTS.MATCH-VOID.06) | (assertEqualToResult (case (match &belief_events $_35784 $_35784) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_513926.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($_507182 mortal) (mortal $_507182))))) | ((mortal man)) | ((mortal man)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_515418.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (active) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_515542.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11) | (assertEqual ((is-socrates) Human)) | (True) | (True) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_516542.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.02) | (assertEqual (maybe-inc (Just 2))) | ((Just 3)) | ((Just 3)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_517678.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_518138.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_518544.metta.html#METTA-MORPH-TESTS.STATES-SPACES.05) | (assertEqualToResult (remove-atom &WU a)) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_51874.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02) | (assertEqualToResult (- 8 (/ 4 6.4))) | (7.375) | (7.375) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_519252.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_519468.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05) | (assertEqual (get-type (= (Mortal Socrates) (Mortal Plato)))) | (Type) | (Type) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_519910.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_520098.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case belief1 ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_520234.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_520248.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | FAIL | [METTA-MORPH-TESTS.TESTS0.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_52026.metta.html#METTA-MORPH-TESTS.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_52056.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_521870.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (match &attentional_focus $_515516 $_515516)) | (1) | (1) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_52192.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.03) | (assertEqual ((superpose (1 2 3)))) | ((1) (2) (3)) | ((1) (2) (3)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_522182.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.04) | (assertEqual (case (+ 1 5) ((5 Error) (6 OK) (6 Error)))) | (OK) | (OK) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_52222.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | FAIL | [METTA-MORPH-TESTS.TESTS0.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_522456.metta.html#METTA-MORPH-TESTS.TESTS0.03) | (assertEqualToResult (|- (({ a b } --> mwawa) (1.0 0.9)))) | ((({ a } --> mwawa) (1.0 0.81))) | ((({ a } --> mwawa) (1.0 0.81)) (({ b } --> mwawa) (1.0 0.81))) | | PASS | [BACKWARD-CHAINING.BC-XP.27](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_522542.metta.html#BACKWARD-CHAINING.BC-XP.27) | (assertEqual (bc_dem (: $_513348 (→ A B)) (fromNumber 0))) | ((: ab (→ A B))) | ((: ab (→ A B))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_523072.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_523212.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_523262.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.17) | (assertEqual (superpose ((P B) (Q C)))) | ((P B) (Q C)) | ((P B) (Q C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_523276.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.01) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_52348.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [PLN.CURRIED-CHAINER.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_523502.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $prf B) (fromNumber 2))) | ((: ((ModusPonens ab) a) B)) | ((: ((ModusPonens ab) a) B)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_523910.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &belief_events $_2298 $_2298) ((%void% 42)))) | () | () | | PASS | [TRUTHVALUE.TRUTHVALUETEST.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_52450.metta.html#TRUTHVALUE.TRUTHVALUETEST.09) | (assertEqual (inc-pos-count (STV 1 0))) | ((STV 1.0 0.5)) | ((STV 1 0.5)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_52694.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_52868.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_53854.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18) | (assertEqualToResult (dup 2)) | (102 12) | (12 102) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_53972.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $_42312 $_42312) ((%void% 42)))) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_54484.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03) | (assertEqual (match &kb (, (Venus orbit $_43220 au) (Mars orbit $_43274 au)) (- $_43274 $_43220))) | (0.8) | (0.8) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_55812.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04) | (assertEqualToResult (nop (change-state! &state-active inactive))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_55972.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11) | (assertEqual (is (air wet))) | ((start ventilation) (stop humidifier) (stop kettle)) | ((stop kettle) (stop humidifier) (start ventilation)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_56034.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04) | (assertEqualToResult (match &self (:= ($_43828 $_43850) T) ($_43850 is really $_43828))) | ((Sam is really Green) (Tom is really White)) | ((Sam is really Green) (Tom is really White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_56866.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15) | (assertEqual (f 2)) | (103) | (103) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_57788.metta.html#METTA-MORPH-TESTS.MATCH-VOID.02) | (assertEqualToResult (case (match &goal_events $_51662 $_51662) ((%void% 42)))) | (42) | (42) | | FAIL | [METTA-MORPH-TESTS.TESTS0.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_57816.metta.html#METTA-MORPH-TESTS.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_58392.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_59650.metta.html#METTA-MORPH-TESTS.MATCH-VOID.06) | (assertEqualToResult (case (match &belief_events $_44208 $_44208) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [BACKWARD-CHAINING.BC-XP.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_59762.metta.html#BACKWARD-CHAINING.BC-XP.02) | (assertEqual (bc_bare B kb_bare rb_bare (fromNumber 1))) | (B) | (B) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_62402.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06) | (assertEqual (get-type Either)) | (Type) | (Type) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_62782.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | PASS | [BACKWARD-CHAINING.BC-XP.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_6306.metta.html#BACKWARD-CHAINING.BC-XP.01) | (assertEqual (bc_bare A kb_bare rb_bare Z)) | (A) | (A) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_63406.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06) | (assertEqualToResult (eq Green Blue)) | ((eq Green Blue)) | ((eq Green Blue)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_63878.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $_53540 $_53540) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_63892.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $_53554 $_53554) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_64148.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01) | (assertEqual (S K K x)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_64322.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03) | (assertEqual (drop (Cons 2 (Cons 1 Nil)))) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_64490.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.06) | (assertEqual (case 5 ((6 OK)))) | () | () | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_64892.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_65066.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03) | (assertEqual (superpose ((P_AS B_AS) (Q_AS C_AS)))) | ((P_AS B_AS) (Q_AS C_AS)) | ((P_AS B_AS) (Q_AS C_AS)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_65432.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $_58580 (superpose (3 4 5)) (If (> $_58580 3) (case (1 $_58580) (((1 3) (f 0)) ((1 4) (42 42)) ($_58886 (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [DEPENDENT-TYPES.DEDUCTIONDTLTEST.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_65758.metta.html#DEPENDENT-TYPES.DEDUCTIONDTLTEST.03) | (assertEqual (synthesize (: $_2456 (≞ (→ Q R) $_2510)) kb rb Z)) | ((: QRm (≞ (→ Q R) (STV 0.9 0.5)))) | ((: QRm (≞ (→ Q R) (STV 0.9 0.5)))) | | PASS | [PLN.CURRIED-CHAINER.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_65802.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_65844.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_69342.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [TRUTHVALUE.TRUTHVALUETEST.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_6950.metta.html#TRUTHVALUE.TRUTHVALUETEST.07) | (assertEqual (count (STV 0.1 0.9))) | (9.000000000000002) | (9.000000000000002) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_69664.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_69920.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12) | (assertEqual (of-same-type Color Shape)) | (T) | (T) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_70278.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $1 $1)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_70556.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_70956.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23) | (assertEqual (eqa (Add Z Z) (Add Z Z))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_71972.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_72198.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | (EmptyType) | ((StateMonad String)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_72696.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (case (match &goal_events $_66546 $_66546) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_73084.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05) | (assertEqual (Add Something Z)) | (Something) | (Something) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_7320.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_73526.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07) | (assertEqualToResult (get-type (= SocratesIsHuman PlatoIsHuman))) | (Type) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_74406.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23) | (assertEqual (fmap-i (curry-a - 7) (Right 3))) | ((Right 4)) | ((Right 4)) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_74664.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_74690.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.04) | (assertEqual (case (+ 1 5) ((5 Error) (6 OK) (6 Error)))) | (OK) | (OK) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_74950.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_75836.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (active) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.19](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_75958.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.19) | (assertEqualToResult (bc_em C (fromNumber 2))) | (C) | (C) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_76296.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01) | (assertEqual (get-state (get-token))) | ((A B)) | ((A B)) | | PASS | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_7686.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | (1764 1764) | (1764) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_77836.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05) | (assertEqual (match &self (= (status (Goal $_69808)) &state-active) $_69808)) | () | (meditation) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_78104.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $_67766 $_67766) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_78192.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.03) | (assertEqual (bc_bare C kb_bare rb_bare (fromNumber 2))) | (C) | (C) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_78852.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_78900.metta.html#METTA-MORPH-TESTS.MATCH-VOID.01) | (assertEqualToResult (match &belief_events $1 $1)) | () | () | | PASS | [BACKWARD-CHAINING.BC-XP.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_79194.metta.html#BACKWARD-CHAINING.BC-XP.18) | (assertEqual (bc_em B (fromNumber 1))) | (B) | (B) | | PASS | [CURRIED-CHAINING.CURRIED-CHAINER.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_80348.metta.html#CURRIED-CHAINING.CURRIED-CHAINER.01) | (assertEqualToResult (add-atom &kb (: a A))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_81388.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01) | (assertEqual (Cons 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_82256.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $_64690 $_64690) ((%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_82270.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $_64690 $_64690) ((%void% 42)))) | (42) | (42) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_82496.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03) | (assertEqual (color)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_82748.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_83814.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_83908.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_84294.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04) | (assertEqual (case (match &kb ($_76442 B_AS $_76472) ($_76442 $_76472)) (((SS-P_AS $_76570) (P_AS $_76570)) ((SS-Q_AS $_76570) (Q_AS $_76570)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_85084.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02) | (assertEqualToResult (expression without known equalities)) | ((expression without known equalities)) | ((expression without known equalities)) | | PASS | [BACKWARD-CHAINING.BC-XP.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_85350.metta.html#BACKWARD-CHAINING.BC-XP.06) | (assertEqual (bc_eq B kb_eq (fromNumber 1))) | (B) | (B) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_87008.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16) | (assertEqualToResult (dup 2)) | (102 12) | (12 102) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_88536.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_89138.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case (match &goal_events $_82298 $_82298) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_89202.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13) | (assertEqualToResult (== 4 (+ ln 2))) | (False) | (False) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_89220.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_86304)) | ((State 30)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_89914.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.05) | (assertEqualToResult (range 1 3)) | ((1 2)) | ((1 2)) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_90694.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $_73114 $_73114) ((%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_91032.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_9128.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05) | (assertEqualToResult (get-type (+ -))) | (Number) | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_91694.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_91708.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_91732.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $1 $1)) | (2) | (2) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_92644.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.06) | (assertEqualToResult (range 2 6)) | ((2 3 4 5)) | ((2 3 4 5)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_92688.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24) | (assertEqualToResult (eqa Z (Add Z Z))) | (T) | ((eqa Z (Add Z Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_93058.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05) | (assertEqualToResult (match &self (:= ($_78776 $_78798) $_78820) ("It's" $_78820 that $_78798 is $_78776))) | (("It's" T that Sam is Green) ("It's" T that Tom is White) ("It's" F that Tom is Green)) | (("It's" F that Tom is Green) ("It's" T that Sam is Green) ("It's" T that Tom is White)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_93186.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02) | (assertEqual (insert 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_96280.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.07) | (assertEqualToResult (bc_eq C kb_eq (fromNumber 2))) | (C) | (C) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_97324.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.05) | (assertEqual (case (+ 1 5) (($_91066 (+ 1 $_91066))))) | (7) | (7) | | PASS | [BACKWARD-CHAINER.BACKWARD-CHAINER-XP.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_9742.metta.html#BACKWARD-CHAINER.BACKWARD-CHAINER-XP.17) | (assertEqual (bc_em A Z)) | (A) | (A) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_98012.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.05) | (assertEqualToResult (range 1 3)) | ((1 2)) | ((1 2)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_98238.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.07) | (assertEqual (case (+ 1 (superpose (1 2 3))) ((3 OK-3) (4 OK-4)))) | (OK-3 OK-4) | (OK-3 OK-4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_98446.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03) | (assertEqualToResult (% 21 17)) | (4) | (4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/_98534.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04) | (assertEqualToResult (get-type (drop Nil))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.01) | (assertEqualToResult (match &self (($x leaf2) leaf3) $x)) | (leaf1 (leaf0 leaf1)) | (leaf1 (leaf0 leaf1)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.02) | (assertEqualToResult (match &self ($who is a $what) ($who the $what))) | ((Sam the frog) (Tom the cat) (Sophia the robot)) | ((Sam the frog) (Sophia the robot) (Tom the cat)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.03) | (assertEqualToResult (match &self (:= (Green $who) T) ($who is really green))) | ((Sam is really green)) | ((Sam is really green)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.04) | (assertEqualToResult (match &self (:= ($color $who) T) ($who is really $color))) | ((Sam is really Green) (Tom is really White)) | ((Sam is really Green) (Tom is really White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.05) | (assertEqualToResult (match &self (:= ($color $who) $tv) ("It's" $tv that $who is $color))) | (("It's" T that Sam is Green) ("It's" T that Tom is White) ("It's" F that Tom is Green)) | (("It's" F that Tom is Green) ("It's" T that Sam is Green) ("It's" T that Tom is White)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.06) | (assertEqualToResult (match &self (:= (Green Tom) $tv) $tv)) | (F) | (F) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a1_symbols.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A1-SYMBOLS.07) | (assertEqualToResult (match &self (isa $color color) $color)) | (red green blue) | (blue green red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a2_opencoggy.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A2-OPENCOGGY.01) | (assertEqualToResult (match &self (EvaluationLink (PredicateNode "eats") (ListLink $x (ConceptNode "flies"))) $x)) | ((ConceptNode "Sam") (ConceptNode "Fritz")) | ((ConceptNode "Fritz") (ConceptNode "Sam")) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.01) | (assertEqualToResult (match &self (implies (Frog Sam) $what) $what)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.02) | (assertEqualToResult (match &self (implies ($P $x) (Green Sam)) ($x might be $P))) | ((Sam might be Frog)) | ((Sam might be Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.03) | (assertEqualToResult (match &self (, (Frog $x) (implies (Frog $x) $y)) $y)) | ((Green Sam) (Eats-flies Sam)) | ((Eats-flies Sam) (Green Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/a3_twoside.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.A3-TWOSIDE.04) | (assertEqualToResult (match &self (, (implies ($P $x) (Green $x)) (implies ($P $x) (Eats-flies $x))) (Then it is definitely $P))) | ((Then it is definitely Frog)) | ((Then it is definitely Frog)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.01) | (assertEqualToResult (match &self (:= (S K K x) $r) $r)) | ((K x (K x))) | ((K x (K x))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.02) | (assertEqualToResult (match &self (:= (K x (K x)) $r) $r)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.03) | (assertEqualToResult (match &self (:= (S K K x) $r) (match &self (:= $r $r2) $r2))) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.04) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) $r)) | ((Add (S (S Z)) Z)) | ((Add (S (S Z)) Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b0_chaining_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B0-CHAINING-PRELIM.05) | (assertEqualToResult (match &self (:= (Add (S Z) (S Z)) $r) (match &self (:= $r $r2) $r2))) | ((S (S Z))) | ((S (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.01) | (assertEqual (S K K x)) | (x) | (x) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.02) | (assertEqualToResult (expression without known equalities)) | ((expression without known equalities)) | ((expression without known equalities)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.03) | (assertEqual (Add (S Z) (S Z))) | ((S (S Z))) | ((S (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.04) | (assertEqual (Something? (Add (S Z) (S Z)))) | ((Something? (S (S Z)))) | ((Something? (S (S Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.05) | (assertEqual (eq (S K K x) x)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b1_equal_chain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B1-EQUAL-CHAIN.06) | (assertEqualToResult (eq Green Blue)) | ((eq Green Blue)) | ((eq Green Blue)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b2_backchain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.01) | (assertEqualToResult (Frog Sam)) | ((Frog Sam)) | ((Frog Sam)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b2_backchain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.02) | (assertEqual (frog Sam)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b2_backchain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.03) | (assertEqualToResult (frog Fritz)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b2_backchain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.04) | (assertEqual (deduce (Evaluation (mortal Plato)))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b2_backchain.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B2-BACKCHAIN.05) | (assertEqual (explain (Evaluation (mortal Plato)))) | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato... | (((mortal Plato) proven by ((human Plato) proven by (And (philosopher Plato) (likes-to-wrestle Plato))))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b3_direct.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.01) | (assertEqual (green Fritz)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b3_direct.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.02) | (assertEqual (ift (green $x) $x)) | (Fritz) | (Fritz) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b3_direct.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B3-DIRECT.03) | (assertEqualToResult (match &self (= ($p Fritz) T) $p)) | (croaks eat_flies) | (croaks eat_flies) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.01) | (assertEqual (match &self (= (color) $x) $x)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.02) | (assertEqual (collapse (match &self (= (shape) $x) $x))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.03) | (assertEqual (color)) | (green yellow red) | (red yellow green) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.04) | (assertEqual (color)) | (green yellow red) | (green yellow red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.05) | (assertEqual (collapse (shape))) | (((shape))) | (((shape))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.06) | (assertEqualToResult (shape)) | ((shape)) | ((shape)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.07) | (assertEqualToResult (pair (bin) (bin))) | ((A A) (A B) (B A) (B B)) | ((A A) (A B) (B A) (B B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.08) | (assertEqual (find-equal (color) (foo))) | (red) | (red) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.09) | (assertEqualToResult (rev A (superpose (B C D)))) | ((B A) (C A) (D A)) | ((B A) (C A) (D A)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.10) | (assertEqual (is (air dry))) | ((start humidifier) (start kettle) (stop ventilation)) | ((stop ventilation) (start kettle) (start humidifier)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b4_nondeterm.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B4-NONDETERM.11) | (assertEqual (is (air wet))) | ((start ventilation) (stop humidifier) (stop kettle)) | ((stop kettle) (stop humidifier) (start ventilation)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.01) | (assertEqual (Add S Z)) | (S) | (S) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.03) | (assertEqual (Add (S Z) Z)) | ((S Z)) | ((S Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.04) | (assertEqual (Add Z (S Z))) | ((S Z)) | ((S Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.05) | (assertEqual (Add Something Z)) | (Something) | (Something) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.06) | (assertEqualToResult (Add Z Ten)) | ((Add Z Ten)) | ((Add Z Ten)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.07) | (assertEqualToResult (Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | ((Cons (S Z) (Cons Z Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.09) | (assertEqual (eq (Add Z Z) Z)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.10) | (assertEqualToResult (eq Z (S Z))) | ((eq Z (S Z))) | ((eq Z (S Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.12) | (assertEqual (of-same-type Color Shape)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.13) | (assertEqual (of-same-type Green Red)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.16) | (assertEqual (Green $who)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.17) | (assertEqual (match &self (Green $who) $who)) | (Sam) | (Sam) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.18) | (assertEqual (match &self (Green $who) (Green $who))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.19) | (assertEqual (let $r (Add (S Z) Z) (match &self (= (eq $r (S Z)) $tv) $tv))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.20) | (assertEqualToResult (match &self (= (eq (Add (S Z) Z) (S Z)) $tv) $tv)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.21) | (assertEqual (let (S (S $r)) (Add (S Z) (S Z)) $r)) | (Z) | (Z) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.22) | (assertEqual (let* (($r1 (Add Z Z)) ($r2 (Add $r1 (S Z))) ($r3 (Add $r2 (S Z)))) (match &self (= (eq (S (S Z)) $r3) $tv) $tv))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.23) | (assertEqual (eqa (Add Z Z) (Add Z Z))) | (T) | (T) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.24) | (assertEqualToResult (eqa Z (Add Z Z))) | (T) | ((eqa Z (Add Z Z))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.25) | (assertEqual (eq Z (Add Z Z))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/b5_types_prelim.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.B5-TYPES-PRELIM.26) | (assertEqual (let $z (Add Z Z) (eqa Z $z))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.01) | (assertEqualToResult (+ 2 (* 3 5.5))) | (18.5) | (18.5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.02) | (assertEqualToResult (- 8 (/ 4 6.4))) | (7.375) | (7.375) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.03) | (assertEqualToResult (% 21 17)) | (4) | (4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.04) | (assertEqualToResult (< 4 (+ 2 (* 3 5)))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.05) | (assertEqualToResult (and (> 4 2) (< 4 3))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.06) | (assertEqualToResult (ln (+ 2 2))) | ((ln 4)) | ((ln 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.07) | (assertEqualToResult (> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | ((> 4 (+ ln 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_41396 2))) | ((> 4 (+ $_41396 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_41640 2))) | ((> 4 (+ $_41640 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_41646 2))) | ((> 4 (+ $_41646 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.08) | (assertEqualToResult (> 4 (+ $x 2))) | ((> 4 (+ $_58766 2))) | ((> 4 (+ $_58766 2))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.09) | (assertEqualToResult (== 4 (+ 2 2))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.10) | (assertEqualToResult (== 2 3)) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.11) | (assertEqualToResult (== (A B) (A B))) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.12) | (assertEqualToResult (== (A B) (A (B C)))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.13) | (assertEqualToResult (== 4 (+ ln 2))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.16) | (assertEqualToResult (sqr 4)) | (16) | (16) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.17) | (assertEqual (+ (superpose (1 2 3)) 1)) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.18) | (assertEqualToResult (bin)) | (0 1) | (0 1) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.19) | (assertEqualToResult (+ 1 (bin))) | (1 2) | (1 2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.20) | (assertEqualToResult (let $x (+ 2 3) (* $x $x))) | (25) | (25) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.21) | (assertEqual (fact 5)) | (120) | (120) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.22) | (assertEqualToResult (fact 5)) | (120) | (120) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c1_grounded_basic.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C1-GROUNDED-BASIC.23) | (assertEqualToResult (let $t (gen 3) (if (== (subsum (:: 3 (:: 7 (:: 5 nil))) $t) 8) $t (superpose ())))) | ((:: 1 (:: 0 (:: 1 nil)))) | ((:: 1 (:: 0 (:: 1 nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c2_spaces.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.01) | (assertEqualToResult (match &kb (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c2_spaces.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.02) | (assertEqualToResult (match &self ($p is-a Color) $p)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c2_spaces.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.03) | (assertEqual (match &kb (, (Venus orbit $x au) (Mars orbit $y au)) (- $y $x))) | (0.8) | (0.8) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c2_spaces.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.04) | (assertEqualToResult (match &kb ($prop is-a Color) (match &self ($obj is $prop) $obj))) | (Ball) | (Ball) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c2_spaces.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C2-SPACES.05) | (assertEqualToResult (match &self (, ($obj is $prop) ($prop is-a Color) ($obj is-a Planet)) (Color of Planet $obj is $prop))) | ((Color of Planet Mars is Red)) | ((Color of Planet Mars is Red)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.01) | (assertEqual (TV (And (PA) (PB)))) | ((stv 0.3 0.8)) | ((stv 0.3 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.02) | (assertEqual (TV (FA))) | ((stv 0.4 0.8)) | ((stv 0.4 0.8)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.03) | (assertEqual (TV (croaks Fritz))) | ((stv 0.95 0.85)) | ((stv 0.95 0.85)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.04) | (assertEqual (TV (frog Fritz))) | ((stv 0.783 0.68)) | ((stv 0.783 0.68)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/c3_pln_stv.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.C3-PLN-STV.05) | (assertEqual (TV (green Fritz))) | ((stv 0.7047 0.68)) | ((stv 0.7047 0.68)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.01) | (assertEqual (get-type 5)) | (Number) | (Number) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.02) | (assertEqual (get-type (+ 5 7))) | (Number) | (Number) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.03) | (assertEqual (get-type +)) | () | ((-> Number Number Number)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.04) | (assertEqualToResult (get-type (+ 5 "4"))) | (Number) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.05) | (assertEqualToResult (get-type (+ -))) | (Expression) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.06) | (assertEqual (get-type Either)) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.07) | (assertEqual (get-type (Left 5))) | (Either) | (Either) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.08) | (assertEqual (get-type (isLeft (Right 5)))) | (Bool) | (Bool) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.09) | (assertEqualToResult (get-type (isLeft 5))) | (Bool) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.10) | (assertEqual (get-type (LeftP 5))) | ((EitherP Number)) | ((EitherP Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.11) | (assertEqual (get-type (pair (LeftP 5) "String"))) | ((Pair (EitherP Number) String)) | ((Pair (EitherP Number) String)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.12) | (assertEqual (get-type (Cons 5 (Cons 6 Nil)))) | ((List Number)) | ((List Number)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.13) | (assertEqualToResult (get-type (Cons 5 (Cons "6" Nil)))) | ((List Number)) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d1_gadt.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D1-GADT.14) | (assertEqual (let (List $t) (get-type (Cons 5 (Cons 6 Nil))) $t)) | (Number) | (Number) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.01) | (assertEqual (get-type (curry +))) | () | ((-> Number (-> Number Number))) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.02) | (assertEqual (get-type ((curry +) 2))) | () | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.03) | (assertEqualToResult ((curry +) 2)) | (((curry +) 2)) | (((curry +) 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.04) | (assertEqual (((curry +) 2) 3)) | (5) | (5) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.05) | (assertEqual (get-type (curry-a + 2))) | () | ((-> Number Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.06) | (assertEqual (get-type ((curry-a + 2) 3))) | (Number) | (Number) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.07) | (assertEqualToResult (get-type ((curry-a + 2) "S"))) | (Number) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.08) | (assertEqual ((curry-a + 2) 3)) | (5) | (5) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.09) | (assertEqualToResult (is-socrates)) | ((curry-a is Socrates)) | ((curry-a is Socrates)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.10) | (assertEqual ((curry-a is Socrates) Human)) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.11) | (assertEqual ((is-socrates) Human)) | (True) | (True) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.12) | (assertEqual ((lambda $x (+ $x 1)) 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.13) | (assertEqual ((lambda ($x $y) (+ $x $y)) (2 7))) | (9) | (9) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.14) | (assertEqual ((inc) 5)) | (6) | (6) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.15) | (assertEqual (fmap (curry-a + 2) (Something 5))) | ((Something 7)) | ((Something 7)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.16) | (assertEqual (fmap (curry-a + 2) (Nothing))) | ((Nothing)) | ((Nothing)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.17) | (assertEqual (get-type (fmap (curry-a + 1) (Left 5)))) | () | ((Either Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.18) | (assertEqual (fmap (curry-a + 2) (UntypedC 5))) | ((UntypedC 7)) | ((UntypedC 7)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.19) | (assertEqual (fmap (curry-a + 2) (UntypedC 5 (UntypedC 8 (Null))))) | ((UntypedC 7 (UntypedC 10 (Null)))) | ((UntypedC 7 (UntypedC 10 (Null)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.20) | (assertEqualToResult (get-type (fmap (curry-a + 2) (Left "5")))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.21) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC "5")))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.22) | (assertEqualToResult (get-type (fmap (curry-a + 2) (UntypedC (Null) 5)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.23) | (assertEqual (fmap-i (curry-a - 7) (Right 3))) | ((Right 4)) | ((Right 4)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.24) | (assertEqual (fmap-i (curry-a * 2) (Cons 3 (Cons 4 Nil)))) | ((Cons 6 (Cons 8 Nil))) | ((Cons 6 (Cons 8 Nil))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.25) | (assertEqualToResult (fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | ((fmap-i (curry-a + 2) (Untyped 5))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.26) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d2_higherfunc.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D2-HIGHERFUNC.27) | (assertEqual (sort (Cons 3 (Cons 1 (Cons 2 Nil))))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.01) | (assertEqual (get-type (Cons 0 (Cons 1 Nil)))) | ((Vec Number (S (S Z)))) | ((Vec Number (S (S Z)))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.02) | (assertEqual (get-type (drop (Cons 1 Nil)))) | ((Vec Number Z)) | ((Vec Number Z)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.03) | (assertEqual (drop (Cons 2 (Cons 1 Nil)))) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.04) | (assertEqualToResult (get-type (drop Nil))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.05) | (assertEqual (get-type (ConsN "1" (ConsN "2" NilN)))) | ((VecN String 2)) | ((VecN String 2)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.06) | (assertEqual (get-type (dropN (ConsN "1" NilN)))) | ((VecN String 0)) | ((VecN String 0)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d3_deptypes.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D3-DEPTYPES.07) | (assertEqualToResult (dropN NilN)) | ((dropN NilN)) | ((dropN NilN)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.01) | (assertEqual (get-type (Mortal Plato))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.02) | (assertEqual (get-type (HumansAreMortal SocratesIsHuman))) | ((Mortal Socrates)) | ((Mortal Socrates)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.03) | (assertEqualToResult (get-type (HumansAreMortal (Human Socrates)))) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.04) | (assertEqual (get-type (= SocratesIsMortal (HumansAreMortal SocratesIsHuman)))) | (Type) | (Type) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.05) | (assertEqual (get-type (= (Mortal Socrates) (Mortal Plato)))) | (Type) | (Type) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.06) | (assertEqualToResult (get-type (= SocratesIsMortal (HumansAreMortal PlatoIsHuman)))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.07) | (assertEqualToResult (get-type (= SocratesIsHuman PlatoIsHuman))) | (Type) | () | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.08) | (assertEqualToResult (get-type (= SocratesIsHuman SocratesIsMortal))) | (Type) | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.09) | (assertEqual (= SocratesIsMortal (HumansAreMortal SocratesIsHuman))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.10) | (assertEqual (= (+ 1 1) (- 3 1))) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.11) | (assertEqual (= (Mortal Socrates) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.12) | (assertEqualToResult (= (Mortal Plato) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.13) | (assertEqual (= (Mortal Plato) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.14) | (assertEqualToResult (= (Human Sam) T)) | () | () | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.15) | (assertEqualToResult (Mortal Plato)) | ((Mortal Plato)) | ((Mortal Plato)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.16) | (assertEqual (= (= $x $x) T)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.17) | (assertEqual (Mortal Plato)) | (T) | (T) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/d4_type_prop.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.D4-TYPE-PROP.18) | (assertEqualToResult (ift (Mortal $x) $x)) | (Socrates Plato) | (Plato Socrates) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e1_kb_write.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.01) | (assertEqualToResult (ift (green $x) (add-atom &kb (Green $x)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e1_kb_write.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E1-KB-WRITE.02) | (assertEqualToResult (match &kb (Green $x) $x)) | (Fritz Sam) | (Fritz Sam) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.01) | (assertEqual (get-state (get-token))) | ((A B)) | ((A B)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_181360)) | ((State (A B) $_181360)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_181414)) | ((State (A B) $_181414)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_181450)) | ((State (A B) $_181450)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.02) | (assertEqual (get-token)) | ((State (A B) $_186946)) | ((State (A B) $_186946)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.03) | (assertEqual (get-type (new-state 2))) | ((StateMonad Number)) | ((StateMonad Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.04) | (assertEqual (get-type (change-state! (new-state "S") "V"))) | ((StateMonad String)) | ((StateMonad String)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.05) | (assertEqual (let $v (new-state 1) (get-type $v))) | ((StateMonad Number)) | ((StateMonad Number)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.06) | (assertEqual (get-type &state-token)) | ((StateMonad Expression)) | ((StateMonad Expression)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.09) | (assertEqualToResult (nop (change-state! &state-token (C D)))) | () | (()) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.10) | (assertEqual (get-state (get-token))) | ((C D)) | ((C D)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_45370)) | ((State 2 $_45370)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_508852)) | ((State 2 $_508852)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_508866)) | ((State 2 $_508866)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_509346)) | ((State 2 $_509346)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.11) | (assertEqual (let $x (new-state 1) (change-state! $x (+ (get-state $x) 1)))) | ((State 2 $_509652)) | ((State 2 $_509652)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_12556)) | ((State 1 $_12556)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_13070)) | ((State 1 $_13070)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_13306)) | ((State 1 $_13306)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e2_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E2-STATES.12) | (assertEqual (let $tnso (new-state 1) $tnso)) | ((State 1 $_73282)) | ((State 1 $_73282)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.01) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (inactive) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.02) | (assertEqualToResult (nop (change-state! (status (Goal lunch-order)) active))) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.03) | (assertEqual (get-state (status (Goal lunch-order)))) | (inactive) | (active) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.04) | (assertEqualToResult (nop (change-state! &state-active inactive))) | () | (()) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.05) | (assertEqual (match &self (= (status (Goal $goal)) &state-active) $goal)) | () | (meditation) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/e3_match_states.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.E3-MATCH-STATES.06) | (assertEqual (if (== (get-state (status (Goal $goal))) active) $goal (superpose ()))) | () | (lunch-order) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.01) | (assertEqualToResult (get-type &self)) | (hyperon::space::DynSpace) | (hyperon::space::DynSpace) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_89968 (get-atoms &self) (get-type $_89968)))) | ((hyperon::space::DynSpace)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_89992 (get-atoms &self) (get-type $_89992)))) | ((hyperon::space::DynSpace)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_90008 (get-atoms &self) (get-type $_90008)))) | ((hyperon::space::DynSpace)) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.02) | (assertEqual ((let $x (get-atoms &self) (get-type $x)))) | (((let $_95154 (get-atoms &self) (get-type $_95154)))) | ((hyperon::space::DynSpace)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.03) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.06) | (assertEqual (match &m (= (f 2) $x) $x)) | ((g 3)) | ((g 3)) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.09) | (assertEqual (g 2)) | (102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.10) | (assertEqual (f 2)) | (103) | (103) | | FAIL | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.11) | (assertEqual &m) | (&m) | ((: g (-> Number Numer))) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.12) | (assertEqual (== (let* (($x (collapse (get-atoms &m))) ($y (car-atom $x))) (get-type $y)) (get-type &self))) | (False) | (False) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.13) | (assertEqual (if (> 1 2) 1 2)) | (2) | (2) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.14) | (assertEqual (g 2)) | (102 102 102 102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.15) | (assertEqual (f 2)) | (103 103 103 103) | (103) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.16) | (assertEqualToResult (dup 2)) | (102 102 102 102 12) | (12 102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.17) | (assertEqual (g 2)) | (102 102 102 102 102 102 102 102 102) | (102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.18) | (assertEqual (f 2)) | (103 103 103 103 103 103 103 103 103) | (103) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_imports.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-IMPORTS.19) | (assertEqualToResult (dup 2)) | (102 102 102 102 102 102 102 102 102 12 12) | (12 102) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.01) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.02) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.04) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.05) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.07) | (assertEqual (+ 1 2)) | (3) | (3) | | PASS | [HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-experimental_scripts/f1_moduleA.metta.html#HYPERON-EXPERIMENTAL-SCRIPTS.F1-MODULEA.08) | (assertEqual (if True "S" "F")) | ("S") | ("S") | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.01) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.02) | (assertEqual (+ 1 (superpose (1 2 3)))) | (2 3 4) | (2 3 4) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.03) | (assertEqual ((superpose (1 2 3)))) | ((1) (2) (3)) | ((1) (2) (3)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.04) | (assertEqual (case (+ 1 5) ((5 Error) (6 OK) (6 Error)))) | (OK) | (OK) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.05) | (assertEqual (case (+ 1 5) (($x (+ 1 $x))))) | (7) | (7) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.06) | (assertEqual (case 5 ((6 OK)))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.07) | (assertEqual (case (+ 1 (superpose (1 2 3))) ((3 OK-3) (4 OK-4)))) | (OK-3 OK-4) | (OK-3 OK-4) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.08) | (assertEqual (case (+ 1 (superpose (1 2 3))) (($x (+ 1 $x))))) | (3 4 5) | (3 4 5) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.09) | (assertEqualToResult (superpose ())) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.10) | (assertEqualToResult (collapse (superpose ()))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.11) | (assertEqualToResult (superpose ((nop 1)))) | () | () | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.12) | (assertEqualToResult (collapse (superpose ((nop 1))))) | () | (()) | | FAIL | [HYPERON-METTALOG-SANITY.00-LANG-CASE.13](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.13) | (assertEqual (match &self $1 $1)) | ((Rel-P A B) (Rel-Q A C)) | ((= (Rel-P P P P) 10) (Rel-P A B) (Rel-Q A C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.14](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.14) | (assertEqualToResult (match &self ($Rel A $X) ($Rel A $X))) | ((Rel-P A B) (Rel-Q A C)) | ((Rel-P A B) (Rel-Q A C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.15](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.15) | (assertEqualToResult (superpose ((Rel-P B) (Rel-Q C)))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.16](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.16) | (assertEqual (match &self ($rel A $x) ($rel $x))) | ((Rel-P B) (Rel-Q C)) | ((Rel-P B) (Rel-Q C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.17](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.17) | (assertEqual (superpose ((P B) (Q C)))) | ((P B) (Q C)) | ((P B) (Q C)) | | PASS | [HYPERON-METTALOG-SANITY.00-LANG-CASE.18](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/00_lang_case.metta.html#HYPERON-METTALOG-SANITY.00-LANG-CASE.18) | (assertEqual (case (match &self ($rel B $x) ($rel $x)) (((Rel-P $y) (P $y)) ((Rel-Q $y) (Q $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/01_lang_inc.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.01) | (assertEqual (maybe-inc Nothing)) | (Nothing) | (Nothing) | | PASS | [HYPERON-METTALOG-SANITY.01-LANG-INC.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/01_lang_inc.metta.html#HYPERON-METTALOG-SANITY.01-LANG-INC.02) | (assertEqual (maybe-inc (Just 2))) | ((Just 3)) | ((Just 3)) | | PASS | [HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/02-curried-plus.metta.html#HYPERON-METTALOG-SANITY.02-CURRIED-PLUS.01) | (assertEqualToResult ((inc) 2)) | (3) | (3) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/03-soring-via-insert.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.01) | (assertEqual (Cons 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/03-soring-via-insert.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.02) | (assertEqual (insert 1 Nil)) | ((Cons 1 Nil)) | ((Cons 1 Nil)) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/03-soring-via-insert.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.03) | (assertEqual (insert 2 (insert 1 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/03-soring-via-insert.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.04) | (assertEqual (insert 1 (insert 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | ((Cons 1 (Cons 2 Nil))) | | PASS | [HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/03-soring-via-insert.metta.html#HYPERON-METTALOG-SANITY.03-SORING-VIA-INSERT.05) | (assertEqual (insert 3 (insert 2 (insert 1 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | ((Cons 1 (Cons 2 (Cons 3 Nil)))) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.01) | (assertEqualToResult (add-atom &kb (SS-P_AS A_AS B_AS))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.02) | (assertEqualToResult (add-atom &kb (SS-Q_AS A_AS C_AS))) | () | (()) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.03) | (assertEqualToResult (match &kb ($SS A_AS $X) ($SS A_AS $X))) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | ((SS-P_AS A_AS B_AS) (SS-Q_AS A_AS C_AS)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.04) | (assertEqual (match &kb ($rel A_AS $x) ($rel $x))) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | ((SS-P_AS B_AS) (SS-Q_AS C_AS)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.05) | (assertEqual (superpose ((P_AS B_AS) (Q_AS C_AS)))) | ((P_AS B_AS) (Q_AS C_AS)) | ((P_AS B_AS) (Q_AS C_AS)) | | PASS | [HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/06_match_in_space.metta.html#HYPERON-METTALOG-SANITY.06-MATCH-IN-SPACE.06) | (assertEqual (case (match &kb ($rel B_AS $x) ($rel $x)) (((SS-P_AS $y) (P_AS $y)) ((SS-Q_AS $y) (Q_AS $y)) (%void% no-match)))) | (no-match) | (no-match) | | PASS | [HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/hyperon-mettalog_sanity/structure-tests.metta.html#HYPERON-METTALOG-SANITY.STRUCTURE-TESTS.01) | (assertEqualToResult (collapse (superpose ((superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3)) (superpose (4 5 6 4 5 6 4 5 6 4 5... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 ... | ((1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 4 5 6 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9 7 8 9)) | | PASS | [METTA-MORPH-TESTS.ADD-ATOM-MATCH.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/add_atom_match.metta.html#METTA-MORPH-TESTS.ADD-ATOM-MATCH.01) | (assertEqualToResult (sequential ((add-atom &self (man mortal)) (match &self ($A mortal) (mortal $A))))) | ((mortal man)) | ((mortal man)) | | PASS | [METTA-MORPH-TESTS.AND-OR.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/and_or.metta.html#METTA-MORPH-TESTS.AND-OR.01) | (assertEqualToResult (If (or (and True False) True) 1 2)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.COLLAPSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/collapse.metta.html#METTA-MORPH-TESTS.COLLAPSE.01) | (assertEqualToResult (collapse (1 2 3))) | (((1 2 3))) | (((1 2 3))) | | PASS | [METTA-MORPH-TESTS.FACTORIAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/factorial.metta.html#METTA-MORPH-TESTS.FACTORIAL.01) | (assertEqualToResult (facF 10)) | (3628800) | (3628800) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.01) | (assertEqual (hyperpose (1 2))) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.02) | (assertEqual (hyperpose (1 (If (== 1 2) 1)))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.03) | (assertEqual (hyperpose ((If (== 1 2) 1) 1))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.04) | (assertEqual (hyperpose (1 2 3))) | (1 2 3) | (1 2 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.05) | (assertEqual (hyperpose ((If (== 1 2) 1) 2 3))) | (2 3) | (2 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.06) | (assertEqual (hyperpose (1 (If (== 1 2) 1) 3))) | (1 3) | (1 3) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.07) | (assertEqual (hyperpose (1 2 (If (== 1 2) 1)))) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.08) | (assertEqual (hyperpose (1 (If (== 1 2) 1) (If (== 1 2) 1)))) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.09) | (assertEqual (hyperpose (1 2 3 4))) | (1 2 3 4) | (1 2 3 4) | | PASS | [METTA-MORPH-TESTS.HYPERPOSE.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/hyperpose.metta.html#METTA-MORPH-TESTS.HYPERPOSE.10) | (assertEqual (hyperpose ((1 2) (3 4)))) | ((1 2) (3 4)) | ((1 2) (3 4)) | | PASS | [METTA-MORPH-TESTS.IDENTITY.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/identity.metta.html#METTA-MORPH-TESTS.IDENTITY.01) | (assertEqualToResult (f 1)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.IF.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/if.metta.html#METTA-MORPH-TESTS.IF.01) | (assertEqualToResult (If (> 1 2) (3 4) (5 6))) | ((5 6)) | ((5 6)) | | PASS | [METTA-MORPH-TESTS.LETLET.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/letlet.metta.html#METTA-MORPH-TESTS.LETLET.01) | (assertEqualToResult (let $T (1.0 0.9) (let* ((($f1 $c1) $T)) ($f1 $c1)))) | ((1.0 0.9)) | ((1.0 0.9)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/let_superpose_if_case.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.01) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/let_superpose_if_case.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-IF-CASE.02) | (assertEqualToResult (let $y (superpose (3 4 5)) (If (> $y 3) (case (1 $y) (((1 3) (f 0)) ((1 4) (42 42)) ($else (1 1))))))) | ((42 42) (1 1)) | ((1 1) (42 42)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/let_superpose_list2.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST2.01) | (assertEqual (wuzaL 2 (3 4))) | ((4 3) (4 4)) | ((4 3) (4 4)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/let_superpose_list.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.01) | (assertEqualToResult (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/let_superpose_list.metta.html#METTA-MORPH-TESTS.LET-SUPERPOSE-LIST.02) | (assertEqual (wuza 5)) | ((10 4) (10 5)) | ((10 4) (10 5)) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_feval.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $x) $y) $y)) | ((* 2 $_465984)) | ((* 2 $_465984)) | | PASS | [METTA-MORPH-TESTS.MATCH-FEVAL.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_feval.metta.html#METTA-MORPH-TESTS.MATCH-FEVAL.01) | (assertEqualToResult (match &self (= (f $x) $y) $y)) | ((* 2 $_466182)) | ((* 2 $_466182)) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_superposed_spaces.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.01) | (assertEqualToResult (add-atom &attentional_focus 1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_superposed_spaces.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.02) | (assertEqualToResult (add-atom &concepts 2)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_superposed_spaces.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.03) | (assertEqualToResult (match &attentional_focus $1 $1)) | (1) | (1) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_superposed_spaces.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.04) | (assertEqualToResult (match &concepts $1 $1)) | (2) | (2) | | PASS | [METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_superposed_spaces.metta.html#METTA-MORPH-TESTS.MATCH-SUPERPOSED-SPACES.05) | (assertEqualToResult (match (superpose (&attentional_focus &concepts)) $1 $1)) | (1 2) | (1 2) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.01) | (assertEqualToResult (match &belief_events $1 $1)) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.02) | (assertEqualToResult (add-atom &belief_events belief1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.03) | (assertEqualToResult (match &belief_events $1 $1)) | (belief1) | (belief1) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.04) | (assertEqualToResult (case belief1 ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.05) | (assertEqualToResult (case (match &belief_events $1 $1) ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.06) | (assertEqualToResult (case (match &belief_events $1 $1) ((belief1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.07) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.08) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.09) | (assertEqualToResult (add-atom &goal_events goal1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.10) | (assertEqualToResult (case (match &goal_events $1 $1) ((goal1 yes) (%void% 42)))) | (yes) | (yes) | | PASS | [METTA-MORPH-TESTS.MATCH-VOID.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/match_void.metta.html#METTA-MORPH-TESTS.MATCH-VOID.11) | (assertEqualToResult (case (match &goal_events $1 $1) ((%void% 42)))) | () | () | | PASS | [METTA-MORPH-TESTS.MINNARS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/minnars.metta.html#METTA-MORPH-TESTS.MINNARS.01) | (assertEqualToResult (Question ((Sentence (((ExtSet garfield) --> cat) (1.0 0.9)) (1)) (Sentence (((cat x sky) --> like) (1.0 0.9)) (2)) (Sentence ((sky --> (IntSet blue)) (1.0 0.9)) (3)) (Sentence ((... | (((1.0 0.37946790052053214) (2 1 3 4))) | (((1.0 0.37946790052053214) (2 1 3 4))) | | PASS | [METTA-MORPH-TESTS.MULTIFUNCTION.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/multifunction.metta.html#METTA-MORPH-TESTS.MULTIFUNCTION.01) | (assertEqualToResult (g 42 (1 2))) | (1764 1764) | (1764) | | PASS | [METTA-MORPH-TESTS.NALIFIER.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/nalifier.metta.html#METTA-MORPH-TESTS.NALIFIER.01) | (assertEqualToResult (let ($S $EV) (choiceQuery (((ExtSet sam) --> duck) ((ExtSet sam) --> swan) ((ExtSet sam) --> dog))) $S)) | ((((ExtSet sam) --> duck) (1.0 0.6183206106870229))) | ((((ExtSet sam) --> duck) (1.0 0.618320610687023))) | | PASS | [METTA-MORPH-TESTS.NESTED-PARAMETERS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/nested_parameters.metta.html#METTA-MORPH-TESTS.NESTED-PARAMETERS.01) | (assertEqualToResult (Truth_Deduction (1.0 0.9) (1.0 0.9))) | ((1.0 0.81)) | ((1.0 0.81)) | | PASS | [METTA-MORPH-TESTS.PEANO.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/peano.metta.html#METTA-MORPH-TESTS.PEANO.01) | (assertEqualToResult (Add (S (S Z)) (S (S (S Z))))) | ((S (S (S (S (S Z)))))) | ((S (S (S (S (S Z)))))) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.01) | (assertEqualToResult (sequential ((increment) (increment)))) | (2 3) | (2 3) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.02) | (assertEqualToResult (sequential ((increment) (increment) (increment)))) | (4 5 6) | (4 5 6) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.03) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment)))))) | (7 8 9) | (7 8 9) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.04) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (sequential ((increment) (increment) (increment)))))) | (10 11 12 13 14 15) | (10 11 12 13 14 15) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.05) | (assertEqualToResult (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment)))) | (16 17 18 19 20 21) | (16 17 18 19 20 21) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.06) | (assertEqualToResult (do (sequential ((sequential ((increment) (increment) (increment))) (increment) (increment) (increment))))) | () | () | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.07) | (assertEqualToResult (get-state &var)) | (27) | (27) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.08) | (assertEqualToResult (sequential ((increment)))) | (28) | (28) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.09) | (assertEqualToResult (increment)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.10) | (assertEqualToResult (get-state &var)) | (29) | (29) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_129754)) | ((State 30)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_328238)) | ((State 30)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.11) | (assertEqualToResult (sequential ((change-state! &var (+ 1 (get-state &var)))))) | ((State 30 $_328834)) | ((State 30)) | | PASS | [METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/sequential_nested.metta.html#METTA-MORPH-TESTS.SEQUENTIAL-NESTED.12) | (assertEqualToResult (get-state &var)) | (30) | (30) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.01) | (assertEqualToResult (get-state &FIFO)) | (45) | (45) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.02) | (assertEqualToResult (add-atom &WU a)) | () | (()) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.03) | (assertEqualToResult (match &WU $1 $1)) | (a) | (a) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.04) | (assertEqualToResult (add-atom &WU b)) | () | (()) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.05) | (assertEqualToResult (remove-atom &WU a)) | () | (()) | | PASS | [METTA-MORPH-TESTS.STATES-SPACES.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/states_spaces.metta.html#METTA-MORPH-TESTS.STATES-SPACES.06) | (assertEqual (match &WU $1 $1)) | (b) | (b) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.01) | (assertEqualToResult (TupleConcat (a b c) (e f g))) | ((a b c e f g)) | ((a b c e f g)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.02) | (assertEqualToResult (TupleConcat () (e f g))) | ((e f g)) | ((e f g)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.03) | (assertEqualToResult (TupleConcat (a b c) ())) | ((a b c)) | ((a b c)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.04) | (assertEqualToResult (range 1 1)) | () | (()) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.05) | (assertEqualToResult (range 1 3)) | ((1 2)) | ((1 2)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.06) | (assertEqualToResult (range 2 6)) | ((2 3 4 5)) | ((2 3 4 5)) | | PASS | [METTA-MORPH-TESTS.SUPERCOLLAPSE.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/supercollapse.metta.html#METTA-MORPH-TESTS.SUPERCOLLAPSE.07) | (assertEqualToResult (range 1 10)) | ((1 2 3 4 5 6 7 8 9)) | ((1 2 3 4 5 6 7 8 9)) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/superpose_nested.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.01) | (assertEqualToResult (superpose (a b c))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/superpose_nested.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.02) | (assertEqualToResult (superpose ((superpose (a b c))))) | (a b c) | (a b c) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/superpose_nested.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.03) | (assertEqualToResult (superpose ((superpose (a b c)) (superpose (x y z))))) | (a b c x y z) | (a b c x y z) | | PASS | [METTA-MORPH-TESTS.SUPERPOSE-NESTED.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/superpose_nested.metta.html#METTA-MORPH-TESTS.SUPERPOSE-NESTED.04) | (assertEqualToResult (superpose ((superpose (a b c)) x y z))) | (a b c x y z) | (a b c x y z) | | PASS | [METTA-MORPH-TESTS.TESTS0.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.01) | (assertEqualToResult (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9)))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | (((Garfield --> animal) (1.0 0.81)) ((animal --> Garfield) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.TESTS0.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.02) | (assertEqualToResult (|- ((Garfield --> carnivore) (1.0 0.9)) (((Garfield --> cat) ==> (Garfield --> carnivore)) (1.0 0.9)))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | (((Garfield --> cat) (1.0 0.44751381215469616))) | | PASS | [METTA-MORPH-TESTS.TESTS0.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.03) | (assertEqualToResult (|- (({ a b } --> mwawa) (1.0 0.9)))) | ((({ a } --> mwawa) (1.0 0.81)) (({ b } --> mwawa) (1.0 0.81))) | ((({ a } --> mwawa) (1.0 0.81)) (({ b } --> mwawa) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.TESTS0.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.04) | (assertEqualToResult (|- (((a * b) --> R) (1.0 0.9)))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | (((a --> (R /1 b)) (1.0 0.81)) ((b --> (R /2 a)) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.TESTS0.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.05) | (assertEqualToResult (|- ((R --> (a * b)) (1.0 0.9)))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | ((((R \1 b) --> a) (1.0 0.81)) (((R \2 a) --> b) (1.0 0.81))) | | PASS | [METTA-MORPH-TESTS.TESTS0.06](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.06) | (assertEqualToResult (|- ((A --> cat) (1.0 0.9)) ((B --> cat) (1.0 0.9)))) | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A | B) --> cat) (1.0... | (((B --> A) (1.0 0.44751381215469616)) ((B <-> A) (1.0 0.44751381215469616)) (((A & B) --> cat) (1.0 0.81)) (((A | B) --> cat) (1.0 0.81)) (((A ~ B) --> cat) (0.0 0.81))) | | PASS | [METTA-MORPH-TESTS.TESTS0.07](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/tests0.metta.html#METTA-MORPH-TESTS.TESTS0.07) | (assertEqualToResult (|- (|- ((Garfield --> cat) (1.0 0.9)) ((cat --> animal) (1.0 0.9))) ((animal --> being) (1.0 0.9)))) | (((Garfield --> being) (1.0 0.7290000000000001)) ((being --> Garfield) (1.0 0.42163100057836905)) ((... | (((Garfield --> being) (1.0 0.7290000000000001)) ((animal --> (Garfield & being)) (1.0 0.40276243093922653)) ((animal --> (Garfield - being)) (0.0 0.40276243093922653)) ((animal --> (Garfield | being)) (1.0 0.40276243093922653)) ((being --> Garfield) (1.0 0.28712091374556914)) ((being --> Garfield) (1.0 0.42163100057836905)) ((being <-> Garfield) (1.0 0.28712091374556914))) | | PASS | [METTA-MORPH-TESTS.TYPES2.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/types2.metta.html#METTA-MORPH-TESTS.TYPES2.01) | (assertEqualToResult (get-type lion1)) | (Lion) | (Lion) | | PASS | [METTA-MORPH-TESTS.TYPES2.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/types2.metta.html#METTA-MORPH-TESTS.TYPES2.02) | (assertEqualToResult (reproduce lion1 lion2)) | (childlion) | (childlion) | | PASS | [METTA-MORPH-TESTS.TYPES2.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/types2.metta.html#METTA-MORPH-TESTS.TYPES2.03) | (assertEqualToResult (get-type Lion)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.TYPES2.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/types2.metta.html#METTA-MORPH-TESTS.TYPES2.04) | (assertEqualToResult (match &self (: Lion $1) $1)) | (Cat) | (Cat) | | PASS | [METTA-MORPH-TESTS.TYPES2.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/types2.metta.html#METTA-MORPH-TESTS.TYPES2.05) | (assertEqualToResult (match &self (: reproduce $1) $1)) | ((-> Lion Lion Lion)) | ((-> Lion Lion Lion)) | | PASS | [METTA-MORPH-TESTS.TYPES3.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/types3.metta.html#METTA-MORPH-TESTS.TYPES3.01) | (assertEqualToResult (match &self (GreaterThan $x $y) (If (and (== (get-type $x) Number) (== (get-type $y) Number)) (If (EqualOrGreater $x $y) yay)))) | (yay) | (yay) | | PASS | [METTA-MORPH-TESTS.TYPES.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/types.metta.html#METTA-MORPH-TESTS.TYPES.01) | (assertEqualToResult (f 42)) | (42) | (42) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/zeroargs.metta.html#METTA-MORPH-TESTS.ZEROARGS.01) | (assertEqualToResult (z)) | ((z)) | ((z)) | | PASS | [METTA-MORPH-TESTS.ZEROARGS.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/baseline_compat/metta-morph_tests/zeroargs.metta.html#METTA-MORPH-TESTS.ZEROARGS.02) | (assertEqualToResult (f)) | (42) | (42) | | PASS | [PLN.CURRIED-CHAINER.01](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/cuRRent/_162410.metta.html#PLN.CURRIED-CHAINER.01) | (assertEqual (bc (: $Prf A) (fromNumber 0))) | ((: a A)) | ((: a A)) | | FAIL | [PLN.CURRIED-CHAINER.02](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/cuRRent/_195318.metta.html#PLN.CURRIED-CHAINER.02) | (assertEqual (bc (: $Prf B) (fromNumber 2))) | () | ((: ((ModusPonens ab) a) B)) | | FAIL | [PLN.CURRIED-CHAINER.03](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/cuRRent/_242596.metta.html#PLN.CURRIED-CHAINER.03) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 1))) | ((: ab (→ A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B))) | | FAIL | [PLN.CURRIED-CHAINER.04](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/cuRRent/_298598.metta.html#PLN.CURRIED-CHAINER.04) | (assertEqualToResult (fc (: ab (→ A B)) (fromNumber 2))) | ((: ab (→ A B))) | ((: ab (→ A B)) (: (ModusPonens ab) (-> A B)) (: ((ModusPonens ab) a) B)) | | FAIL | [PLN.CURRIED-CHAINER.05](https://htmlpreview.github.io/?https://raw.githubusercontent.com/logicmoo/vspace-metta/main/reports/cuRRent/_341358.metta.html#PLN.CURRIED-CHAINER.05) | (assertEqualToResult (fc (: a A) (fromNumber 3))) | ((: a A)) | ((: a A) (: ((ModusPonens ab) a) B)) |