Last active
August 29, 2015 14:15
-
-
Save LNA/0c42d8a1c8bdca4fc76f to your computer and use it in GitHub Desktop.
Changes with Petrograph
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{"assignments":[{"slug":"robot-name","track":"clojure","files":{"robot.clj":"(ns robot)\r\n\r\n(def num-letters 26)\r\n\r\n(def name-seed\r\n (atom [0 0]))\r\n\r\n(defn- inc-name-seed\r\n []\r\n (swap! name-seed\r\n (fn [[letter number]]\r\n (if (\u003e= number 999)\r\n [(inc letter) 0]\r\n [letter (inc number)]))))\r\n\r\n(defn- letter-at\r\n [n]\r\n (char (+ n (int \\A))))\r\n\r\n(defn- generate-name\r\n []\r\n (let [[letter number] @name-seed\r\n result (str (letter-at (quot number num-letters))\r\n (letter-at (mod number num-letters))\r\n (format \"%03d\" number))]\r\n (inc-name-seed)\r\n result))\r\n\r\n(defn robot\r\n []\r\n (atom (generate-name)))\r\n\r\n(defn robot-name\r\n [robot]\r\n @robot)\r\n\r\n(defn reset-name\r\n [robot]\r\n (reset! robot (generate-name)))\r"}},{"slug":"scrabble-score","track":"go","files":{"scrabble_score.go":"package scrabble_score\n\nimport \"unicode\"\n\nvar scores = map[rune]int{\n 'A': 1, 'E': 1, 'I': 1, 'O': 1, 'U': 1, 'L': 1, 'N': 1, 'R': 1, 'S': 1, 'T': 1,\n 'D': 2, 'G': 2,\n 'B': 3, 'C': 3, 'M': 3, 'P': 3,\n 'F': 4, 'H': 4, 'V': 4, 'W': 4, 'Y': 4,\n 'K': 5,\n 'J': 8, 'X': 8,\n 'Q': 10, 'Z': 10,\n}\n\nfunc Score(word string) (res int) {\n for _, c := range word {\n res += scores[unicode.ToUpper(c)]\n }\n return\n}"}}]} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{"assignments":[{"slug":"robot-name","track":"clojure","files":{"robot.clj":"(ns robot)\r\n\r\n(def num-letters 26)\r\n\r\n(def name-seed\r\n (atom [0 0]))\r\n\r\n(defn- inc-name-seed\r\n []\r\n (swap! name-seed\r\n (fn [[letter number]]\r\n (if (\u003e= number 999)\r\n [(inc letter) 0]\r\n [letter (inc number)]))))\r\n\r\n(defn- letter-at\r\n [n]\r\n (char (+ n (int \\A))))\r\n\r\n(defn- generate-name\r\n []\r\n (let [[letter number] @name-seed\r\n result (str (letter-at (quot number num-letters))\r\n (letter-at (mod number num-letters))\r\n (format \"%03d\" number))]\r\n (inc-name-seed)\r\n result))\r\n\r\n(defn robot\r\n []\r\n (atom (generate-name)))\r\n\r\n(defn robot-name\r\n [robot]\r\n @robot)\r\n\r\n(defn reset-name\r\n [robot]\r\n (reset! robot (generate-name)))\r"}},{"slug":"scrabble-score","track":"go","files":{"scrabble_score.go":"package scrabble_score\n\nimport \"unicode\"\n\nvar scores = map[rune]int{\n 'A': 1, 'E': 1, 'I': 1, 'O': 1, 'U': 1, 'L': 1, 'N': 1, 'R': 1, 'S': 1, 'T': 1,\n 'D': 2, 'G': 2,\n 'B': 3, 'C': 3, 'M': 3, 'P': 3,\n 'F': 4, 'H': 4, 'V': 4, 'W': 4, 'Y': 4,\n 'K': 5,\n 'J': 8, 'X': 8,\n 'Q': 10, 'Z': 10,\n}\n\nfunc Score(word string) (res int) {\n for _, c := range word {\n res += scores[unicode.ToUpper(c)]\n }\n return\n}"}}]} |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment