diff options
author | EuAndreh <eu@euandre.org> | 2024-11-17 19:49:05 -0300 |
---|---|---|
committer | EuAndreh <eu@euandre.org> | 2024-11-17 19:49:05 -0300 |
commit | 08c9bcb3fed37d9483258bd97aaebc47b54b3fa3 (patch) | |
tree | 7b114f79c44d347a5ecd1082943d2ba8c95dac5c /v2/src/content/pt/pastebin/exercicios-sicp-e-19.md | |
parent | mv src/content/styles.css src/content/style.css (diff) | |
download | euandre.org-08c9bcb3fed37d9483258bd97aaebc47b54b3fa3.tar.gz euandre.org-08c9bcb3fed37d9483258bd97aaebc47b54b3fa3.tar.xz |
rm -rf v2/
Diffstat (limited to 'v2/src/content/pt/pastebin/exercicios-sicp-e-19.md')
-rw-r--r-- | v2/src/content/pt/pastebin/exercicios-sicp-e-19.md | 105 |
1 files changed, 0 insertions, 105 deletions
diff --git a/v2/src/content/pt/pastebin/exercicios-sicp-e-19.md b/v2/src/content/pt/pastebin/exercicios-sicp-e-19.md deleted file mode 100644 index 89dacfd..0000000 --- a/v2/src/content/pt/pastebin/exercicios-sicp-e-19.md +++ /dev/null @@ -1,105 +0,0 @@ ---- - -title: SICP exercise 3.19 - -date: 2021-09-02 - -categories: lisp programming-languages - ---- - -Some content here, before: - -```scheme -(define (cycle? l) - (define (rec l x) - (cond - ((null? x) false) - ((eq? l x) true) - (true (rec l (cdr x))))) - (rec l (cdr l))) -``` - -Sample interactive session: - -```scheme -scheme@(guile-user)> (define true #t) -scheme@(guile-user)> (define false #f) -scheme@(guile-user)> -(define (cycle? l) - (define (rec l x) - (cond - ((null? x) false) - ((eq? l x) true) - (true (rec l (cdr x))))) - (rec l (cdr l))) -scheme@(guile-user)> (cycle? '(1 2 3)) -$9 = #f -scheme@(guile-user)> (cycle? (make-cycle '(1 2 3))) -$10 = #t -``` - -# An h1 - -a list: - -1. one -2. two -3. three - -some content. - -- item -- another -- yet another - -## An h2 - -Xablau: - -``` xupliu 1 - -3 4 - - - - - -dez ``` - -Foi `wikiwiu`. - -a very long code block: - -``` -wef -wef wef wef wef -wef wef wef wef we fwef wef wef wef wef -``` - -Someone said: - -> Xablau, xupliu. - -### A repeated header ### A repeated header - -a big list: - -1. a -1. a -1. a -1. a -1. a -1. a -1. a -1. a -1. a -1. a -1. a -1. a -1. a -1. a -1. a -1. a -1. a -1. a |