ericnormand

#!/bin/sh
#_(

   #_DEPS is same format as deps.edn. Multiline is okay.
   DEPS='
   {:deps {clj-time {:mvn/version "0.14.2"}}}
   '

   #_You can put other options here
   OPTS='

rauhs

(ns x.y
  (:use [plumbing.core]) ;; Just for the map-vals
  (:require [clojure.walk :refer [postwalk prewalk prewalk-demo postwalk-demo]]
            [clojure.core.match :refer [match]]
            [schema.utils :refer [named-error-explain validation-error-explain]]
            [schema.core :as s])
  (:import (schema.utils NamedError ValidationError)))

;; Partially FROM:
;; https://github.com/puppetlabs/clj-schema-tools

kidpollo

(ns app.api-server
  (:require [compojure.core :as compojure]
            [com.stuartsierra.component :as component]
            [app.app :as app]
            [ring.adapter.jetty :as jetty]))

(compojure/defroutes app
                     app/handler)

(defrecord AppServer [port server]

vishnuvyas

(ns levenshtein
 ^{:doc "A purely functional implementation of the levenshtien distance in clojure"})

(defn- compute-next-row
  "computes the next row using the prev-row current-element and the other seq"
  [prev-row current-element other-seq pred]
  (reduce
    (fn [row [diagonal above other-element]]
      (let [update-val
	     (if (pred other-element current-element)