Sha256: 1452068fb37c59c2243e3a2e7a0590bee1aa0590bfde587ae76201640978dc84
Contents?: true
Size: 649 Bytes
Versions: 396
Compression:
Stored size: 649 Bytes
Contents
#lang racket/base
(require "rna-transcription.rkt")
(module+ test
(require rackunit rackunit/text-ui)
(define suite
(test-suite
"RNA transcription tests"
(test-equal? "transcribes cytosine to guanine" (to-rna "C") "G")
(test-equal? "transcribes guanine to cytosine" (to-rna "G") "C")
(test-equal? "transcribes adenine to uracil" (to-rna "A") "U")
(test-equal? "transcribes thymine to adenine" (to-rna "T") "A")
(test-equal? "transcribes all nucleotides" (to-rna "ACGTGGTCTTAA") "UGCACCAGAAUU")
(test-exn "it validates dna strands" exn:fail? (lambda () (to-rna "XCGFGGTDTTAA")))))
(run-tests suite))
Version data entries
396 entries across 396 versions & 1 rubygems