#reader(lib"read.ss""wxme")WXME0111 ## #| This file uses the GRacket editor format. Open this file in DrRacket version 8.4 or later to read it. Most likely, it was created by saving a program in DrRacket, and it probably contains a program with non-text elements (such as images or comment boxes). http://racket-lang.org/ |# 34 7 #"wxtext\0" 3 1 6 #"wxtab\0" 1 1 8 #"wximage\0" 2 0 8 #"wxmedia\0" 4 1 34 #"(lib \"syntax-browser.ss\" \"mrlib\")\0" 1 0 36 #"(lib \"cache-image-snip.ss\" \"mrlib\")\0" 1 0 68 (0 68 ((lib "image-core.ss" "mrlib") (lib "image-core-wxme.rkt" "mrlib")) ) 1 0 16 #"drscheme:number\0" 3 0 44 #"(lib \"number-snip.ss\" \"drscheme\" \"private\")\0" 1 0 36 #"(lib \"comment-snip.ss\" \"framework\")\0" 1 0 79 (1 79 ((lib "srcloc-snip.rkt" "framework") (lib "wxme-srcloc-snip.rkt" "framework")) ) 1 0 93 (2 93 ((lib "collapsed-snipclass.ss" "framework") (lib "collapsed-snipclass-wxme.ss" "framework")) ) 0 0 43 #"(lib \"collapsed-snipclass.ss\" \"framework\")\0" 0 0 19 #"drscheme:sexp-snip\0" 0 0 29 #"drscheme:bindings-snipclass%\0" 1 0 101 (3 101 ((lib "ellipsis-snip.rkt" "drracket" "private") (lib "ellipsis-snip-wxme.rkt" "drracket" "private")) ) 2 0 88 (4 88 ((lib "pict-snip.rkt" "drracket" "private") (lib "pict-snip.rkt" "drracket" "private")) ) 1 0 55 #"((lib \"snip.rkt\" \"pict\") (lib \"snip-wxme.rkt\" \"pict\"))\0" 1 0 34 #"(lib \"bullet-snip.rkt\" \"browser\")\0" 0 0 25 #"(lib \"matrix.ss\" \"htdp\")\0" 1 0 22 #"drscheme:lambda-snip%\0" 1 0 29 #"drclickable-string-snipclass\0" 0 0 26 #"drracket:spacer-snipclass\0" 0 0 57 #"(lib \"hrule-snip.rkt\" \"macro-debugger\" \"syntax-browser\")\0" 1 0 26 #"drscheme:pict-value-snip%\0" 0 0 45 #"(lib \"image-snipr.ss\" \"slideshow\" \"private\")\0" 1 0 38 #"(lib \"pict-snipclass.ss\" \"slideshow\")\0" 2 0 55 #"(lib \"vertical-separator-snip.ss\" \"stepper\" \"private\")\0" 1 0 18 #"drscheme:xml-snip\0" 1 0 31 #"(lib \"xml-snipclass.ss\" \"xml\")\0" 1 0 21 #"drscheme:scheme-snip\0" 2 0 34 #"(lib \"scheme-snipclass.ss\" \"xml\")\0" 1 0 10 #"text-box%\0" 1 0 32 #"(lib \"text-snipclass.ss\" \"xml\")\0" 1 0 1 6 #"wxloc\0" 0 0 92 0 1 #"\0" 0 75 1 #"\0" 0 10 90 -1 90 -1 3 -1 0 1 0 1 0 0 0 0 0 1.0 0 0 0 1.0 0 0 0 0.0 255 255 255 0.0 1 -1 0 9 #"Standard\0" 0 75 12 #"Courier New\0" 0 12 90 -1 90 -1 3 -1 0 1 0 1 0 0 0 0 0 1.0 0 0 0 1.0 0 0 0 0.0 255 255 255 0.0 1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1 1 1 1.0 1 1 1 1.0 0 0 0 0.0 0 0 0 0.0 -1 -1 2 24 #"framework:default-color\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 0.0 1 1 1 1.0 0 0 0 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 0.0 1 1 1 1.0 150 0 150 1.0 0 0 0 0.0 -1 -1 2 15 #"text:ports out\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 150 0 150 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 93 -1 -1 -1 0 0 0 0 0 0 0 0 0 0.0 1.0 1.0 1.0 1.0 255 0 0 1.0 0 0 0 0.0 -1 -1 2 15 #"text:ports err\0" 0 -1 1 #"\0" 1 0 -1 -1 93 -1 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 255 0 0 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 0.0 1 1 1 1.0 0 0 175 1.0 0 0 0 0.0 -1 -1 2 17 #"text:ports value\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 0 0 175 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 0.0 1.0 1.0 1.0 1.0 34 139 34 1.0 0 0 0 0.0 -1 -1 2 27 #"Matching Parenthesis Style\0" 0 -1 1 #"\0" 1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 0.0 1.0 1.0 1.0 1.0 34 139 34 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 38 38 128 1.0 0 0 0 0.0 -1 -1 2 37 #"framework:syntax-color:scheme:symbol\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 38 38 128 1.0 0 0 0 0.0 -1 -1 2 38 #"framework:syntax-color:scheme:keyword\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 38 38 128 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 194 116 31 1.0 0 0 0 0.0 -1 -1 2 38 #"framework:syntax-color:scheme:comment\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 194 116 31 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 41 128 38 1.0 0 0 0 0.0 -1 -1 2 37 #"framework:syntax-color:scheme:string\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 41 128 38 1.0 0 0 0 0.0 -1 -1 2 35 #"framework:syntax-color:scheme:text\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 41 128 38 1.0 0 0 0 0.0 -1 -1 2 39 #"framework:syntax-color:scheme:constant\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 41 128 38 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 132 60 36 1.0 0 0 0 0.0 -1 -1 2 49 #"framework:syntax-color:scheme:hash-colon-keyword\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 132 60 36 1.0 0 0 0 0.0 -1 -1 2 42 #"framework:syntax-color:scheme:parenthesis\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 132 60 36 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 255 0 0 1.0 0 0 0 0.0 -1 -1 2 36 #"framework:syntax-color:scheme:error\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 255 0 0 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 0 0 0 1.0 0 0 0 0.0 -1 -1 2 36 #"framework:syntax-color:scheme:other\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 0 0 0 1.0 0 0 0 0.0 -1 -1 2 16 #"Misspelled Text\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 0.0 1 1 1 1.0 0 0 0 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 81 112 203 1.0 0 0 0 0.0 -1 -1 2 38 #"drracket:check-syntax:lexically-bound\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 81 112 203 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 178 34 34 1.0 0 0 0 0.0 -1 -1 2 28 #"drracket:check-syntax:set!d\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 178 34 34 1.0 0 0 0 0.0 -1 -1 2 37 #"drracket:check-syntax:unused-require\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 255 0 0 1.0 0 0 0 0.0 -1 -1 2 36 #"drracket:check-syntax:free-variable\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 255 0 0 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 68 0 203 1.0 0 0 0 0.0 -1 -1 2 31 #"drracket:check-syntax:imported\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 68 0 203 1.0 0 0 0 0.0 -1 -1 2 47 #"drracket:check-syntax:my-obligation-style-pref\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 178 34 34 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 0 116 0 1.0 0 0 0 0.0 -1 -1 2 50 #"drracket:check-syntax:their-obligation-style-pref\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 0 116 0 1.0 0 0 0 0.0 -1 -1 2 48 #"drracket:check-syntax:unk-obligation-style-pref\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 0 0 0 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 139 142 28 1.0 0 0 0 0.0 -1 -1 2 49 #"drracket:check-syntax:both-obligation-style-pref\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 139 142 28 1.0 0 0 0 0.0 -1 -1 2 26 #"plt:htdp:test-coverage-on\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 0 0 0 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 1 0 0 0 0.0 0 0 0 0.0 255 165 0 1.0 0 0 0 1.0 -1 -1 2 27 #"plt:htdp:test-coverage-off\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 1 0 0 0 0.0 0 0 0 0.0 255 165 0 1.0 0 0 0 1.0 -1 -1 4 1 #"\0" 0 70 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0.0 0 0 0 0.0 -1 -1 4 4 #"XML\0" 0 70 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0.0 0 0 0 0.0 -1 -1 2 37 #"plt:module-language:test-coverage-on\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 0.0 1 1 1 1.0 0 0 0 1.0 0 0 0 0.0 -1 -1 2 38 #"plt:module-language:test-coverage-off\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 1 0 0 0 0.0 0 0 0 0.0 255 165 0 1.0 0 0 0 1.0 -1 -1 0 36 #"mrlib/syntax-browser:subtitle-color\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0.0 0 0 0 0.0 36 36 140 1.0 255 255 255 1.0 -1 -1 0 42 #"mrlib/syntax-browser:focused-syntax-color\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0.0 0 0 0 0.0 34 139 34 1.0 255 255 255 1.0 -1 -1 0 1 #"\0" 0 75 12 #"Courier New\0" 0.0 12 90 -1 90 -1 3 -1 0 1 0 1 0 0 0.0 0.0 0.0 1.0 0.0 0.0 0.0 1.0 0 0 0 0.0 255 255 255 0.0 1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 0 0 0 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 150 0 150 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 93 -1 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 255 0 0 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 0 0 175 1.0 0 0 0 0.0 -1 -1 0 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 36 36 140 1.0 255 255 255 1.0 -1 -1 0 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 34 139 34 1.0 255 255 255 1.0 -1 -1 4 1 #"\0" 0 71 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0.0 0 0 0 0.0 -1 -1 4 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0.0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 0 0 255 1.0 0 0 0 0.0 -1 -1 4 1 #"\0" 0 71 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0.0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 0 0 255 1.0 0 0 0 0.0 -1 -1 4 1 #"\0" 0 71 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 0 100 0 1.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 150 0 150 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 150 0 150 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 93 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 255 0 0 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 93 -1 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 255 0 0 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 0 0 175 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 0 0 175 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 34 139 34 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 38 38 128 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 194 116 31 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 41 128 38 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 132 60 36 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 255 0 0 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 81 112 203 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 178 34 34 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 68 0 203 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 0 116 0 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 139 142 28 0.0 0 0 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 93 -1 -1 0 1 0 0 0 1 0.0 0.0 0.0 1.0 0.0 0.0 0.0 1.0 255 165 0 0.0 0 0 0 0.0 -1 -1 0 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 1.0 0.0 0.0 0.0 1.0 36 36 140 0.0 255 255 255 0.0 -1 -1 0 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 1.0 0.0 0.0 0.0 1.0 34 139 34 0.0 255 255 255 0.0 -1 -1 4 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 0 0 255 0.0 0 0 0 0.0 -1 -1 4 1 #"\0" 0 71 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 0 0 255 0.0 0 0 0 0.0 -1 -1 4 1 #"\0" 0 71 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 0 100 0 0.0 0 0 0 0.0 -1 -1 4 1 #"\0" 0 -1 1 #"\0" 1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 1.0 0.0 0.0 0.0 1.0 0 0 0 0.0 255 255 0 0.0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 200 0 0 1.0 0 0 0 0.0 -1 -1 4 1 #"\0" 0 -1 1 #"\0" 1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0.0 0 0 0 0.0 0 0 0 1.0 255 255 0 1.0 -1 -1 0 1288 0 28 3 12 #"#lang racket" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 7 #"require" 0 0 24 3 2 #" (" 0 0 14 3 3 #"lib" 0 0 24 3 1 #" " 0 0 19 3 10 #"\"trace.ss\"" 0 0 24 3 2 #"))" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 2 #" (" 0 0 14 3 15 #"stream-zip-with" 0 0 24 3 1 #" " 0 0 14 3 1 #"f" 0 0 24 3 1 #" " 0 0 28 3 1 #"." 0 0 24 3 1 #" " 0 0 14 3 10 #"argstreams" 0 0 24 3 2 #") " 0 0 17 3 78 (5 78 ;; merge pe oricâte argumente, nu se poate copia în loc de funcția din lab5 ) 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 2 #"if" 0 0 24 3 2 #" (" 0 0 14 3 13 #"stream-empty?" 0 0 24 3 2 #" (" 0 0 14 3 3 #"car" 0 0 24 3 1 #" " 0 0 14 3 10 #"argstreams" 0 0 24 3 2 #"))" 0 0 24 29 1 #"\n" 0 0 24 3 6 #" " 0 0 14 3 12 #"empty-stream" 0 0 24 29 1 #"\n" 0 0 24 3 6 #" " 0 0 17 3 54 #";; un flux cu (f first1 first2 ... firstn) si apel rec" 0 0 24 29 1 #"\n" 0 0 24 3 7 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 3 2 #" (" 0 0 14 3 5 #"apply" 0 0 24 3 1 #" " 0 0 14 3 1 #"f" 0 0 24 3 2 #" (" 0 0 14 3 3 #"map" 0 0 24 3 1 #" " 0 0 14 3 12 #"stream-first" 0 0 24 3 1 #" " 0 0 14 3 10 #"argstreams" 0 0 24 3 2 #"))" 0 0 24 29 1 #"\n" 0 0 24 3 20 #" (" 0 0 14 3 5 #"apply" 0 0 24 3 1 #" " 0 0 14 3 15 #"stream-zip-with" 0 0 24 3 1 #" " 0 0 14 3 1 #"f" 0 0 24 3 2 #" (" 0 0 14 3 3 #"map" 0 0 24 3 1 #" " 0 0 14 3 11 #"stream-rest" 0 0 24 3 1 #" " 0 0 14 3 10 #"argstreams" 0 0 24 3 5 #")))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 40 #";---------------------- Grafuri infinite" 0 0 24 29 1 #"\n" 0 0 17 3 55 (6 55 ;---------------------- fără întârzierea evaluării ) 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 9 #"(define g" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 3 #" (" 0 0 17 3 6 #"letrec" 0 0 17 3 3 #" ((" 0 0 17 3 1 #"a" 0 0 17 3 2 #" (" 0 0 17 3 4 #"list" 0 0 17 3 1 #" " 0 0 17 3 1 #"'" 0 0 17 3 1 #"a" 0 0 17 3 1 #" " 0 0 17 3 6 #"a b)) " 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 12 #" (" 0 0 17 3 1 #"b" 0 0 17 3 2 #" (" 0 0 17 3 4 #"list" 0 0 17 3 1 #" " 0 0 17 3 1 #"'" 0 0 17 3 1 #"b" 0 0 17 3 1 #" " 0 0 17 3 6 #"b a)))" 0 0 24 29 1 #"\n" 0 0 17 3 8 #"; a))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 45 #";---------------------- \303\256nt\303\242rziere cu \316\273 ()" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 6 #"define" 0 0 17 3 1 #" " 0 0 17 3 7 #"counter" 0 0 17 3 3 #" 0)" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 9 #"define g1" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 3 #" (" 0 0 17 3 6 #"letrec" 0 0 17 3 3 #" ((" 0 0 17 3 1 #"a" 0 0 17 3 7 #" (\316\273 ()" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 17 #" (" 0 0 17 3 4 #"set!" 0 0 17 3 1 #" " 0 0 17 3 7 #"counter" 0 0 17 3 2 #" (" 0 0 17 3 4 #"add1" 0 0 17 3 10 #" counter))" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 17 #" (" 0 0 17 3 4 #"list" 0 0 17 3 1 #" " 0 0 17 3 1 #"'" 0 0 17 3 1 #"a" 0 0 17 3 1 #" " 0 0 17 3 1 #"a" 0 0 17 3 5 #" b)))" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 12 #" (" 0 0 17 3 1 #"b" 0 0 17 3 2 #" (" 0 0 17 3 2 #"\316\273" 0 0 17 3 5 #" () (" 0 0 17 3 4 #"list" 0 0 17 3 1 #" " 0 0 17 3 1 #"'" 0 0 17 3 1 #"b" 0 0 17 3 1 #" " 0 0 17 3 1 #"b" 0 0 17 3 6 #" a))))" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 9 #" (a)))" 0 0 24 29 1 #"\n" 0 0 17 3 3 #";g1" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 6 #"define" 0 0 17 3 1 #" " 0 0 17 3 3 #"key" 0 0 17 3 7 #" first)" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 6 #"define" 0 0 17 3 2 #" (" 0 0 17 3 2 #"ls" 0 0 17 3 1 #" " 0 0 17 3 4 #"node" 0 0 17 3 4 #") ((" 0 0 17 3 6 #"second" 0 0 17 3 8 #" node)))" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 6 #"define" 0 0 17 3 2 #" (" 0 0 17 3 2 #"rs" 0 0 17 3 1 #" " 0 0 17 3 4 #"node" 0 0 17 3 4 #") ((" 0 0 17 3 5 #"third" 0 0 17 3 9 #" node))) " 0 0 24 29 1 #"\n" 0 0 17 3 3 #";g1" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 6 #"equal?" 0 0 17 3 1 #" " 0 0 17 3 2 #"g1" 0 0 17 3 2 #" (" 0 0 17 3 2 #"ls" 0 0 17 3 5 #" g1))" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 3 #"eq?" 0 0 17 3 1 #" " 0 0 17 3 2 #"g1" 0 0 17 3 2 #" (" 0 0 17 3 2 #"ls" 0 0 17 3 5 #" g1))" 0 0 24 29 1 #"\n" 0 0 17 3 8 #";counter" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 45 #";---------------------- \303\256nt\303\242rziere cu delay" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 6 #"define" 0 0 17 3 1 #" " 0 0 17 3 1 #"c" 0 0 17 3 3 #" 0)" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 9 #"define g2" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 3 #" (" 0 0 17 3 6 #"letrec" 0 0 17 3 3 #" ((" 0 0 17 3 8 #"a (delay" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 17 #" (" 0 0 17 3 4 #"set!" 0 0 17 3 1 #" " 0 0 17 3 1 #"c" 0 0 17 3 2 #" (" 0 0 17 3 4 #"add1" 0 0 17 3 4 #" c))" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 17 #" (" 0 0 17 3 4 #"list" 0 0 17 3 1 #" " 0 0 17 3 1 #"'" 0 0 17 3 1 #"a" 0 0 17 3 1 #" " 0 0 17 3 1 #"a" 0 0 17 3 5 #" b)))" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 12 #" (" 0 0 17 3 1 #"b" 0 0 17 3 2 #" (" 0 0 17 3 5 #"delay" 0 0 17 3 2 #" (" 0 0 17 3 4 #"list" 0 0 17 3 1 #" " 0 0 17 3 1 #"'" 0 0 17 3 1 #"b" 0 0 17 3 1 #" " 0 0 17 3 1 #"b" 0 0 17 3 6 #" a))))" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 5 #" (" 0 0 17 3 5 #"force" 0 0 17 3 5 #" a)))" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 6 #"define" 0 0 17 3 1 #" " 0 0 17 3 3 #"key" 0 0 17 3 7 #" first)" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 6 #"define" 0 0 17 3 2 #" (" 0 0 17 3 2 #"ls" 0 0 17 3 1 #" " 0 0 17 3 4 #"node" 0 0 17 3 3 #") (" 0 0 17 3 5 #"force" 0 0 17 3 2 #" (" 0 0 17 3 6 #"second" 0 0 17 3 8 #" node)))" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 6 #"define" 0 0 17 3 2 #" (" 0 0 17 3 2 #"rs" 0 0 17 3 1 #" " 0 0 17 3 4 #"node" 0 0 17 3 3 #") (" 0 0 17 3 5 #"force" 0 0 17 3 2 #" (" 0 0 17 3 5 #"third" 0 0 17 3 8 #" node)))" 0 0 24 29 1 #"\n" 0 0 17 3 3 #";g2" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 6 #"equal?" 0 0 17 3 1 #" " 0 0 17 3 2 #"g2" 0 0 17 3 2 #" (" 0 0 17 3 2 #"ls" 0 0 17 3 5 #" g2))" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 3 #"eq?" 0 0 17 3 1 #" " 0 0 17 3 2 #"g2" 0 0 17 3 2 #" (" 0 0 17 3 2 #"ls" 0 0 17 3 5 #" g2))" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";c" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 58 (7 58 ;---------------------- Fluxuri = eleganță + eficiență ) 0 0 24 29 1 #"\n" 0 0 17 3 14 #";---elegan\310\233\304\203" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 2 #" (" 0 0 14 3 8 #"interval" 0 0 24 3 1 #" " 0 0 14 3 1 #"a" 0 0 24 3 1 #" " 0 0 14 3 1 #"b" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 2 #"if" 0 0 24 3 2 #" (" 0 0 14 3 1 #">" 0 0 24 3 1 #" " 0 0 14 3 1 #"a" 0 0 24 3 1 #" " 0 0 14 3 1 #"b" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 6 #" " 0 0 21 3 1 #"'" 0 0 24 3 2 #"()" 0 0 24 29 1 #"\n" 0 0 24 3 7 #" (" 0 0 14 3 4 #"cons" 0 0 24 3 1 #" " 0 0 14 3 1 #"a" 0 0 24 3 2 #" (" 0 0 14 3 8 #"interval" 0 0 24 3 2 #" (" 0 0 14 3 4 #"add1" 0 0 24 3 1 #" " 0 0 14 3 1 #"a" 0 0 24 3 2 #") " 0 0 14 3 1 #"b" 0 0 24 3 4 #"))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 52 #"; interval [2 .. sqrt n] -> filter divizori -> null?" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 2 #" (" 0 0 14 3 6 #"prime?" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 5 #"null?" 0 0 24 3 2 #" (" 0 0 14 3 6 #"filter" 0 0 24 3 2 #" (" 0 0 15 3 2 #"\316\273" 0 0 24 3 2 #" (" 0 0 14 3 1 #"d" 0 0 24 3 3 #") (" 0 0 14 3 5 #"zero?" 0 0 24 3 2 #" (" 0 0 14 3 6 #"modulo" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 1 #" " 0 0 14 3 1 #"d" 0 0 24 3 3 #")))" 0 0 24 29 1 #"\n" 0 0 24 3 18 #" (" 0 0 14 3 8 #"interval" 0 0 24 3 1 #" " 0 0 21 3 1 #"2" 0 0 24 3 2 #" (" 0 0 14 3 4 #"sqrt" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 5 #")))))" 0 0 24 29 1 #"\n" 0 0 24 3 2 #" " 0 0 24 29 1 #"\n" 0 0 17 3 8 #";(filter" 0 0 17 3 1 #" " 0 0 17 3 6 #"prime?" 0 0 17 3 14 #" (range 2 15))" 0 0 24 29 1 #"\n" 0 0 17 3 8 #";(prime?" 0 0 17 3 17 #" 100000000000000)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 15 #";---eficien\310\233\304\203" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 2 #" (" 0 0 14 3 11 #"ugly-prime?" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 15 3 3 #"let" 0 0 24 3 1 #" " 0 0 14 3 4 #"loop" 0 0 24 3 3 #" ((" 0 0 14 3 3 #"div" 0 0 24 3 1 #" " 0 0 21 3 1 #"2" 0 0 24 3 2 #"))" 0 0 24 29 1 #"\n" 0 0 24 3 5 #" (" 0 0 15 3 4 #"cond" 0 0 24 3 3 #" ((" 0 0 14 3 1 #">" 0 0 24 3 2 #" (" 0 0 14 3 3 #"sqr" 0 0 24 3 1 #" " 0 0 14 3 3 #"div" 0 0 24 3 2 #") " 0 0 14 3 1 #"n" 0 0 24 3 2 #") " 0 0 21 3 2 #"#t" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 12 #" ((" 0 0 14 3 5 #"zero?" 0 0 24 3 2 #" (" 0 0 14 3 6 #"modulo" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 1 #" " 0 0 14 3 3 #"div" 0 0 24 3 3 #")) " 0 0 21 3 2 #"#f" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 11 #" (" 0 0 14 3 4 #"else" 0 0 24 3 2 #" (" 0 0 14 3 4 #"loop" 0 0 24 3 2 #" (" 0 0 14 3 4 #"add1" 0 0 24 3 1 #" " 0 0 14 3 3 #"div" 0 0 24 3 6 #"))))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 34 #";(filter ugly-prime? (range 2 15))" 0 0 24 29 1 #"\n" 0 0 17 3 13 #";(ugly-prime?" 0 0 17 3 17 #" 100000000000000)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 28 #";---elegan\310\233\304\203 + eficien\310\233\304\203" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 2 #" (" 0 0 14 3 15 #"interval-stream" 0 0 24 3 1 #" " 0 0 14 3 1 #"a" 0 0 24 3 1 #" " 0 0 14 3 1 #"b" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 2 #"if" 0 0 24 3 2 #" (" 0 0 14 3 1 #">" 0 0 24 3 1 #" " 0 0 14 3 1 #"a" 0 0 24 3 1 #" " 0 0 14 3 1 #"b" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 6 #" " 0 0 14 3 12 #"empty-stream" 0 0 24 29 1 #"\n" 0 0 24 3 7 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 3 1 #" " 0 0 14 3 1 #"a" 0 0 24 3 2 #" (" 0 0 14 3 15 #"interval-stream" 0 0 24 3 2 #" (" 0 0 14 3 4 #"add1" 0 0 24 3 1 #" " 0 0 14 3 1 #"a" 0 0 24 3 2 #") " 0 0 14 3 1 #"b" 0 0 24 3 4 #"))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 52 #"; interval [2 .. sqrt n] -> filter divizori -> null?" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 2 #" (" 0 0 14 3 13 #"prime-stream?" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 13 #"stream-empty?" 0 0 24 3 2 #" (" 0 0 14 3 13 #"stream-filter" 0 0 24 3 2 #" (" 0 0 15 3 2 #"\316\273" 0 0 24 3 2 #" (" 0 0 14 3 1 #"d" 0 0 24 3 3 #") (" 0 0 14 3 5 #"zero?" 0 0 24 3 2 #" (" 0 0 14 3 6 #"modulo" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 1 #" " 0 0 14 3 1 #"d" 0 0 24 3 3 #")))" 0 0 24 29 1 #"\n" 0 0 24 3 33 #" (" 0 0 14 3 15 #"interval-stream" 0 0 24 3 1 #" " 0 0 21 3 1 #"2" 0 0 24 3 2 #" (" 0 0 14 3 4 #"sqrt" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 5 #")))))" 0 0 24 29 1 #"\n" 0 0 17 3 8 #";(filter" 0 0 17 3 1 #" " 0 0 17 3 27 #"prime-stream? (range 2 15))" 0 0 24 29 1 #"\n" 0 0 17 3 15 #";(prime-stream?" 0 0 17 3 29 #" 100000000000000000000000000)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 64 (8 64 ;; funcție de afișare ca listă a primelor n elemente din flux ) 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 2 #" (" 0 0 14 3 11 #"stream-take" 0 0 24 3 1 #" " 0 0 14 3 1 #"s" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 15 3 4 #"cond" 0 0 24 3 3 #" ((" 0 0 14 3 5 #"zero?" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 2 #") " 0 0 21 3 1 #"'" 0 0 24 3 3 #"())" 0 0 24 29 1 #"\n" 0 0 24 3 10 #" ((" 0 0 14 3 13 #"stream-empty?" 0 0 24 3 1 #" " 0 0 14 3 1 #"s" 0 0 24 3 2 #") " 0 0 21 3 1 #"'" 0 0 24 3 3 #"())" 0 0 24 29 1 #"\n" 0 0 24 3 9 #" (" 0 0 14 3 4 #"else" 0 0 24 3 2 #" (" 0 0 14 3 4 #"cons" 0 0 24 3 2 #" (" 0 0 14 3 12 #"stream-first" 0 0 24 3 1 #" " 0 0 14 3 1 #"s" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 21 #" (" 0 0 14 3 11 #"stream-take" 0 0 24 3 2 #" (" 0 0 14 3 11 #"stream-rest" 0 0 24 3 1 #" " 0 0 14 3 1 #"s" 0 0 24 3 3 #") (" 0 0 14 3 1 #"-" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 1 #" " 0 0 21 3 1 #"1" 0 0 24 3 6 #"))))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 49 #";---------------------- Fluxuri definite explicit" 0 0 24 29 1 #"\n" 0 0 17 3 12 #";---naturals" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 1 #" " 0 0 14 3 8 #"naturals" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 15 3 3 #"let" 0 0 24 3 1 #" " 0 0 14 3 4 #"loop" 0 0 24 3 3 #" ((" 0 0 14 3 1 #"n" 0 0 24 3 1 #" " 0 0 21 3 1 #"0" 0 0 24 3 2 #"))" 0 0 24 29 1 #"\n" 0 0 24 3 5 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 2 #" (" 0 0 14 3 4 #"loop" 0 0 24 3 2 #" (" 0 0 14 3 4 #"add1" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 5 #")))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 9 #";naturals" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";(" 0 0 17 3 12 #"stream-first" 0 0 17 3 10 #" naturals)" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";(" 0 0 17 3 11 #"stream-take" 0 0 17 3 1 #" " 0 0 17 3 8 #"naturals" 0 0 17 3 4 #" 10)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 14 #";---factorials" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 1 #" " 0 0 14 3 10 #"factorials" 0 0 24 3 11 #" " 0 0 17 3 46 (9 46 ; n = numărul cu care urmează să înmulțim ) 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 15 3 3 #"let" 0 0 24 3 1 #" " 0 0 14 3 4 #"loop" 0 0 24 3 3 #" ((" 0 0 14 3 1 #"n" 0 0 24 3 1 #" " 0 0 21 3 1 #"1" 0 0 24 3 3 #") (" 0 0 14 3 4 #"fact" 0 0 24 3 1 #" " 0 0 21 3 1 #"1" 0 0 24 3 3 #")) " 0 0 17 3 27 #"; fact = factorialul curent" 0 0 24 29 1 #"\n" 0 0 24 3 5 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 3 1 #" " 0 0 14 3 4 #"fact" 0 0 24 3 2 #" (" 0 0 14 3 4 #"loop" 0 0 24 3 2 #" (" 0 0 14 3 4 #"add1" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 3 #") (" 0 0 14 3 1 #"*" 0 0 24 3 1 #" " 0 0 14 3 1 #"n" 0 0 24 3 1 #" " 0 0 14 3 4 #"fact" 0 0 24 3 5 #")))))" 0 0 24 29 1 #"\n" 0 0 17 3 98 (10 98 ;loop 1 1 -> 1 . loop 2 1 -> 1 . 1 . loop 3 2 -> 1 . 1 . 2 . loop 4 6 -> 1 . 1 . 2 . 6 . loop 5 24 ) 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 11 #";factorials" 0 0 24 29 1 #"\n" 0 0 17 3 28 #";(stream-take factorials 10)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 44 #";---fibonacci: 0 1 1 2 3 5 8 13 21 34 55 ..." 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 1 #" " 0 0 14 3 9 #"fibonacci" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 15 3 3 #"let" 0 0 24 3 1 #" " 0 0 14 3 4 #"loop" 0 0 24 3 3 #" ((" 0 0 14 3 1 #"a" 0 0 24 3 1 #" " 0 0 21 3 1 #"0" 0 0 24 3 3 #") (" 0 0 14 3 1 #"b" 0 0 24 3 1 #" " 0 0 21 3 1 #"1" 0 0 24 3 2 #"))" 0 0 24 29 1 #"\n" 0 0 24 3 5 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 3 1 #" " 0 0 14 3 1 #"a" 0 0 24 29 1 #"\n" 0 0 24 3 18 #" (" 0 0 14 3 4 #"loop" 0 0 24 3 1 #" " 0 0 14 3 1 #"b" 0 0 24 3 2 #" (" 0 0 14 3 1 #"+" 0 0 24 3 1 #" " 0 0 14 3 1 #"a" 0 0 24 3 1 #" " 0 0 14 3 1 #"b" 0 0 24 3 5 #")))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";(" 0 0 17 3 11 #"stream-take" 0 0 17 3 1 #" " 0 0 17 3 9 #"fibonacci" 0 0 17 3 4 #" 10)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 49 #";---------------------- Fluxuri definite implicit" 0 0 24 29 1 #"\n" 0 0 17 3 8 #";---ones" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 1 #" " 0 0 14 3 4 #"ones" 0 0 24 3 2 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 3 1 #" " 0 0 21 3 1 #"1" 0 0 24 3 1 #" " 0 0 14 3 4 #"ones" 0 0 24 3 2 #"))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 5 #";ones" 0 0 24 29 1 #"\n" 0 0 17 3 22 #";(stream-take ones 10)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 12 #";---naturals" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 1 #" " 0 0 14 3 9 #"naturals-" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" " 0 0 21 3 1 #"0" 0 0 24 29 1 #"\n" 0 0 24 3 4 #" (" 0 0 14 3 15 #"stream-zip-with" 0 0 24 3 1 #" " 0 0 14 3 1 #"+" 0 0 24 29 1 #"\n" 0 0 24 3 20 #" " 0 0 14 3 4 #"ones" 0 0 24 29 1 #"\n" 0 0 24 3 20 #" " 0 0 14 3 9 #"naturals-" 0 0 24 3 3 #")))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 20 #";1 1 1 1 1 1 1 1 1 1" 0 0 24 29 1 #"\n" 0 0 17 3 3 #";0 " 0 0 24 29 1 #"\n" 0 0 17 3 21 #";--------------------" 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 1 #" " 0 0 14 3 10 #"naturals--" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" " 0 0 21 3 1 #"0" 0 0 24 29 1 #"\n" 0 0 24 3 4 #" (" 0 0 14 3 10 #"stream-map" 0 0 24 3 1 #" " 0 0 14 3 4 #"add1" 0 0 24 3 1 #" " 0 0 14 3 10 #"naturals--" 0 0 24 3 3 #")))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 10 #";naturals-" 0 0 24 29 1 #"\n" 0 0 17 3 28 #";(stream-take naturals-- 10)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 13 #";---fibonacci" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 1 #" " 0 0 14 3 10 #"fibonacci-" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" " 0 0 21 3 1 #"0" 0 0 24 29 1 #"\n" 0 0 24 3 4 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 29 1 #"\n" 0 0 24 3 4 #" " 0 0 21 3 1 #"1" 0 0 24 29 1 #"\n" 0 0 24 3 5 #" (" 0 0 14 3 15 #"stream-zip-with" 0 0 24 3 1 #" " 0 0 14 3 1 #"+" 0 0 24 29 1 #"\n" 0 0 24 3 21 #" " 0 0 14 3 10 #"fibonacci-" 0 0 24 29 1 #"\n" 0 0 24 3 22 #" (" 0 0 14 3 11 #"stream-rest" 0 0 24 3 1 #" " 0 0 14 3 9 #"fibonacci" 0 0 24 3 5 #")))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 11 #";fibonacci-" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";(" 0 0 17 3 4 #"time" 0 0 17 3 2 #" (" 0 0 17 3 4 #"drop" 0 0 17 3 2 #" (" 0 0 17 3 11 #"stream-take" 0 0 17 3 1 #" " 0 0 17 3 10 #"fibonacci-" 0 0 17 3 1 #" " 0 0 17 3 2 #"31" 0 0 17 3 2 #") " 0 0 17 3 4 #"30))" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";(" 0 0 17 3 11 #"stream-take" 0 0 17 3 1 #" " 0 0 17 3 10 #"fibonacci-" 0 0 17 3 4 #" 10)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 9 #";---evens" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 1 #" " 0 0 14 3 5 #"evens" 0 0 24 29 1 #"\n" 0 0 24 3 2 #" " 0 0 17 3 2 #";(" 0 0 17 3 10 #"stream-map" 0 0 17 3 2 #" (" 0 0 17 3 2 #"\316\273" 0 0 17 3 2 #" (" 0 0 17 3 1 #"x" 0 0 17 3 3 #") (" 0 0 17 3 1 #"*" 0 0 17 3 1 #" " 0 0 17 3 1 #"2" 0 0 17 3 1 #" " 0 0 17 3 1 #"x" 0 0 17 3 3 #")) " 0 0 17 3 10 #"naturals))" 0 0 17 3 7 #";cu map" 0 0 24 29 1 #"\n" 0 0 24 3 2 #" " 0 0 17 3 2 #";(" 0 0 17 3 13 #"stream-filter" 0 0 17 3 1 #" " 0 0 17 3 5 #"even?" 0 0 17 3 1 #" " 0 0 17 3 10 #"naturals))" 0 0 17 3 10 #";cu filter" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 15 #"stream-zip-with" 0 0 24 3 1 #" " 0 0 14 3 1 #"+" 0 0 24 3 1 #" " 0 0 14 3 8 #"naturals" 0 0 24 3 1 #" " 0 0 14 3 8 #"naturals" 0 0 24 3 2 #"))" 0 0 17 3 7 #";cu zip" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";(" 0 0 17 3 11 #"stream-take" 0 0 17 3 1 #" " 0 0 17 3 5 #"evens" 0 0 17 3 1 #" " 0 0 17 3 3 #"10)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 15 #";---powers-of-2" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 1 #" " 0 0 14 3 11 #"powers-of-2" 0 0 24 29 1 #"\n" 0 0 24 3 2 #" " 0 0 17 3 2 #";(" 0 0 17 3 10 #"stream-map" 0 0 17 3 2 #" (" 0 0 17 3 2 #"\316\273" 0 0 17 3 2 #" (" 0 0 17 3 1 #"x" 0 0 17 3 3 #") (" 0 0 17 3 4 #"expt" 0 0 17 3 1 #" " 0 0 17 3 1 #"2" 0 0 17 3 1 #" " 0 0 17 3 1 #"x" 0 0 17 3 3 #")) " 0 0 17 3 10 #"naturals))" 0 0 17 3 7 #";cu map" 0 0 24 29 1 #"\n" 0 0 24 3 2 #" " 0 0 17 3 2 #";(" 0 0 17 3 15 #"stream-zip-with" 0 0 17 3 1 #" " 0 0 17 3 4 #"expt" 0 0 17 3 2 #" (" 0 0 17 3 15 #"stream-zip-with" 0 0 17 3 1 #" " 0 0 17 3 1 #"+" 0 0 17 3 1 #" " 0 0 17 3 4 #"ones" 0 0 17 3 1 #" " 0 0 17 3 4 #"ones" 0 0 17 3 2 #") " 0 0 17 3 10 #"naturals))" 0 0 17 3 7 #";cu zip" 0 0 24 29 1 #"\n" 0 0 24 3 2 #" " 0 0 17 3 2 #";(" 0 0 17 3 11 #"stream-cons" 0 0 17 3 1 #" " 0 0 17 3 1 #"1" 0 0 17 3 2 #" (" 0 0 17 3 18 #"stream-map ((curry" 0 0 17 3 1 #" " 0 0 17 3 1 #"*" 0 0 17 3 2 #") " 0 0 17 3 1 #"2" 0 0 17 3 2 #") " 0 0 17 3 14 #"powers-of-2)))" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 3 1 #" " 0 0 21 3 1 #"1" 0 0 24 3 2 #" (" 0 0 14 3 15 #"stream-zip-with" 0 0 24 3 1 #" " 0 0 14 3 1 #"+" 0 0 24 3 1 #" " 0 0 14 3 11 #"powers-of-2" 0 0 24 3 1 #" " 0 0 14 3 11 #"powers-of-2" 0 0 24 3 3 #")))" 0 0 24 29 1 #"\n" 0 0 24 3 32 #" " 0 0 24 29 1 #"\n" 0 0 17 3 1 #";" 0 0 17 3 1 #"(" 0 0 17 3 11 #"stream-take" 0 0 17 3 1 #" " 0 0 17 3 11 #"powers-of-2" 0 0 17 3 1 #" " 0 0 17 3 3 #"10)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 8 #";---1/n!" 0 0 24 29 1 #"\n" 0 0 17 3 30 #";; \303\256n func\310\233ie de el \303\256nsu\310\231i" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 1 #" " 0 0 14 3 9 #"rev-facts" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" " 0 0 21 3 1 #"1" 0 0 24 29 1 #"\n" 0 0 24 3 4 #" (" 0 0 14 3 15 #"stream-zip-with" 0 0 24 3 1 #" " 0 0 14 3 1 #"/" 0 0 24 29 1 #"\n" 0 0 24 3 20 #" " 0 0 14 3 9 #"rev-facts" 0 0 24 29 1 #"\n" 0 0 24 3 21 #" (" 0 0 14 3 11 #"stream-rest" 0 0 24 3 1 #" " 0 0 14 3 8 #"naturals" 0 0 24 3 4 #"))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";1" 0 0 17 3 1 #" " 0 0 17 3 1 #"1" 0 0 17 3 1 #" " 0 8 10 17 4 #"1/2\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 17 3 1 #" " 0 8 10 17 4 #"1/6\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 17 3 1 #" " 0 8 10 17 5 #"1/24\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 17 3 1 #" " 0 8 10 17 6 #"1/120\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 17 3 1 #" " 0 8 10 17 6 #"1/720\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 17 3 1 #" " 0 8 10 17 7 #"1/5040\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 24 29 1 #"\n" 0 0 17 3 19 #";1 2 3 4 5 6 7" 0 0 24 29 1 #"\n" 0 0 17 3 25 #";------------------------" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";1" 0 0 17 3 1 #" " 0 8 10 17 4 #"1/2\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 17 3 1 #" " 0 8 10 17 4 #"1/6\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 17 3 1 #" " 0 8 10 17 5 #"1/24\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 17 3 1 #" " 0 8 10 17 6 #"1/120\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 17 3 1 #" " 0 8 10 17 6 #"1/720\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 17 3 1 #" " 0 8 10 17 7 #"1/5040\0" 3 #"#e\0" 6 #"mixed\0" 2 #"1\0" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";(" 0 0 17 3 11 #"stream-take" 0 0 17 3 1 #" " 0 0 17 3 9 #"rev-facts" 0 0 17 3 1 #" " 0 0 17 3 3 #"10)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 18 #";---sume par\310\233iale" 0 0 24 29 1 #"\n" 0 0 17 3 30 #";; \303\256n func\310\233ie de el \303\256nsu\310\231i" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 2 #" (" 0 0 14 3 9 #"part-sums" 0 0 24 3 1 #" " 0 0 14 3 1 #"s" 0 0 24 3 2 #") " 0 0 17 3 56 #"; ineficient pt c\304\203 (part-sums s) se calculeaz\304\203 din nou" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 3 1 #" " 0 0 21 3 2 #"0." 0 0 24 3 5 #" " 0 0 17 3 56 #"; (inclusiv por\310\233iunile deja calculate) de fiecare dat\304\203" 0 0 24 29 1 #"\n" 0 0 24 3 16 #" (" 0 0 14 3 15 #"stream-zip-with" 0 0 24 3 1 #" " 0 0 14 3 1 #"+" 0 0 24 29 1 #"\n" 0 0 24 3 32 #" " 0 0 14 3 1 #"s" 0 0 24 29 1 #"\n" 0 0 24 3 33 #" (" 0 0 14 3 9 #"part-sums" 0 0 24 3 1 #" " 0 0 14 3 1 #"s" 0 0 24 3 4 #"))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 71 (11 71 ;0 1 2 3 4 5 - fluxul căruia vrem să îi facem sumele parțiale ) 0 0 24 29 1 #"\n" 0 0 17 3 59 #";0 0 1 3 6 10 - suma de primele 0, 1, 2, 3... elemente" 0 0 24 29 1 #"\n" 0 0 17 3 17 #";----------------" 0 0 24 29 1 #"\n" 0 0 17 3 19 #";0 1 3 6 10 15 " 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 19 #"; pt a observa (in)" 0 0 17 3 11 #"eficien\310\233a:" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";(" 0 0 17 3 4 #"drop" 0 0 17 3 2 #" (" 0 0 17 3 13 #"stream-take (" 0 0 17 3 9 #"part-sums" 0 0 17 3 21 #" rev-facts) 500) 499)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 2 #" (" 0 0 14 3 10 #"part-sums-" 0 0 24 3 1 #" " 0 0 14 3 1 #"s" 0 0 24 3 2 #") " 0 0 17 3 10 #"; eficient" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 15 3 6 #"letrec" 0 0 24 3 3 #" ((" 0 0 14 3 4 #"sums" 0 0 24 3 2 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 3 1 #" " 0 0 21 3 2 #"0." 0 0 24 29 1 #"\n" 0 0 24 3 31 #" (" 0 0 14 3 15 #"stream-zip-with" 0 0 24 3 1 #" " 0 0 14 3 1 #"+" 0 0 24 29 1 #"\n" 0 0 24 3 47 #" " 0 0 14 3 1 #"s" 0 0 24 29 1 #"\n" 0 0 24 3 47 #" " 0 0 14 3 4 #"sums" 0 0 24 3 4 #"))))" 0 0 24 29 1 #"\n" 0 0 24 3 4 #" " 0 0 14 3 4 #"sums" 0 0 24 3 2 #"))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";(" 0 0 17 3 4 #"drop" 0 0 17 3 2 #" (" 0 0 17 3 13 #"stream-take (" 0 0 17 3 10 #"part-sums-" 0 0 17 3 21 #" rev-facts) 600) 599)" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 45 #";---------------------- Ciurul lui Eratostene" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 2 #" (" 0 0 14 3 5 #"sieve" 0 0 24 3 1 #" " 0 0 14 3 1 #"s" 0 0 24 3 1 #")" 0 0 24 29 1 #"\n" 0 0 24 3 3 #" (" 0 0 15 3 3 #"let" 0 0 24 3 3 #" ((" 0 0 14 3 1 #"p" 0 0 24 3 2 #" (" 0 0 14 3 12 #"stream-first" 0 0 24 3 1 #" " 0 0 14 3 1 #"s" 0 0 24 3 3 #")))" 0 0 24 29 1 #"\n" 0 0 24 3 5 #" (" 0 0 14 3 11 #"stream-cons" 0 0 24 29 1 #"\n" 0 0 24 3 5 #" " 0 0 14 3 1 #"p" 0 0 24 29 1 #"\n" 0 0 24 3 6 #" (" 0 0 14 3 5 #"sieve" 0 0 24 3 2 #" (" 0 0 14 3 13 #"stream-filter" 0 0 24 3 2 #" (" 0 0 15 3 2 #"\316\273" 0 0 24 3 2 #" (" 0 0 14 3 2 #"nr" 0 0 24 3 3 #") (" 0 0 14 3 1 #">" 0 0 24 3 2 #" (" 0 0 14 3 6 #"modulo" 0 0 24 3 1 #" " 0 0 14 3 2 #"nr" 0 0 24 3 1 #" " 0 0 14 3 1 #"p" 0 0 24 3 2 #") " 0 0 21 3 1 #"0" 0 0 24 3 2 #"))" 0 0 24 29 1 #"\n" 0 0 24 3 28 #" (" 0 0 14 3 11 #"stream-rest" 0 0 24 3 1 #" " 0 0 14 3 1 #"s" 0 0 24 3 6 #"))))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 24 3 1 #"(" 0 0 15 3 6 #"define" 0 0 24 3 1 #" " 0 0 14 3 6 #"primes" 0 0 24 3 2 #" (" 0 0 14 3 5 #"sieve" 0 0 24 3 2 #" (" 0 0 14 3 11 #"stream-rest" 0 0 24 3 2 #" (" 0 0 14 3 11 #"stream-rest" 0 0 24 3 1 #" " 0 0 14 3 8 #"naturals" 0 0 24 3 4 #"))))" 0 0 24 29 1 #"\n" 0 0 24 29 1 #"\n" 0 0 17 3 2 #";(" 0 0 17 3 11 #"stream-take" 0 0 17 3 1 #" " 0 0 17 3 6 #"primes" 0 0 17 3 1 #" " 0 0 17 3 3 #"20)" 0 0