Jens Bendisposto bendisposto

@jbendisposto@mastodontech.de

bendisposto / lösung_blatt3.clj

Created November 21, 2013 09:19

	;; Aufgabe 1

	(defn abs [x] (if (< x 0) (* -1 x) x))

	(defn newton [f f']
	(fn [guess eps]
	(let [guess' (- guess (/ (f guess) (f' guess)))]
	(if (< (abs (- guess' guess)) eps)
	guess
	(recur guess' eps)))))

bendisposto / vorlesung_14.11.clj

Created November 14, 2013 13:15

bendisposto / lösung_blatt2.clj

Last active December 28, 2015 07:19

	;; Aufgabe 1
	(defn succ [n [a b c]]
	(let [p (+ (* a 4) (* b 2) c)]
	(comp {true 1, false 0} bit-test) n p))

	(defn muster [c]
	(partition 3 1 (concat [(last c)] c [(first c)])))

	(defn line [n c]
	(map (partial succ n)

bendisposto / lösung_blatt1.clj

Created November 13, 2013 07:37

Lösungsvorschlag Blatt 1

	;; Aufgabe 1

	(range 100 -101 -1)
	(filter even? (range 0 1001))
	(take-while (fn [x] (< x 1001)) (map (fn [x] (* x x)) (iterate inc 0)))
	(for [n (range 1 1001)] [n (inc (* n n))])
	(let [x (range 10)]
	(for [a x b x c x :when (< a b c)] [a b c b a]))

	;; Aufgabe 2

bendisposto / core.clj

Created October 31, 2013 14:13

REPL Sitzung 31.10

	(ns repl.core
	(:use clojure.repl))

	(def ntype (fn [e] (.getSimpleName (type e))))

	(ntype "foo")
	(type "foo")

	(set! print-length 10)
	(iterate inc 0)

bendisposto / gist:7137800

Created October 24, 2013 13:57

Clojure Vorlesung, 24.10.2013

bendisposto / b.css

Last active December 19, 2015 07:29

B mode for Code Mirror

bendisposto / mandelbrotset

Created July 2, 2013 21:12

Requires Sedgewick's IO Libraries (http://introcs.cs.princeton.edu/java/stdlib/)

	(ns apple.core)

	(def colors [StdDraw/BLUE StdDraw/CYAN StdDraw/GREEN StdDraw/MAGENTA
	StdDraw/ORANGE StdDraw/PINK StdDraw/RED StdDraw/BLACK])

	(defn sqf [f x y] (f (* x x) (* y y)))

	(defn step-fn
	([[x y]] (step-fn x y x y 0))
	([x0 y0 x y n]

bendisposto / Editing Clojure with Emacs

Last active December 18, 2015 19:39 — forked from qtrfeast/Editing Clojure with Emacs

Check out README.md to get started editing Clojure with Emacs.

bendisposto / ParserUsage.java

Created July 18, 2012 16:47

A small example how to use the B-Parser

	import java.util.LinkedList;

	import de.be4.classicalb.core.parser.BParser;
	import de.be4.classicalb.core.parser.analysis.ASTPrinter;
	import de.be4.classicalb.core.parser.analysis.DepthFirstAdapter;
	import de.be4.classicalb.core.parser.exceptions.BException;
	import de.be4.classicalb.core.parser.node.AOperation;
	import de.be4.classicalb.core.parser.node.Start;
	import de.be4.classicalb.core.parser.node.TIdentifierLiteral;