triss

# Makes the subdevices aka channel 1&2 and 3&4 available for alsa applications
pcm_slave.sl12 {
	pcm "hw:AudioKontrol1,0,0"
}

pcm.channel12 {
	type plug
	slave sl12	
}

triss

{
  "groups": [
    {
      "rows": 5,
      "cols": 8,
      "position": [ 0, 0 ],
      "dimensions": [30, 18],
      "spacing": [36, 24],
      "controls": [32, 33, 34, 35, 36, 37, 38, 39,
                   24, 25, 26, 27, 28, 29, 30, 31,

triss

(ns tree-search.creativity
  (:require [tree-search.concept-net :as cn]
            [com.rpl.specter :as sp]))

(def creativity
  '{produces [forms {novel? {always    P-creative
                             sometimes H-creative}
                     value? hopefully
                     by     [combining knowledge]}]

triss

import java.util.List;
import java.util.ArrayList;
import java.util.Map;
import java.util.HashMap;
import java.util.Random;

public class Markov<E> {
    // we'll need a random number generator
    Random random;

triss

(ns markov.core
  (:require [clojure.java.io :as io]
            [clojure.string :as str]
            [clojure.pprint :refer [pprint]]))

(defn count-n-gram
  "Updates count of number of time n-gram has been seen in map."
  [m n-gram] (update-in m n-gram #(inc (or % 0))))

(defn next-word

triss

;; Specs for matching

(defn- fn-wrapped-spec
  [spec]
  (s/spec (s/cat :fn #{'clojure.core/fn}
                 :args #{['%]}
                 :form (s/spec spec))))

(s/def ::int-in-range?-form
  (s/cat :fn #{'clojure.spec/int-in-range?}

triss

(ns idea.core)

(defn rand-audience
  "Generates a random audience with n members."
  [n] (repeatedly n (fn [] {:well-being (dec (rand 2))
                           :effort     (rand)})))

(defn measure-audience
  "apply f to every item in audience, and average and weight the result."
  [weight f audience]

triss

// Pitch follower SynthDef
SynthDef.new(\pitchFollower, {
  var amp, freq, hasFreq;
  var input;
  var osc;
  var oscTrigger;
	
  input = SoundIn.ar(0);
  amp = Amplitude.kr(input);
  #freq, hasFreq = Pitch.kr(input);

triss

Java HotSpot(TM) 64-Bit Server VM warning: ignoring option MaxPermSize=256m; support was removed in 8.0
registering src/cljx [:create :modify]
registering src/cljx/rum-xox [:create :modify]
registering src/cljs [:create :modify]
registering src/cljs/rum_xox [:create :modify]
registering src/cljs/rum_xox/ui [:create :modify]
registering src/clj [:create :modify]
registering src/clj/rum_xox [:create :modify]
sending change event
watch service closed

triss

Java HotSpot(TM) 64-Bit Server VM warning: ignoring option MaxPermSize=256m; support was removed in 8.0
registering src/cljx [:create :modify]
registering src/cljx/rum-xox [:create :modify]
registering src/cljs [:create :modify]
registering src/cljs/rum_xox [:create :modify]
registering src/cljs/rum_xox/ui [:create :modify]
registering src/clj [:create :modify]
registering src/clj/rum_xox [:create :modify]
sending change event
watch service closed