nth element for stdlib

zmactep · zmactep · commit 173b714e0165 · 2014-07-26T14:39:28.000+04:00
diff --git a/strats/stdlib.clj b/strats/stdlib.clj
@@ -0,0 +1,2 @@
+(defn nth [list pos]
+  (if (== pos 0) (head list) (nth (tail list) (- pos 1)))

Original file line number	Diff line number	Diff line change
`@@ -0,0 +1,2 @@`
	`1`	`+(defn nth [list pos]`
	`2`	`+ (if (== pos 0) (head list) (nth (tail list) (- pos 1)))`