Skip to content

Commit

Permalink
Added :require stmts for getting stuff from core.
Browse files Browse the repository at this point in the history
  • Loading branch information
rjray committed Jan 22, 2016
1 parent e26b724 commit d523c80
Show file tree
Hide file tree
Showing 16 changed files with 31 additions and 17 deletions.
3 changes: 0 additions & 3 deletions src/projecteuler/core.clj
Expand Up @@ -48,6 +48,3 @@

(defn is-prime? [n]
(= n (first (drop-while #(< % n) primes))))

(defn pow' [a]
(reduce *' (repeat a a)))
3 changes: 2 additions & 1 deletion src/projecteuler/p002.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [fib-seq]]))

;; https://projecteuler.net/problem=2

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p004.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [is-palindrome-num?]]))

;; https://projecteuler.net/problem=4

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p007.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [prime?]]))

;; https://projecteuler.net/problem=7

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p008.clj
@@ -1,5 +1,6 @@
(ns projecteuler.core
(:require [clojure.string :as str])
(:require [projecteuler.core :refer [num-map]]
[clojure.string :as str])

;; https://projecteuler.net/problem=8

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p010.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [prime?]]))

;; https://projecteuler.net/problem=10

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p012.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [primes triangular-numbers]]))

;; https://projecteuler.net/problem=12

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p016.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [num-map]]))

;; https://projecteuler.net/problem=16

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p020.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [! num-map]]))

;; https://projecteuler.net/problem=20

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p022.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [word-score]]))

;; https://projecteuler.net/problem=22

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p025.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [fib-seq]]))

;; https://projecteuler.net/problem=25

Expand Down
4 changes: 3 additions & 1 deletion src/projecteuler/p027.clj
@@ -1,4 +1,6 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [is-prime?]])
)

;; https://projecteuler.net/problem=27

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p030.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [num-map]]))

;; https://projecteuler.net/problem=30

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p036.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [is-palindrome-num?]]))

;; https://projecteuler.net/problem=36

Expand Down
3 changes: 2 additions & 1 deletion src/projecteuler/p042.clj
@@ -1,4 +1,5 @@
(ns projecteuler.core)
(ns projecteuler.core
(:require [projecteuler.core :refer [word-score triangular-numbers]]))

;; https://projecteuler.net/problem=42

Expand Down
2 changes: 2 additions & 0 deletions src/projecteuler/p048.clj
Expand Up @@ -2,6 +2,8 @@

;; https://projecteuler.net/problem=48

(defn pow' [a]
(reduce *' (repeat a a)))
(defn self-powers [& [max]]
(let [max (or max 1000)]
(apply str
Expand Down

0 comments on commit d523c80

Please sign in to comment.