真的骄傲梦想家园
专业源于兴趣和努力
摘要: 1 -module(libs). 2 -export([qsort/1, isPrime/1, findPrime/2]). 3 4 qsort([H|T]) -> 5 qsort([X || X <- T, X < H]) 6 ++ [H] ++ 7 qsort([X || X <- T, X >= H]); 8 qsort([]) -> []. 9 10 isPrime(1) -> false;11 isPrime(2) -> true;12 isPrime(X) when X rem 2 =:= 0 -> false;13 isPri 阅读全文
posted @ 2012-02-08 13:52 真的骄傲 阅读(664) 评论(0) 推荐(0) 编辑