mwfogleman

{:starting-team :red,
 :current-team :red,
 :remaining {:red 9, :blue 8},
 :winning-team nil,
 :id "G__97824",
 :round 0,
 :words
 '({:word "STRAW", :identity :red, :revealed? false, :position [1 2]}
  {:word "SCORPION", :identity :red, :revealed? false, :position [3 0]}
  {:word "DRILL", :identity :red, :revealed? false, :position [2 2]}

mwfogleman

{:people ;; first primary key
 {:dave
  {:name "Dave Smith"
   :hobbies #{:baseball}}} ;; this is a nested set of keywords which are in the hobbies part of the database
 :hobbies ;; second primary key
 {:baseball
  {:name "Play Baseball"
   :instructions "Get a baseball, baseball bat, and gloves; gather some friends; and go to a baseball field."}}}

mwfogleman

#<Atom@65413b0a: 
{:starting-team :blue,
 :current-team :blue,
 :winning-team nil,
 :id "G__739",
 :created-at
 #object[org.joda.time.DateTime 0x54b2a516 "2017-06-04T01:05:32.915Z"],
 :round 0,
 :words
 ({:word "GREECE", :identity :blue, :revealed? false}

mwfogleman

Weekly Review

Get Clear [0/5]

• [ ] Collect Loose Papers and Materials
• [ ] Get “IN” to Zero
  • [ ] Papers
  • [ ] Physical Notebook
  • [ ] Physical Objects
  • [ ] Text Messages
  • [ ] Voice Mail
  • [ ] Email Inboxes

mwfogleman

Keybase proof

I hereby claim:

• I am mwfogleman on github.
• I am mwfogleman (https://keybase.io/mwfogleman) on keybase.
• I have a public key ASAzj5bCoksTYGXxRsc2Tv22cxobyRQwVvkAY0ma6QnFqQo

To claim this, I am signing this object:

mwfogleman

// solution to https://tour.golang.org/methods/7

package main

import "fmt"

type IPAddr [4]byte

func (i IPAddr) String() string {
	return fmt.Sprintf("%d.%d.%d.%d", i[0], i[1], i[2], i[3])

mwfogleman

(dolist (hook '(mode1-mode-hook mode2-mode-hook mode3-mode-hook))
    (add-hook hook #'something-mode))

mwfogleman

(facts "about aggressive-indent"
       (fact "this is a different fact"
                  "I have my own things going on")
       (fact "this function has a trailing parens"
             )) ;; if you do a hungry ctrl-d (:D) on the previous line, everything in the "facts" tests will indent.
             ;; ideally it'd just indent the local "defun", in this case, the local fact

mwfogleman

(def vowels "aeiouyAEIOUY")
(def consonants "bcdfghjklmnpqrstvwxzBCDFGHJKLMNPQRSTVWXZ")

(defn alph-filter [sub srn] (clojure.string/capitalize (apply str (remove (set sub) srn))))

(defn self-alph-filter [sub srn] (alph-filter sub (concat "This " srn)))

(def init-one "sentence contains no consonants and the following sentence no vowels.")
(def init-two "sentence contains no vowels and the preceding sentence no consonants.")

mwfogleman

(defn anagram?
  [s1 s2]
  (let [c1 (clojure.string/lower-case s1)
        c2 (clojure.string/lower-case s2)]
    (and (= (count c1) (count c2))
         (= (set c1) (set c2)))))

(anagram? "Mathematical Games" "Metamagical Themas")
; => true