标签：style http io ar color os sp on div
| Difficulty: | Hard |
| Topics: | game |
user=>(def input[[:x :o :x]
[:x :o :x]
[:o :x :o]])
user=>(apply map vector input); ([:x :x :o] [:o :o :x] [:x :x :o])
user=>(seq input); ([:x :o :x] [:x :o :x] [:o :x :o])
user=>(cro input); ([:x :o :o] [:x :o :o])
user=>(some #(every? #{:x} %) ‘([:x :x :o] [:o :o :x] [:x :x :o])); nil
user=>(some #(every? #{:x} %) ‘([:x :x :x] [:o :o :x] [:x :x :o])); true
user=>(some #(every? #{:x} %) ‘([:x :x :o] [:o :o :o] [:x :x :o])); nil
最后整理，函数匿名，已经尽可能缩短字数。
标签：style http io ar color os sp on div
原文地址：http://www.cnblogs.com/zjfu/p/4124743.html
