borkdude

f(0) = 0
f x, voor x > 0, als even x   = -x + 1
               , als oneven x = x + 1
   , voor x < 0, als even x   = -x - 1
               , als oneven x = x - 1

borkdude

* Mirjam en Mozes
Mirjam speelt een belangrijke rol rondom de wording van Mozes.
Maria speelt een rol rondom de wording van de nieuwe Mozes: Jezus Chris­tus.
Mozes is een unieke figuur. Zijn naam betekent: hij die uit het water trekt. Mozes heeft een volk uit het water getrokken.
Jezus Christus, de nieuwe Mozes, trekt ook een volk uit het water. Je­zus is de nieuwe uittrekker. Hij trekt een volk uit de zee, uit de diep­te, uit de vloed.
Mozes moest als kind eerst zelf door het water heen. En ook Jezus moest door de doodswateren heen.

borkdude

(ns twitter-utils.test.core
  (:use [twitter-utils.core]
        [midje.sweet]
        [twitter.oauth :only [make-oauth-creds]]
        [twitter.callbacks]
        [twitter.callbacks.handlers]
        [twitter.api.restful :only [show-followers
                                show-friends
                                lookup-users
                                    def-twitter-restful-method]])

borkdude

(defn followers-minus-friends [screenname]
  (let [difference-ids (difference (idset show-followers screenname)
                                   (idset show-friends screenname))
        x (swank.core/break)
        userinfos (userinfos difference-ids)]
    (map :screen_name userinfos)))

;; test:

(fact (followers-minus-friends ...name...) => ["Dude"]

borkdude

Debugger entered--Lisp error: (end-of-file)
  byte-code("\302\300\"\210\303	\304\"\210\300\305\"\207" [error process debug slime-net-close t "net-read error: %S"] 3)
  slime-net-read-or-lose(#<process SLIME Lisp>)
  slime-process-available-input(#<process SLIME Lisp>)
  slime-net-filter(#<process SLIME Lisp> #("bey. abdijvanegmond in Holland and seminarist at the Tiltenberg.\\\", :profile_text_color \\\"333333\\\", :screen_name \\\"broedersteve\\\"} {:profile_use_background_image true, :follow_request_sent nil, :default_profile true, :profile_sidebar_fill_color \\\"DDEEF6\\\", :protected true, :following nil, :profile_background_image_url \\\"http://a0.twimg.com/images/themes/theme1/bg.png\\\", :default_profile_image false, :contributors_enabled false, :favourites_count 0, :time_zone \\\"Amsterdam\\\", :name \\\"Ilse\\\", :id_str \\\"273495874\\\", :listed_count 2, :utc_offset 3600, :profile_link_color \\\"0084B4\\\", :profile_background_tile false, :location \\\"Amsterdam\\\", :statuses_count 250, :followe

borkdude

macbookair-michiel:twitter-utils Borkdude$ git checkout experimental
Switched to branch 'experimental'
macbookair-michiel:twitter-utils Borkdude$ git merge master
Updating 489c105..bb21b70
Fast-forward
 README                           |   10 +++++++---
 test/twitter_utils/test/core.clj |    8 ++++----
 2 files changed, 11 insertions(+), 7 deletions(-)

borkdude

(enlive/deftemplate usernames-table-body
  "public/index.html"
  [usernames]
  [:tbody#tablebody :tr]
  (enlive/clone-for [username usernames]
                    [:td]
                    (enlive/content username)))

;; calling it with usernames: ["Michiel","Borkent"]

borkdude

(enlive/deftemplate welcome-page
  "public/index.html"
  []
  [:table#names]
  (enlive/substitute (fn [tbl] nil)))

borkdude

(defun eval-sexp-comment-result ()
  (interactive)
  (save-excursion
    (slime-eval-print-last-expression (slime-last-expression)))
  (newline)
  (insert ";=> "))

borkdude

mr1.mr1=> (union #{1 2 3} #{4 5 6})
CompilerException java.lang.RuntimeException: Unable to resolve symbol: union in this context, compiling:(NO_SOURCE_PATH:3) 
mr1.mr1=> (clojure.set/union #{1 2 3} #{4 5 6})
ClassNotFoundException clojure.set  java.net.URLClassLoader$1.run (URLClassLoader.java:202)
mr1.mr1=> (require 'clojure.set)
nil
mr1.mr1=> (clojure.set/union #{1 2 3} #{4 5 6})
#{1 2 3 4 5 6}
mr1.mr1=> (require '[clojure.set :as set])
nil