Sha256: 461b31f711889a49e0cebe1aa742e3753c00e1b30ccd99bf458ab384c45a579b
Contents?: true
Size: 537 Bytes
Versions: 396
Compression:
Stored size: 537 Bytes
Contents
#lang racket
(provide (contract-out
[etl (-> valid-input valid-output)]))
(define (lower-case? s) (not (regexp-match? #rx"[A-Z]" s)))
;; Accept upper- or lower-case-letters strings as values
(define valid-input
(hash/c exact-nonnegative-integer? (listof string?)))
;; Keys will always be lower-case
(define valid-output
(hash/c lower-case? exact-nonnegative-integer?))
(define (etl h)
(for*/hash ([(score letter*) (in-hash h)]
[letter (in-list letter*)])
(values (string-downcase letter) score)))
Version data entries
396 entries across 396 versions & 1 rubygems