Skip to content
Browse files

Expand the graph so it will be fullscreen at Clojure/Conj.

  • Loading branch information...
1 parent b202ef0 commit d363c7ef8a0177b9a496ba766f6690e46c5e01b2 @ctford committed Nov 8, 2012
Showing with 7 additions and 6 deletions.
  1. +7 −6 src/goldberg/variations/canone_alla_quarta.clj
View
13 src/goldberg/variations/canone_alla_quarta.clj
@@ -263,11 +263,12 @@
(comp (interval -3) mirror (simple 3))
notes))
-;(->> melody
-; canone-alla-quarta
-; (concat bass)
-; (where :pitch (comp G major))
-; (where :time (bpm 90))
+(->> melody
+ canone-alla-quarta
+ (concat bass)
+ (where :pitch (comp G major))
+ (where :time (bpm 90))
+ graph!)
; play!)
@@ -311,5 +312,5 @@
(* (width) x)
(- (* 2/3 (height)) (* 1/3 (height) y))
10 10))))
- :size [800 600])
+ :size [1024 768])
notes))

0 comments on commit d363c7e

Please sign in to comment.
Something went wrong with that request. Please try again.