Mercurial > lasercutter

     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"))
author	Robert McIntyre <rlm@mit.edu>
date	Fri, 20 Aug 2010 00:32:44 -0400
parents
children