_海阔天空的博客_CSDN博客-leetcode,SICP,Scheme领域博主

1 起因起因有两点吧，第一点就是最不能忍得，就是不能在离线使用，虽然这个我已经忍受了很久；第二点就是现在强制限制2天同时登录，我看了一下我现在一共有5台设备，每次打开印象笔记的时候都要提醒我只能两台，太气人了。至于为什么用有道云笔记，没有什么原因。2 印象笔记导出导出很简单，首先是选择文件，然后选择导出。接着选择导出为ENEX格式文件(.enex)，最后选择导出

2016-09-23 10:14:49 5299

原创 QT引用OpenCV出现错误：warpers_inl.hpp:146: error: C2589: “(”:“::”右边的非法标记

QT中出现这种重复定义的问题很正常问题QT中引入OpenCV在编译的时候出现了下面的问题：F:\workspace\show\xhxzbzs\LiveEncoder\3rdparty\libopencv249\include\opencv2\stitching\detail\warpers_inl.hpp:146: error: C2589: “(”:“::”右边的非法标记f:\workspac

2016-08-30 09:29:58 2915 1

转载用pdb调试OpenStack

点击打开链接[plain] view plaincopyADMIN_PASSWORD=password MYSQL_PASSWORD=stackdb RABBIT_PASSWORD=stackqueue SERVICE_PASSWORD=$ADMIN_PASSWORD #enable_service ral

2014-11-24 13:17:10 1503

转载 Python 调试 PDB

点击打开链接在python中使用pdb模块可以进行调试import pdbpdb.set_trace()也可以使用python -m pdb mysqcript.py这样的方式(Pdb) 会自动停在第一行，等待调试,这时你可以看看帮助(Pdb) h 说明下这几个关键命令>断点设置 (Pdb)b 10 #断点设置在本py的第10行

2014-11-24 13:15:51 576

原创 Python中的getitem和setitem特殊方法

在Nova的源码中，基本上所有的lei

2014-11-21 11:01:50 3017

转载 Python.Paste指南之Deploy(1)-概念

转自: 点击打开链接Paste.Deploy主要是用来载入WSGI中的Web App使用，其核心函数是loadapp(),下文中PD就指代Paste.Deploy。OS:Ubuntu12.04 2012年11月17日第一版主要是对官方文档的一个翻译，外加自己的一些理解本文的Paste.Deploy使用主要是针对WSGI1 简介及安装Paste Deployment是一种机制，通过lo

2014-11-19 17:06:13 564

转载 openstack 中的WSGI

1 WSGI 程序起步

2014-11-18 20:00:56 1662

转载 Openstack中的tox

写在最前面以keystone工程为例，其他工程类似内容包括：打源码包（sdist）、单元测试（UT）、测试覆盖率（coverage）、代码格式检查（pep8，flake）1、引子接触了一段时间openstack社区，并提交了几个bug之后，就发现社区中，从bug提交、问题确认、到bug修复，代码review，自动构建、单元测试、静态检查、再到代码合入，也就是我们经常说的持续

2014-11-13 17:48:43 3341 1

转载 Nova创建虚拟机实例过程简述

原文地址

2014-11-12 15:10:38 1559

转载 openstack 中的Routes + webob 的 REST API

首先贴一段代码

2014-11-12 00:29:28 1192

原创 Python 中的@

1 Decorators for Functions and Methods

2014-11-12 00:26:27 469

原创 Openstack笔记一

1. DashBoard

2014-08-21 10:28:40 431

原创练习2.73-练习2.74

1.练习2.73a没有必要b(define (insert-sum-proc) (define (deriv-sum exp var) (make-sum (deriv (car exp) var) (deriv (cadr exp) var))) (put 'deriv '+ deriv-sum) 'done)(define (

2014-02-07 17:03:39 580

原创练习2.53-练习2.56

1.练习2.53'(a b c)'((george))'((y1 y2))'(y1 y2)#f#f'(red shoes blue socks)2.练习2.54(define (equal? s1 s2) (cond ((and (null? s1) (null? s2)) true) ((or (null? s1) (null? s

2014-01-23 19:10:57 538

原创练习2.48-练习2.51

1.练习2.48(define (make-segment start end) (cons start end))(define (start-segment seg) (car seg))(define (end-segment seg) (cdr seg))2.练习2.49(require (planet "sicp.ss" ("soegaard" "sicp

2014-01-22 19:12:03 550

原创练习1.23-练习1.30

1.练习1.23改后的代码如下：(define (find-divisor-better n a) (cond ((> (square a) n) n) ((divides?-better n a) a) (else (find-divisor-better n (next-2 a)))))(define (next-2 n) (if (= 2 n) (+ 1

2014-01-20 20:10:43 532

原创练习2.21-练习2.35

1.练习2.21(define (square-list items) (if (null? items) '() (cons (square (car items)) (square-list (cdr items)))))(define (square-list items) (map (lambda (x) (square x)) items))2

2014-01-20 20:10:25 541

原创练习2.41-练习2.47

1.练习2.41(define (seprate-except x except) (filter (lambda (couple) (let ((first (car couple)) (second (cadr couple))) (and (not (= first except))

2014-01-20 18:59:14 566

原创练习2.11-练习2.20

1.练习2.11(define (mul-interval x y) (let ((x1 (lower-bound x)) (x2 (upper-bound x)) (y1 (lower-bound y)) (y2 (upper-bound y))) (let ((zzx (and (>= x1 0) (>= x2 0))) (zzy (and (>= y1 0) (>

2014-01-17 21:42:30 530

原创练习2.2-练习2.10

1.练习2.2(define (make-segment start end) (cons start end))(define (start-segment seg) (car seg))(define (end-segment seg) (cdr seg))(define (make-point x y) (cons x y))(define (x-poin

2014-01-15 21:29:45 524

原创练习2.1

1.练习2.1(define (check-pos-neg a b) (or (and (not ( b 0)) (and (not (> a 0)) (< b 0))))(define (make-rat n d) (let ((g (gcd (abs n) (abs d))) (posi (check-pos-neg n d))) (cons (/ (if

2014-01-14 22:59:32 466

原创练习1.40-练习1.46

1.练习1.40(define (cubic a b c) (define (cube x) (* x x x)) (lambda (x) (+ (cube x) (* a (square x)) (* b x) c)))(define (newtons-method g guess) (fixed-point (ne

2014-01-13 21:01:26 588

原创练习1.35-练习1-38

1.练习1.35(fixed-point (lambda (x) (+ 1 (/ 1 x))) 1.0)2.练习1.36不用平均阻尼方式：(fixed-point-display (lambda (x) (/ (log 1000) (log x))) 2.0)结果为：2.9.9657842846620873.0044722098412146.2791957575071

2014-01-11 23:07:30 442

原创练习1.31-练习1.34

最近对于Lisp的强大和高深还是深有体会的，可以将函数作为参数进行调用，这样在很大的程度上可以提高函数的抽象性，即将具有公共模式的函数进行抽象。例如在SICP中，首先将累加和的过程进行了抽象，然后在累加和的基础上抽象出了累乘积，进而又发现了累加和与累乘积的共同点，进一步抽象成了一个叫做accumulate的函数，这个函数的是这样的(accumulate combiner null-value

2014-01-10 19:19:02 489

原创练习1.23-练习1.30

1.练习1.23改后的代码如下：(define (find-divisor-better n a) (cond ((> (square a) n) n) ((divides?-better n a) a) (else (find-divisor-better n (next-2 a)))))(define (next-2 n) (if (= 2 n) (+

2014-01-09 21:05:38 453

原创练习1.18-练习1.22

1.练习1.18(define (*-iter a b n) (cond ((= n 0) a) ((even? n) (*-iter a (double b) (halve n))) (else (*-iter (+ a b) b (- n 1)))))(define (* b n) (*-iter 0 b n))Lisp真是强大啊，连 *-iter这种函数名也可以使用！

2014-01-08 21:33:03 628

原创练习1.10-练习1.17

1.练习1.10表达式的求值就不说了。(define (f n) (A 0 n)) -------2n(define (g n) (A 1 n))-------2的n次方(define (h n) (A 2 n))-------n个2的次方，例如：(h 4)表示为2的2次方的2次方的2次方2.练习1.11递归计算过程：(define (f1 n) (if (< n

2014-01-07 20:47:31 559

原创练习1.1－练习1.9

1. 练习1.1这个题没有什么好说的了，只要把代码敲出来，运行一遍就可以了。2. 练习1.2这个题应该不算难吧，没有看过别人的答案，我把我的贴出来吧。(/ (+ 5 4 (- 2 (- 3 (+ 6 (/ 4 5))))) (* 3 (- 6 2) (- 2 7)))3.练习1.3我的方法是求出3个数的和，再将减去最小的数，算不上最好的方法吧，马马虎虎。(def

2014-01-06 21:20:53 597

转载别人的Emacs配置1

原地址：点击打开链接;;使用C-x C-e检测配置的正确性(global-linum-mode t);显示行号(setq column-number-mode t);显示列号(setq auto-image-file-mode t);让Emacs可以直接打开和显示图片(auto-compression-mode t);打开压缩文件时自动解压缩;(setq global-font-lo

2014-01-04 17:24:10 1013

原创 Emacs 配置之查找是否有“＊scheme＊”窗口

最近终于下定决心学习一下lisp，打算从SICP开始吧。编辑器打算采用Emacs，原因是它是用C和Emacs Lisp（Lisp的一种方言）编写的程序。Emacs还真的是难学啊，在掌握了基本（基本）的操作后，开始配置Emacs的环境，参考的很多网上的一些代码，就不多说了。这里要说的是我在借鉴了大牛王垠的配置后，在使用的时候会报一个找不到find函数的的错误，源代码如下：(defun

2014-01-04 17:14:24 575

android二维码扫描

空空如也