[ "morse code 123" ] [
[MORSE
- __ ___ ._. ... . /
- _._. ___ _.. . /
+ __ ___ ._. ... . /
+ _._. ___ _.. . /
.____ ..___ ...__
MORSE] ] unit-test
-- --- .-. ... . /
-.-. --- -.. .
MORSE] ] [
- "morse code" >morse morse>
+ "morse code" >morse morse>
] unit-test
[ "factor rocks!" ] [
[MORSE
- ..-. .- -.-. - --- .-. /
+ ..-. .- -.-. - --- .-. /
.-. --- -.-. -.- ... -.-.--
MORSE] ] unit-test
! [ ] [ "sos" 0.075 play-as-morse* ] unit-test