Code & Deploy
Code
Models
Repos
Sign in
@matheusbsbs
/
matheus-bagliano
matheus-bagliano
/
t
/
t4034
/
scheme
/
post
Code
Commits
Pulls
CI/CD
82,037
test
bisect
jch
maint
master
next
seen
test
todo
text
7 lines
242 Bytes
Copy permalink
Copy
Raw
1
(define (my-func first second)
2
; This is a (moderately) cool function.
3
(that\place (+ 3 4))
4
(define |a \greeting| |hello there|)
5
({(([(func-n)]))})
6
(let ((c (add1 first)))
7
(format "one more than the total is %d" (+ c second))))