Skip to content

Commit 5eac58f

Browse files
committed
Release commit. (slightly higher quality rescale, + confidence rescale for termlink strengths)
1 parent 3756656 commit 5eac58f

File tree

2 files changed

+4
-2
lines changed

2 files changed

+4
-2
lines changed

src/narjure/budget_functions.clj

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -73,7 +73,7 @@
7373
truth-quality (if (:truth derived-task) (truth-to-quality (:truth derived-task))
7474
0.0 #_(w2c 1.0))
7575
complexity (:sc derived-task)
76-
rescale-factor 0.3 ;should probably not above input belief quality!
76+
rescale-factor 0.4 ;should probably not above input belief quality!
7777
quality (* truth-quality
7878
rescale-factor
7979
#_(/ 1.0 (Math/sqrt complexity)))]

src/narjure/memory_management/termlink_utils.clj

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -63,9 +63,11 @@
6363
([tl old-strength]
6464
(let [prio-me (concept-priority (:id @state))
6565
prio-other (concept-priority tl)
66+
evidence-mul 0.5
6667
association (t-and prio-me prio-other)
6768
disassocation (t-and prio-me (- 1.0 prio-other))]
68-
(revision [0.0 disassocation] (revision old-strength [1.0 association])))))
69+
(revision [0.0 (* evidence-mul disassocation)]
70+
(revision old-strength [1.0 (* evidence-mul association)])))))
6971

7072
(defn update-termlink [tl] ;term
7173
(let [old-strength ((:termlinks @state) tl)]

0 commit comments

Comments
 (0)