Skip to content

Instantly share code, notes, and snippets.

View ggb's full-sized avatar

Gregor ggb

9 followers · 4 following
  • Kiel
View GitHub Profile
@ggb
ggb / nim-dea.py
Created October 14, 2019 10:40
Script to create a game graph for 3x3 Nim
import networkx as nx
import matplotlib.pyplot as plt
import itertools
l = list(range(4))
lists = [l, l, l]
result = []
for element in itertools.product(*lists):
l = list(element)
@ggb
ggb / Philosophie.ipynb
Last active March 12, 2018 19:17
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
@ggb
ggb / band_paths.pl
Last active April 23, 2017 12:24
:- use_module(library(semweb/rdf_db)).
:- use_module(library(semweb/rdf_http_plugin)).
load_band(A, S) :-
rdf_load(A, [format(xml)]),
findall(B, (rdf(A,'http://dbpedia.org/ontology/associatedBand',B)), L1),
findall(C, (rdf(C,'http://dbpedia.org/ontology/associatedBand',A)), L2),
append(L1, L2, S).
load_bands(_, _, _, 500) :-
@ggb
ggb / frequency.erl
Created April 8, 2017 16:35
%% Based on code from
%% Erlang Programming
%% Francecso Cesarini and Simon Thompson
%% O'Reilly, 2008
%% http://oreilly.com/catalog/9780596518189/
%% http://www.erlangprogramming.org/
%% (c) Francesco Cesarini and Simon Thompson
-module(frequency).
-export([start/0,allocate/0,deallocate/1,stop/0,clear/0]).
@ggb
ggb / DecodeUnionType.elm
Created March 29, 2017 12:04
How to decode union types in Elm
import Html exposing (text)
import Json.Decode exposing (..)
type Status
= Done
| Open
| Failed
@ggb
ggb / sicp44.dl
Created March 21, 2017 21:00
Database and solutions from "Structure and Interpretation of Computer Programs", Chapter 4.4
#lang datalog
town(ben, slumerville).
street(ben, ridge_road).
str_number(ben, 10).
department(ben, computer).
position(ben, guru).
salary(ben, 60000).
town(alyssa, cambridge).
@ggb
ggb / assignment2.erl
Created March 1, 2017 20:28
Functional Programming in Erlang - Second Assignment
-module(assignment2).
-export([index/1]).
% test the code by calling
% assignment2:index("gettysburg-address.txt").
% assignment2:index("dickens-christmas.txt").
clean_line([], C) ->
lists:reverse(C);
@ggb
ggb / assignment1.erl
Created February 27, 2017 13:21
Functional Programming in Erlang - First Assignment
-module(assignment1).
-export([bits/1, area/1, perimeter/1, enclose/1, bits_rec/1]).
% Shapes
% How the shapes are defined:
% circle: {circle, {x, y}, r}
% rectangle: {rectangle, {x1, y1},{x2, y2}}
% triangle: {triangle, {x1, y1}, A, B, C}
area({circle, {_X, _Y}, R}) ->
@ggb
ggb / Table.html
Last active February 5, 2017 13:01
Endless scrolling table...
<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="utf-8">
<title>lazy table</title>
<link rel="stylesheet" href="style.css">
<script src="https://cdnjs.cloudflare.com/ajax/libs/underscore.js/1.8.3/underscore-min.js"></script>
</head>
<body>
<table id="lazyTable"></table>
@ggb
ggb / sw_query.rkt
Created October 9, 2016 21:03
How to query the SWAPI (Star Wars API) with racket
#lang racket
(require json)
(require net/url)
(define (get url)
(call/input-url (string->url url)
(curry get-pure-port #:redirections 4)
port->string))