View nginx.conf
# do https://gist.github.com/jed/6147872 and then do this to proxy your app
worker_processes 1;
events {
worker_connections 1024;
}
http {
server {
listen 80;
View bootstrap.sh
#!/bin/bash -ex
# intall Xcode :( Just for the stupid --with-override-system-vim option
# install open gpg (I preffer the grafical client but comes with command line client) https://gpgtools.org/
# Install iterm 2 https://www.iterm2.com/
#install homebrew
/usr/bin/ruby -e "$(curl -fsSL https://raw.githubusercontent.com/Homebrew/install/master/install)"
# the basic shit
View gist:70b6d8f0c91fd98c570a72c99c38e387
require 'mail'
require 'thread'
require 'parallel'
require 'benchmark'
Mail.defaults do
delivery_method :smtp, options
end
View keybase.md

Keybase proof

I hereby claim:

  • I am kidpollo on github.
  • I am kidpollo (https://keybase.io/kidpollo) on keybase.
  • I have a public key ASD3Rhho5U14SMrLQ9gNilg9-YssXS9hiovYVCkqFw3aFwo

To claim this, I am signing this object:

View monty-hall.clj
(defn monty-hall
""
[]
(let [prize-idx (rand-int 3)
doors [false false false]
doors (assoc doors prize-idx true)
random-pick (rand-int 3)
monty-pick (first
(remove nil? (map-indexed
(fn [idx val]
View make-change.clj
(defn make-change [x coinset]
(loop [x x
change []]
(let [possible-coins (take-while #(when (>= x %) %) coinset)
current-coin (some #(when (zero? (rem x %)) %) possible-coins)]
(cond
(= x (reduce + possible-coins))
(concat possible-coins change)
(= x 0)
change
View core.clj
(ns sudoku-validator.core)
(defn is-valid-solution [grid]
(let [rows (partition-all 9 (map (comp read-string str) grid))
cols (apply map (comp seq vector) rows)
squares (map
flatten
(partition-all
3
(for [base (range 3)
View json-view-falcon.css
body {
background: #1B1B1B;
color: #BEBEBE;
white-space: pre;
font-family: "Inconsolata", monospace;
}
a {
color: #7BAFC2;
}
View francisco.clj
;;;; francisco.clj
(ns francisco
(require [francisco.pacemaker :as pacemaker]))
(atom current-state-of-being
{:alive true
:body-parts {:heart {:current-heart-rate (rand-int 100)}}})
(while (:alive current-state-of-being)
; ...
View gist:721ee1f8cc70a487a062
brew install -v brew-cask 2>&1
Error: wrong number of arguments (0 for 1..3)
Please report this bug:
https://github.com/Homebrew/homebrew/wiki/troubleshooting
/usr/local/Library/Homebrew/build_environment.rb:28:in `instance_eval'
/usr/local/Library/Homebrew/build_environment.rb:28:in `modify_build_environment'
/usr/local/Library/Homebrew/requirement.rb:55:in `modify_build_environment'
/usr/local/Library/Homebrew/dependency.rb:54:in `call'
/usr/local/Library/Homebrew/dependency.rb:54:in `modify_build_environment'
/usr/local/Library/Homebrew/build.rb:132:in `each'