Change profile->scores to count->scores in borda code.

main
Edward L Platt 2 years ago
parent e379c7e826
commit e67ae2c12d

@ -3,7 +3,7 @@
#:use-module (deliberate preference)
#:use-module (deliberate utils)
#:export (borda-score social-choice-borda social-preference-borda)
#:export (profile->scores groups->totals profile-borda-totals))
#:export (counts->scores groups->totals profile-borda-totals))
;; Calculate the borda score of each alternative in `ranked`.
;;

@ -46,7 +46,7 @@
(borda-score test-alts test-pref))
(test-equal test-scores
(profile->scores test-alts test-profile))
(counts->scores test-alts test-profile))
(test-equal test-groups
(group-by car test-scores))

Loading…
Cancel
Save