I hereby claim:
- I am rahcola on github.
- I am rahcola (https://keybase.io/rahcola) on keybase.
- I have a public key whose fingerprint is 976E 796E 97C0 6370 903F FAD1 9C06 91C9 237B 9137
To claim this, I am signing this object:
[package] | |
name = "noober" | |
version = "0.0.1" | |
authors = ["Jani Rahkola <jani.rahkola@iki.fi>"] | |
[[bin]] | |
name = "noober" | |
[dependencies] | |
rustc-serialize = "0.1.0" |
{-# LANGUAGE FlexibleInstances, MultiParamTypeClasses #-} | |
import Control.Applicative | |
import Control.Monad | |
import qualified Control.Monad.Random as R | |
import qualified Control.Monad.State as S | |
import qualified Control.Monad.Trans.Either as E | |
newtype Fuzzer s a = Fuzzer { | |
runFuzzer :: E.EitherT () (S.StateT s (R.Rand R.StdGen)) a |
I hereby claim:
To claim this, I am signing this object:
data ResourceId a = ResourceId Integer | |
data Image | |
data User | |
data Authorized a b = Authorized (ResourceId a) | |
data Create | |
data Read | |
data Update | |
data Delete | |
# i3status configuration file. | |
# see "man i3status" for documentation. | |
# It is important that this file is edited as UTF-8. | |
# The following line should contain a sharp s: | |
# ß | |
# If the above line is not correctly displayed, fix your editor first! | |
general { | |
output_format = "i3bar" |
function init() { | |
naytaLuku("0"); | |
/*eka näytä nolla */ | |
var nappula = document.getElementById("nappi"); | |
var laskin = new Laskin(); | |
/* on nyt tosi rumasti tehty, mutta en keksinyt parempaakaan | |
* eli siis en päässyt tuolta hanskaaHomma-funktiosta | |
* käsiksi laskimeen, yritin vaikka mitä esim. antaa sen olion | |
* tolle hanskaaHommalle parametrina, mutta ei jostain | |
* syystä toiminut. Terkuin 4 tuntia myöhemmin päätin muuttaa |
/*THIS IS PSEUDO*/ | |
divResult mod_div_polynomials(int mod, | |
termNode* p, | |
termNode* q) { | |
termNode* r = p; | |
termNode* s = NULL; | |
int b_inverse = ...; | |
for (int i = p->deg - q->deg; i >= 0; i--) { | |
if (r->deg == q->deg + i) { |
typedef struct termNode { | |
int coef; | |
int deg; | |
struct termNode* greater; | |
struct termNode* lesser; | |
} termNode; | |
termNode* make_term(int coef, int deg) { | |
termNode* p = malloc(sizeof(termNode)); | |
p->coef = coef; |
(ns kineticc.behaviors | |
(:refer-clojure :exclude [delay loop]) | |
(:require [kineticc.epochal :as e]) | |
(:require [kineticc.operators :as o]) | |
(:require [clojure.data.json :as j])) | |
(defn remove-nil-vals | |
"Filter key-val pair in which val is nil." | |
[map] | |
(into {} (remove (comp nil? second) map))) |
hFetchLines :: Handle -> [Int] -> IO [String] | |
hFetchLines h nums = do; end <- hIsEOF h; hFetchLines' nums end 1 [] | |
where | |
hFetchLines' [] _ _ acc = return acc | |
hFetchLines' _ False _ acc = return acc | |
hFetchLines' nums _ row acc = do | |
line <- hGetLine h | |
end <- hIsEOF h | |
if (head nums) == row | |
then hFetchLines' (tail nums) end (row+1) (line:acc) |