Skip to content

Instantly share code, notes, and snippets.

Martin Owen mowen

Block or report user

Report or block mowen

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
View gist:291247
(eval-after-load 'org
(set-face-foreground 'org-level-2 "magenta4")
(set-face-foreground 'outline-2 "magenta4")
(set-face-foreground 'org-level-6 "red3")
(set-face-foreground 'outline-6 "red3")))
View euler4.el
;; A palindromic number reads the same both ways. The largest palindrome made
;; from the product of two 2-digit numbers is 9009 = 91 × 99.
;; Find the largest palindrome made from the product of two 3-digit numbers.
(defun array-reverse (array)
"Reverse the ARRAY."
(let ((reversed-array (copy-sequence array))
(array-length (length array))
View SiteFocus.js
* SiteFocus, an enhanced version of the Blacklist Sites - Page Mods Demo.
* Recommended for anyone who has this problem:
* Martin Owen -
function SiteFocus() {
View euler-6.clj
(ns martin)
(defn sqr
"Square the given number."
(. (BigInteger/valueOf n) (pow 2)))
(defn euler-6
"Find the difference between the sum of the squares of the first one hundred
natural numbers and the square of the sum."
View euler-5.clj
(ns martin)
(defn evenly-divisible?
"Is N evenly-divisible by all of the numbers in SEQ?"
[n seq]
(loop [s seq]
;; TODO: Find out how to do 'cond' in Clojure
(if (empty? s)
(if (not (zero? (mod n (first s))))
View footer.php
View BadService.cs
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace Experiments
public class BadService : IService
public string ProvideService()
View DynamicUtils.cs
// Method for converting a Json.NET object into a dynamic CLR object.
public static class DynamicUtils
public static object ConvertJTokenToObject(JToken token)
if (token is JValue)
return ((JValue)token).Value;
View gist:1175335
(defvar mo-script-url-alist
'((jquery . "")
(json2 . "")
(ocanvas . "")
(processing . "")
(prototype . "")
(sizzle . "")
(underscore . "")
(underscore-string . "")
(waypoints . ""))
mowen / index.html
Created Sep 3, 2011
Control a tank in HTML5 Canvas
View index.html
<!doctype html>
<html lang="en">
<meta charset="UTF-8" />
<title>Chapter 4 Example 9: Animating an image with rotation</title>
<script src=""></script>
<script src=""></script>
<script src="ex9.js"></script>
You can’t perform that action at this time.