diff options
author | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-02-17 20:12:37 +0100 |
---|---|---|
committer | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-02-17 20:12:37 +0100 |
commit | 14c5ff40e872d0d00fdeca93571d12f0fb3520b9 (patch) | |
tree | d026cf236f2a254a0c731848017a916170a83563 | |
parent | 3256842ad44d6b622e272538bdeb8934b31f02a5 (diff) |
Optimize the TN algorithm
-rw-r--r-- | org-fc-algo-tn.el | 14 |
1 files changed, 5 insertions, 9 deletions
diff --git a/org-fc-algo-tn.el b/org-fc-algo-tn.el index ce042e4..d882156 100644 --- a/org-fc-algo-tn.el +++ b/org-fc-algo-tn.el @@ -20,26 +20,22 @@ EASE, BOX and INTERVAL are the current parameters of the card." (correct t) (next-ease (cond - (incorrect-at-edge (1- ease)) - (incorrect (1- ease)) + (incorrect-at-edge (1+ easy)) + (incorrect (1+ ease)) (correct ease))) (next-box (cond (incorrect-at-edge box) (incorrect (1- box)) (correct (1+ box)))) - (next-interval - (cond - (incorrect-at-edge 0) - (incorrect (- (nth-tn box) (nth-tn next-box))) - (correct (- (nth-tn next-box) (nth-tn box)))))) + (next-interval (nth-tn next-box))) (list next-ease next-box next-interval))) (defun org-fc-algo-tn-initial-review-data (position) "Initial TN review data for POSITION." (let - ((box 1) - (ease 100) + ((box 0) + (ease 0) (interval 1.0) (due (org-fc-timestamp-in 1.0))) (list position ease box interval due))) |