1
2
3
4
(println (+ 1 2))
(defn f [n] (if (= n 0) 1 (* n (f (- n 1)))))
 
(println (f 5))

1
(println (+ 1 2))

1
(System.out.println (+ 1 2))

1
(java/lang/System.out.println (+ 1 2))

1
(System/out/println (+ 1 2))

1
(+ 1 2)

1
2
3
4
5
6
7
8
9
(defn bottles [n & [capitalize]]
  (str (if (> n 0) n (if capitalize "No more" "no more"))
    " bottle" (if (= 1 n) "" "s") " of beer" ))
 
(defn bot-wall [n & cap] (str (bottles n cap) " on the wall"))
 
(defn sing
  ;  Default is 99 times.
  ([]  (sing 99))
 ...

1
2
3
(def fib (lazy-cat [0 1] (map + fib (rest fib))))
 
(println (take 10 fib))

1
2
(+ 7 7)
 

1
()

1
(println "a")

1
2
3
4
5
6
7
8
9
(defn bottles [n & [capitalize]]
  (str (if (> n 0) n (if capitalize "No more" "no more"))
    " bottle" (if (= 1 n) "" "s") " of beer" ))
 
(defn bot-wall [n & cap] (str (bottles n cap) " on the wall"))
 
(defn sing
  ;  Default is 99 times.
  ([]  (sing 99))
 ...

1
2
3
4
5
6
7
8
9
(defn bottles [n & [capitalize]]
  (str (if (> n 0) n (if capitalize "No more" "no more"))
    " bottle" (if (= 1 n) "" "s") " of beer" ))
 
(defn bot-wall [n & cap] (str (bottles n cap) " on the wall"))
 
(defn sing
  ;  Default is 99 times.
  ([]  (sing 99))
 ...

1
(+ 1 2)

1
2
(defn sq [n] (* n n))
(sq 2)

1
(println 'hello world')

1
(+ 3 5)

1
2
(defn aaa [a, b] (+ a b))
(aaa 3 5)

1
2
3
(defn a [b c] (b c))
 
(print (a (fn [x] (inc x)) 1))

1
2
3
(defn a [b c] (b c))
 
(a (fn [x] (inc x)) 1) 

1
2
3
(def a [b c] (b c))
 
(a (fn [x] (inc x)) 1) 

1
2
3
4
5
6
7
8
9
(defn bottles [n & [capitalize]]
  (str (if (> n 0) n (if capitalize "No more" "no more"))
    " bottle" (if (= 1 n) "" "s") " of beer" ))
 
(defn bot-wall [n & cap] (str (bottles n cap) " on the wall"))
 
(defn sing
  ;  Default is 99 times.
  ([]  (sing 99))
 ...

1
2
3
4
5
6
7
8
9
(defn bottles [n & [capitalize]]
  (str (if (> n 0) n (if capitalize "No more" "no more"))
    " bottle" (if (= 1 n) "" "s") " of beer" ))
 
(defn bot-wall [n & cap] (str (bottles n cap) " on the wall"))
 
(defn sing
  ;  Default is 99 times.
  ([]  (sing 99))
 ...

1
2
3
4
5
(defn square
        [x] (*x x ))
        
        (square 5)
        

1
(println "lolusuck")

1
(println [1 2 3 4 5])

1
2
3
4
5
6
7
8
9
(defn bottles [n & [capitalize]]
  (str (if (> n 0) n (if capitalize "No more" "no more"))
    " bottle" (if (= 1 n) "" "s") " of beer" )))
 
(defn bot-wall [n & cap] (str (bottles n cap) " on the wall"))
 
(defn sing
    Default is 99 times.
  ([]  (sing 99))
 ...

1
2
3
4
5
6
7
8
9
(defn bottles [n & [capitalize]]
  (str (if (> n 0) n (if capitalize "No more" "no more"))
    " bottle" (if (= 1 n) "" "s") " of beer" ))
 
(defn bot-wall [n & cap] (str (bottles n cap) " on the wall"))
 
(defn sing
  ;  Default is 99 times.
  ([]  (sing 99))
 ...

1
uvuuj0gyi;rf68ug68

1
2
3
4
5
6
7
8
(defrecord employee [name part-time?])
(def fellas [(employee. "Rahul" :yes)
             (employee. "Sumeet" :no)
             (employee. "Prasoon" :yes)
             (employee. "Junaid" :no)])
 
(def part-time-folks (filter :part-time? fellas))
(println part-time-folks)