Skip to content

Instantly share code, notes, and snippets.

@msszczep
msszczep / subanagram.py
Created Sep 16, 2016
Subanagram Generator in Python, v1
View subanagram.py
#!/usr/bin/python
# subanagram.py
# This program receives as input an English word, and then
# delivers as output those English words which can be spelled with the
# letters in the input word.
# This script is Copyleft 2002, 2012 by Mitchell Szczepanczyk under the
# terms of the General Public License. Anyone is free to copy, modify,
@msszczep
msszczep / HexColorExplorer.elm
Created Feb 26, 2020
Hexadecimal Color Explorer
View HexColorExplorer.elm
import Browser
import Html exposing (Html, Attribute, div, input, text, button, p, h1)
import Html.Attributes exposing (placeholder, style, value)
import Html.Events exposing (onInput, onClick)
-- MODEL
type alias Model =
{ field : String
, color : String
@msszczep
msszczep / time.elm
Created Nov 24, 2019
Improved Time in Elm
View time.elm
-- Show the current time in your time zone.
--
-- Read how it works:
-- https://guide.elm-lang.org/effects/time.html
--
-- For an analog clock, check out this SVG example:
-- https://elm-lang.org/examples/clock
--
import Browser
@msszczep
msszczep / redis_cheatsheet_notes.txt
Created May 16, 2019
Quick cheatsheet notes on redis
View redis_cheatsheet_notes.txt
heroku redis:cli -a [APP]
dbsize
keys *
get [KEY]
@msszczep
msszczep / subanagram_sorted_points.erl
Created Apr 13, 2019
Subanagram script in Erlang (from May 11, 2008)
View subanagram_sorted_points.erl
#!/usr/bin/env escript
% This is an Erlang version of the subanagram generator.
% It works far faster and the code is far shorter.
% It takes a word at the command line as an argument.
% e.g.: `./subanagram_prototype.erl representative`
% It delivers as output the words that are eligible subanagrams, ordered in length from shortest to longest,
% along with the number of points from each word, assuming no double or triple letter or word squares.
@msszczep
msszczep / subanagram_prototype.erl
Created Apr 13, 2019
Subanagram prototype in Erlang (dated May 3, 2008)
View subanagram_prototype.erl
#!/usr/bin/env escript
% This is an Erlang version of the subanagram generator.
% It works far faster and the code is far shorter.
% It takes a word at the command line as an argument.
% e.g.: `./subanagram_prototype.erl representative`
% Note: You need a file of words, one word per line, in the same directory as
% the script.
@msszczep
msszczep / gist:a77c9361b9dfff6f8f57bf772ef5c2a4
Created Jul 28, 2016
Python script to filter "memorable" words from MRC Psycholinguistic Database
View gist:a77c9361b9dfff6f8f57bf772ef5c2a4
from itertools import product
final_answer = set()
for a in open('mrc2.dct'):
cols = a.split(' ', 1)
b = list(cols[0])
c = int(b[28] + b[29] + b[30]) # concreteness rating
i = int(b[31] + b[32] + b[33]) # imagery rating
f = int(b[25] + b[26] + b[27]) # familiarity rating
@msszczep
msszczep / gist:9ad519c9a3000eff58c8c533f80c85f2
Last active Jul 30, 2018
Are You Polish? (in Clojure)
View gist:9ad519c9a3000eff58c8c533f80c85f2
; https://gist.github.com/Youenn-Bouglouan/02cd3ac6fd0130cc48b207eec6049af6
;
; http://www.ybouglouan.pl/2017/03/are-you-polish-fharp-will-tell-us-probably/
(defn are-you-polish? [surname]
(letfn [(score-polish-characters
[surname]
(->> (re-seq #"[ąćęłńóśżź]" surname)
count))
@msszczep
msszczep / get-json-data.clj
Created Jun 26, 2018
Get JSON Data via InLein script
View get-json-data.clj
'{:dependencies [[org.clojure/clojure "1.8.0"]
[cheshire "5.8.0"]]}
(require '[cheshire.core :as json])
(def j (cheshire.core/parse-string (slurp "j.json") true))
(def file-names (->> j
:definitions
(map (comp last #(clojure.string/split #"\.") :file))
@msszczep
msszczep / wqc.clj
Last active Jun 2, 2018
WQC Score Calculator
View wqc.clj
; #wqc #clojure
; For the World Quizzing Championships
; http://www.worldquizzingchampionships.com/
(def sample-scores
[["joshua Kreitzer" 1 2 3 4 5 6 7 8]
["Sreeradh RP" 9 10 11 12 13 14 15]
["david striasny" 3 8 8 7 20 4 14 11]])
(defn get-wqc-scores [s]