2024-04-07 16:09:58 -04:00
|
|
|
<> (explode ?*) (str (?*))
|
|
|
|
|
<> (reverse (str (?h ?t))) (reverse/l ?t (?h))
|
|
|
|
|
<> (reverse (str (?h))) (?h)
|
|
|
|
|
<> (reverse/l (?h ?t) ?l) (reverse/l ?t (?h ?l))
|
|
|
|
|
<> (reverse/l (?h) ?l) (str (?h ?l))
|
|
|
|
|
<> (implode str ?*) (?*)
|
2024-04-07 19:16:33 -04:00
|
|
|
<> ((read)) (?:)
|
2024-04-07 19:26:53 -04:00
|
|
|
<> (empty-register) (?x)
|
|
|
|
|
<> (explode ?*) (str (?*))
|
2024-04-07 19:34:29 -04:00
|
|
|
<> (eq ?x ?x) (#t)
|
|
|
|
|
<> (eq ?x ?y) (#f)
|
2024-04-04 20:15:16 -04:00
|
|
|
|
2024-04-07 19:34:29 -04:00
|
|
|
(implode reverse (explode hello)) (read) (explode hello) empty-register (eq abc abc) (eq abc def)
|
