hg.stevelosh.com > rosalind

src/problems/hamm.lisp @ 814719fdaa0d 

Merge.
author Steve Losh <steve@stevelosh.com>
date Fri, 20 Dec 2019 16:23:59 -0500
parents 11df545d1a41
children 2735aa6aab79 
(in-package :rosalind)

(defparameter *input-hamm* "GAGCCTACTAACGGGAT
CATCGTAATGACGGCCT")

(define-problem hamm (data stream)
    *input-hamm*
    "7"
  (hamming (read-line data) (read-line data) :test #'char=))

;; (problem-hamm *input-hamm*)
;; (solve hamm)