diff options
| author | Masaya Tojo <masaya@tojo.tokyo> | 2024-08-23 01:29:50 +0900 |
|---|---|---|
| committer | Masaya Tojo <masaya@tojo.tokyo> | 2024-08-23 01:29:50 +0900 |
| commit | c6dc49f873ed16e9d0796b58a91a74089590e4ea (patch) | |
| tree | 49488afe6e9277a0c49a5e3b5f5e24e60b83913f | |
| parent | 51f01dfb42f25882a59ad5defb12e13433bfb6b6 (diff) | |
Add comments to describe the algorithm used in accel-asc procedure
| -rw-r--r-- | integer-partition/accel-asc.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/integer-partition/accel-asc.scm b/integer-partition/accel-asc.scm index 870cb0b..fcb21b2 100644 --- a/integer-partition/accel-asc.scm +++ b/integer-partition/accel-asc.scm @@ -32,6 +32,8 @@ (loop)) (if #f #f))))))) (begin + ;; This is a Scheme implementation of Jerome Kelleher's algorithm for generating integer paritions. + ;; See: https://jeromekelleher.net/category/combinatorics.html (define (accel-asc n) (accel-asc* n vector-copy)) |