diff --git a/SICP/slide03.tm b/SICP/slide03.tm index 29db6da..e5aceb6 100644 --- a/SICP/slide03.tm +++ b/SICP/slide03.tm @@ -57,7 +57,87 @@ Tree Recursion >>> - > + |<\hidden> + \<#4EF6\>\<#8868\>\<#8FBE\>\<#5F0F\>\<#548C\>\<#8C13\>\<#8BCD\>\V\<#77ED\>\<#8DEF\>\<#8FD0\>\<#7B97\>> + + <\itemize> + \<#5E94\>\<#7528\>\<#5E8F\>\<#6C42\>\<#503C\>\<#FF08\>Scheme\<#4F7F\>\<#7528\>\<#7684\>\<#662F\>\<#5E94\>\<#7528\>\<#5E8F\>\<#6C42\>\<#503C\>\<#FF09\> + + \<#6B63\>\<#5219\>\<#5E8F\>\<#6C42\>\<#503C\> + + + \<#4F8B\>\<#5206\>\<#6790\>\<#FF1A\>\<#5B9E\>\<#73B0\>\<#6C42\>\<#7EDD\>\<#5BF9\>\<#503C\>\<#7684\>\<#591A\>\<#79CD\>\<#65B9\>\<#5F0F\>> + + <\with|par-columns|2> + <\equation*> + =||||>|0,>>||>|>||>|0.>>>>>|\> + + + <\session|scheme|default> + <\unfolded-io|Scheme] > + (define (abs1 x) + + \ \ (cond ((\ x 0) x) + + \ \ \ \ \ \ \ \ ((= x 0) 0) + + \ \ \ \ \ \ \ \ (else (- x)))) + <|unfolded-io> + abs1 + + + <\unfolded-io|Scheme] > + (define (abs2 x) + + \ \ (if (\ x 0) + + \ \ \ \ \ \ x + + \ \ \ \ \ \ (- x))) + <|unfolded-io> + abs2 + + + <\unfolded-io|Scheme] > + (define (abs3 x) + + \ \ (or (and (\ x) x) (- x))) + <|unfolded-io> + abs3 + + + <\unfolded-io|Scheme] > + (abs1 1) + <|unfolded-io> + 1 + + + <\unfolded-io|Scheme] > + (abs1 -1) + <|unfolded-io> + 1 + + + <\input|Scheme] > + \; + + + + + <\folded> + <\question> + \<#4E3A\>\<#4EC0\>\<#4E48\>\<#548C\>\<#662F\>\<#5FC5\>\<#987B\>\<#7684\>\<#FF1F\> + + <|folded> + <\exercise> + \<#4F7F\>\<#7528\>\<#5B9E\>\<#73B0\>\<#548C\>\<#3002\> + + + \<#53C2\>\<#8003\>\<#6587\>\<#6863\>\<#FF1A\> + + + \; + > <\initial> @@ -66,70 +146,13 @@ + <\references> <\collection> - > - > - > - > - > - > - > - > - > - > - > - > - > - > - > + > - - -<\auxiliary> - <\collection> - <\associate|figure> - |1>||\<#64CD\>\<#4F5C\>\<#7B26\>\<#548C\>\<#64CD\>\<#4F5C\>\<#6570\>>|> - - |2>||\<#4E00\>\<#4E2A\>\<#5177\>\<#4F53\>\<#7684\>\<#4F8B\>\<#5B50\>>|> - - <\associate|gly> - \<#8BED\>|> - - \<#8FBE\>\<#5F0F\>|> - - \<#6570\>|> - - \<#5408\>|> - - \<#8C61\>|> - - \<#5408\>\<#5F0F\>|> - - \<#5408\>\<#51FD\>\<#6570\>|> - - \<#6362\>\<#6A21\>\<#578B\>|> - - \<#7528\>\<#5E8F\>\<#6C42\>\<#503C\>|> - - \<#5219\>\<#5E8F\>\<#6C42\>\<#503C\>|> - - <\associate|toc> - |\<#5E94\>\<#7528\>\<#5E8F\>\<#6C42\>\<#503C\> - |.>>>>|> - > - - |\<#6B63\>\<#5219\>\<#5E8F\>\<#6C42\>\<#503C\> - |.>>>>|> - > - - |math-font-series||\<#672F\>\<#8BED\>\<#8868\>> - |.>>>>|> - - - - \ No newline at end of file + \ No newline at end of file