Instantly share code, notes, and snippets.

View KeyTracker.jsfx
desc: Keytrack generator
//tags: Key track follow generator link
//author: Robert Randolph
slider1:0<0,127,1>Midi Note Value
slider2:0<0,15,1{1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16}>Input Channel
slider3:0<0,1,1{Note On, Note Off}>Trigger
in_pin:none
out_pin:none
View output
Installing parsers: CTagsSelfTest, Ada, Ant, Asciidoc, Asm, Asp, Autoconf, AutoIt, Automake, Awk, Basic, BETA, Clojure, CMake, C, C++, CPreProcessor, CSS, C#, Ctags, Cobol, CUDA, D, Diff, DTD, DTS, DosBatch, Eiffel, Elm, Erlang, Falcon, Flex, Fortran, Fypp, Gdbinit, Go, HTML, Iniconf, ITcl, Java, JavaProperties, JavaScript, JSON, LdScript, Lisp, Lua, M4, Man, Make, Markdown, MatLab, Myrddin, ObjectiveC, OldC++, OldC, OCaml, Passwd, Pascal, Perl, Perl6, PHP, Pod, Protobuf, PuppetManifest, Python, PythonLoggingConfig, QemuHX, QtMoc, R, RSpec, REXX, Robot, RpmSpec, ReStructuredText, Ruby, Rust, Scheme, Sh, SLang, SML, SQL, SystemdUnit, Tcl, TclOO, Tex, TTCN, Vera, Verilog, SystemVerilog, UCtagsAspell, VHDL, Vim, WindRes, YACC, YumRepo, Zephir, DBusIntrospect, Glade, Maven2, PlistXML, RelaxNG, SVG, XSLT
Setting option defaults
Setting default header extensions: h, H, hh, hpp, hxx, h++, inc, def
Installing default language mappings:
CTagsSelfTest:
Ada: .adb .ads .Ada
Ant: (build.xml) .build.xml .
View gag.css
body {
margin: 25px;
background-color: rgb(240,240,240);
font-family: arial, sans-serif;
font-size: 14px;
}
h1 {
font-size: 35px;
font-weight: normal;
View gist:3836958
(defn longest-palindrome [s]
(let [palindrome? #(= (seq %) (reverse %))
slice-all (fn [s] (mapcat #(partition % 1 s) (mapcat list (range (count s) 1 -1))))]
(some palindrome? (slice-all s))))
;; or to return palindrome
(defn longest-palindrome [s]
(let [palindrome? #(= (seq %) (reverse %))
slice-all (fn [s] (mapcat #(partition % 1 s) (mapcat list (range (count s) 1 -1))))]