coyotebush

#!/usr/bin/python

"""
Merge bank transaction fees into the main transaction in GnuCash.

This script searches a given account for "fee" transactions with a certain
description. It then tries to find the corresponding "real" transaction, adds
the fee amount to the real transaction, and deletes the fee transaction.

Assumptions: "fee" transactions come (not necessarily consecutively) after

coyotebush

#include <stdio.h>

int main() {
  int D, n1, n2;
  scanf("%d", &D);
  for (n1 = 0; n1 < D; n1++)
    for (n2 = 0; n2 < n1; n2++)
      if ((n1 + n2) * (n1 - n2) == D) {
        printf("%d %d\n", n2, n1);
        return 0;

coyotebush

#!/usr/bin/env python
import struct
import sys
import binascii

# def str2bytes(string):
#     return "".join("\\x" + "{0:02x}".format(ord(x)) for x in string)

def compare(bs, ks, tag=None):
    if bs != ks:

coyotebush

\documentclass[14pt]{beamer}

\usepackage{lmodern}
\usepackage{textcomp}
\usepackage{moresize}

\usetheme{Berkeley}
\beamertemplatenavigationsymbolsempty

\renewcommand{\arraystretch}{1.2}

coyotebush

Keybase proof

I hereby claim:

• I am coyotebush on github.
• I am coyotebush (https://keybase.io/coyotebush) on keybase.
• I have a public key whose fingerprint is 8AE8 3D54 29C7 2B78 54C0 A274 F745 EA21 9F68 D026

To claim this, I am signing this object:

coyotebush

(define-syntax (sdo stx)
  (syntax-case stx (in-list)
    [(sdo ([name <- comp] ...) final)
     (foldr (lambda (n c next) #`(bind #,c (lambda (#,n) #,next)))
            #'final
            (syntax->list #'(name ...))
            (syntax->list #'(comp ...)))]))

coyotebush

{-# LANGUAGE ExistentialQuantification, ImpredicativeTypes, MultiParamTypeClasses, FlexibleInstances #-}
module Topics (topics) where

import XMonad
import XMonad.StackSet
import XMonad.Layout.Grid
import XMonad.Layout.PerWorkspace
import XMonad.Layout.Tabbed

data LayoutBox a = forall l. LayoutClass l a => LB (l a)

coyotebush

// Include in your project:
// https://developer.mbed.org/teams/ublox/code/C027_Support/
// plus, ONLY when compiling without CELLULAR_NETWORK:
// https://developer.mbed.org/users/mbed_official/code/EthernetInterface/
// https://developer.mbed.org/users/mbed_official/code/mbed-rtos/
#include "mbed.h"

// ...

#define CELLULAR_NETWORK 1

coyotebush

import Data.List
import qualified Data.Map as Map

type WordMap = Map.Map String [Int]

wordsByLine _ [] = Map.empty
wordsByLine n (s:ss) = Map.unionWith (++) (Map.fromList [(w, [n]) | w <- nub $ words s])
                       (wordsByLine (n + 1) ss)

printWords = mapM_ (putStrLn . formatWord) . Map.toList

coyotebush

#include <stdio.h>
#include <unistd.h>
#include <stdlib.h>

int main () {
   printf("1: %s\n", getenv("PWD"));
   setenv("PWD", "/etc", 1);
   printf("2: %s\n", getenv("PWD"));
   execl("/usr/bin/printenv", "/usr/bin/printenv", "PWD", NULL);
}