src/problems/sset.lisp @ 8f6ef53eac55
ASPC, portability fixes
| author | Steve Losh <steve@stevelosh.com> |
|---|---|
| date | Mon, 20 Jan 2020 13:41:09 -0500 |
| parents | 2735aa6aab79 |
| children | (none) |
(defpackage :rosalind/sset (:use :cl :rosalind :losh :iterate)) (in-package :rosalind/sset) ;; The cardinality of a power set is 2ⁿ, because you can represent an individual ;; set as a binary string where 1 means the element is included and 0 is not, ;; and there are 2ⁿ possible binary strings of length n. (define-problem sset (data stream) "3" "8" (mod (expt 2 (read data)) 1000000)) #; Scratch --------------------------------------------------------------------