; Uses clojure.math.combinatorics for permutations function
(ns scratchpad.core
  (:require [clojure.math.combinatorics :as combo]))

(defn check-anagrams [a b]
  (let [permutations (map #(apply str %) (combo/permutations a))]
    (filter (fn [p] (.contains b p)) permutations)))

(check-anagrams "cat" "actor"); ("act")
(check-anagrams "car" "actor"); ()