src/problems/aspc.lisp @ a95ed046cc2c
NWCK
author | Steve Losh <steve@stevelosh.com> |
---|---|
date | Fri, 05 Aug 2022 00:16:11 -0400 |
parents | 888f5c30c949 |
children | (none) |
(defpackage :rosalind/aspc (:use :cl :rosalind :losh :iterate)) (in-package :rosalind/aspc) (define-problem aspc (data stream) "6 3" "42" (let ((n (read data)) (m (read data))) (u:Σ (k m n :modulo 1000000) (u:binomial-coefficient n k)))) #; Scratch --------------------------------------------------------------------