Mercurial > lasercutter

comparison src/clojureDemo/Defines.clj @ 1:6d9bdaf919f7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
added clojureDemo source
author Robert McIntyre <rlm@mit.edu>
date Fri, 20 Aug 2010 00:32:44 -0400
parents
children
comparison
equal deleted inserted replaced
0:163bf9b2fd13 1:6d9bdaf919f7
1 (ns clojureDemo.Defines)
2
3 (import '(java.io File))
4
5 (def -inf Double/NEGATIVE_INFINITY)
6 (def inf Double/POSITIVE_INFINITY)
7
8
9 (def lian (File. "/home/r/Desktop/source-videos/lian1.mpeg"))
10 (def look (File. "/home/r/Desktop/source-videos/dramatic_look.flv"))
11 (def getto(File. "/home/r/Desktop/source-videos/Ghetto.flv"))
12 (def human0(File. "/home/r/Desktop/source-videos/vsr1/human0.avi"))
13 (def blow (File. "/home/r/Desktop/source-videos/blow.avi"))
14
15 (def base (File. "/home/r/Desktop/source-videos/"))
16
17 (def app0 (File. base "approach0v2.avi"))
18 (def app1 (File. base "approach1v3.avi"))
19 (def app2 (File. base "approach0v3.avi"))
20 (def app3 (File. base "approach2v2.avi"))
21 (def app4 (File. base "approach1v2.avi"))
22 (def app5 (File. base "approach2v3.avi"))
23
24 (def bounce0 (File. base "bounce0v2.avi"))
25 (def bounce1 (File. base "bounce1v3.avi"))
26 (def bounce2 (File. base "bounce3v2.avi"))
27 (def bounce3 (File. base "bounce0v3.avi"))
28 (def bounce4 (File. base "bounce2v2.avi"))
29 (def bounce5 (File. base "bounce1v2.avi"))
30 (def bounce6 (File. base "bounce2v3.avi"))
31
32 (def collide0 (File. base "collide0v3.avi"))
33 (def collide1 (File. base "collide2v3.avi"))
34 (def collide2 (File. base "collide1v2.avi"))
35 (def collide3 (File. base "collide0v2.avi"))
36 (def collide4 (File. base "collide1v3.avi"))
37
38 (def give0 (File. base "give0v3.avi"))
39 (def give1 (File. base "give2v3.avi"))
40 (def give2 (File. base "give1v2.avi"))
41 (def give3 (File. base "give0v2.avi"))
42 (def give4 (File. base "give1v3.avi"))
43
44
45 (def target (File. "/home/r/Desktop/output-vision/"))
46 (def default(File. target "default.avi"))