diff options
Diffstat (limited to 'net/ricketyspace/sicp/one/five.scm')
| -rw-r--r-- | net/ricketyspace/sicp/one/five.scm | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/net/ricketyspace/sicp/one/five.scm b/net/ricketyspace/sicp/one/five.scm new file mode 100644 index 0000000..f387919 --- /dev/null +++ b/net/ricketyspace/sicp/one/five.scm @@ -0,0 +1,13 @@ +;;; Under Creative Commons Attribution-ShareAlike 4.0 +;;; International. See +;;; <https://creativecommons.org/licenses/by-sa/4.0/>. + +(define-module (net ricketyspace sicp one five) + #:export (p test)) + +(define (p) (p)) + +(define (test x y) + (if (= x 0) + 0 + y)) |