flow

摘要： (defun second-word (str) (let ((pl (+ (position #\ str) 1))) (subseq str pl (position #\ str :start pl)))) 阅读全文

摘要： 1 (defun mirror? (s)2 (let ((len (length s)))3 (if (evenp len)4 (do ((start 0 (+ start 1))5 (end (- len 1) (- end 1)))6 ((or (> start end)7 (not (equal (elt s start)8 (elt s end))))9 (> start end))))))相... 阅读全文

摘要： P23:大公司为了避免设计上的灾难，选择了减少设计结果的标准差。但是当你排斥差异的时候，你不仅将失败的可能性排除在外，也将获得高利润的可能性排除在外。《黑客与画家》P25：黑客如何才能做自己喜欢的事情？我认为这个问题的解决方法是一个几乎所有创作者都知道的方法：找一份养家糊口的“白天工作”（day job）。这个词是从音乐家身上来的，他们晚上表演音乐，所以白天可以找一份其他工作。更一般地说，“白天工... 阅读全文

摘要： 1 (defun compress (x) 2 (if (consp x) 3 (compr (car x) 1 (cdr x)) 4 x)) 5 6 (defun compr (elt n lst) 7 (if (null lst) 8 (list (n-elts elt n)) 9 (let ((next (car lst)))10 (if (equal next elt)11 (compr next (+ n 1) (cdr ... 阅读全文

摘要： Level 1:黑客与画家ansi Common Lisp计算机程序的构造和解释实用Common Lisp编程On Lisp黑客：计算机革命的英雄Level 2:深入理解计算机系统编码：隐匿在计算机软硬件背后的语言程序员的自我修养——链接、装载与库编译原理Level 3:算法导论计算机程序设计艺术 阅读全文

摘要： 最近变懒了，本来该干好的工作，却总是冒出很多想法让自己分心，踏实学好现在该学的东西。 Right time,right thing！ Do one thing,do it well! 阅读全文

摘要： 这篇文章是张爱玲的《非走不可的弯路》，写给老妈：在青春的路口，曾经有那么一条小路若隐若现，召唤着我。母亲拦住我：“那条路走不得。”我不信。“我就是从那条路走过来的，你还有什么不信？”“既然你能从那条路上走过来，我为什么不能？”“我不想让你走弯路。”“但是我喜欢，而且我不怕。”母亲心疼地看我好久，然后叹口气：“好吧，你这个倔强的孩子，那条路很难走，一路小心。”上路后，我发现母亲没有骗我，那的确是条弯路，我碰壁，摔跟头，有时碰得头破血流，但我不停地走，终于走过来了。坐下来喘息的时候，我看见一个朋友，自然很年轻，正站在我当年的路口，我忍不住喊：“那路走不得。”她不信。在人生的路上，有一条路每一个人非 阅读全文

摘要： I am what I am 我永远都爱这样的我 快乐是快乐的方式不只一种 最荣幸是谁都是造物者的光荣 不用闪躲为我喜欢的生活而活 不用粉墨 就站在光明的角落 我就是我是颜色不一样的烟火 天空海阔 要做最坚强的泡沫 我喜欢我让蔷薇开出一种结果 孤独的沙漠里 一样盛放的赤裸裸 多么高兴在琉璃屋中快乐生活 对世界说 甚么是光明和磊落 我就是我是颜色不一样的烟火 天空海阔 要做最坚强的泡沫 我喜欢我让蔷... 阅读全文

摘要： void reverse_array(int a[],int cnt){ int first,last; for (first ＝ 0,last ＝ cnt - 1;first ＜ last;first ++,last –){ inplace_swap(&a[first],&a[last]); }} 阅读全文

摘要： 若x != y,则： x = x ^ y ^ x;void inplace_swap(int *x，int *y){ *y ＝ *x ^ *y; *x ＝ *x ^ *y; *y ＝ *x ^ *y;} 阅读全文