Battle of Villiers, Beatmasters & Chestatee Regional Library System.

This commit is contained in:
nik gaffney 2020-10-03 00:37:28 +02:00
parent 90817af5fb
commit 7e01575e7a

View file

@ -309,7 +309,7 @@
(printf "Each person needs to meet ~a other people, " m0) (printf "Each person needs to meet ~a other people, " m0)
(if (<= m0 (+ r1 (* r2 2) (* r3 3))) (if (<= m0 (+ r1 (* r2 2) (* r3 3)))
(printf "which is possible.~n~n") (printf "which is possible.~n~n")
(printf "which is impossilbe with this arrangement.~n~n")))) (printf "which is impossible with this arrangement.~n~n"))))
(define (print-test-rounds l n1 n2 n3) (define (print-test-rounds l n1 n2 n3)
(printf "There are ~a people (binomial ~a)\n" (length l) (binomial (length l) 2)) (printf "There are ~a people (binomial ~a)\n" (length l) (binomial (length l) 2))