application/octet-stream
•
4.39 KB
•
111 lines
["1.1" [string/write 1.1]]
["1.01" [string/write 1.01]]
["1.001" [string/write 1.001]]
["1.0001" [string/write 1.0001]]
["10.1" [string/write 10.1]]
["10.01" [string/write 10.01]]
["10.001" [string/write 10.001]]
["10.0001" [string/write 10.0001]]
["100.1" [string/write 100.1]]
["100.01" [string/write 100.01]]
["100.001" [string/write 100.001]]
["100.0001" [string/write 100.0001]]
["1000.1" [string/write 1000.1]]
["1000.01" [string/write 1000.01]]
["1000.001" [string/write 1000.001]]
["1000.0001" [string/write 1000.0001]]
["10000.1" [string/write 10000.1]]
["10000.01" [string/write 10000.01]]
["10000.001" [string/write 10000.001]]
["10000.0001" [string/write 10000.0001]]
["100000.1" [string/write 100000.1]]
["100000.01" [string/write 100000.01]]
["40004.40004" [string/write [* 4 10001.10001]]]
["30003.30003" [string/write [* 3 10001.10001]]]
["20002.20002" [string/write [* 2 10001.10001]]]
["50004201.04706" [string/write [+ 50004201 0.04706]]]
["504201.91003" [string/write [+ 504201 0.91003]]]
["-900200.01003" [string/write -900200.01003]]
["-900000.00001" [string/write -900000.00001]]
["109234.00012" [string/write 109234.00012]]
["102005" [string/write 102005]]
["-100295" [string/write -100295]]
[" 1" [string/pad-start "1" 4]]
["0001" [string/pad-start "1" 4 "0"]]
["asd1" [string/pad-start "1" 4 "asdasd"]]
["1 " [string/pad-end "1" 4]]
["1000" [string/pad-end "1" 4 "0"]]
["1asd" [string/pad-end "1" 4 "asdasd"]]
[" 1 " [string/pad-middle "1" 4]]
["0100" [string/pad-middle "1" 4 "0"]]
["d1as" [string/pad-middle "1" 4 "asdasd"]]
["asd1asd" [string/pad-middle "1" 7 "asd"]]
["[quote . 123]" [string/write [cons 'quote 123]]]
["[quote . asd]" [string/write [cons 'quote 'asd]]]
["[quote . asd]" [string/write [cons 'quote 'asd]]]
["0" [int->string 0]]
["123" [int->string 123]]
["999" [int->string/decimal 999]]
["0" [int->string/binary 0]]
["1100" [int->string/binary 12]]
["1010" [int->string/binary 10]]
["1001" [int->string/binary 9]]
["100000000" [int->string/binary 256]]
["0" [int->string/octal 0]]
["17" [int->string/octal 15]]
["36" [int->string/octal 30]]
["400" [int->string/octal 256]]
["1000" [int->string/hex 4096]]
["100" [int->string/hex 256]]
["FF" [int->string/HEX 255]]
["ff" [int->string/hex 255]]
["1F" [int->string/HEX 31]]
["0" [int->string/hex 0]]
["0.1" [string/write 0.1]]
["0.02" [string/write 0.02]]
["0.003" [string/write 0.003]]
["0.01234" [string/write 0.01234]]
["0.1" [string/write [car [read "0.1"]]]]
["0.1001" [string/write [car [read "0.1001"]]]]
["0.913" [string/write [car [read "0.913"]]]]
["0.00012" [string/write [car [read "0.00012"]]]]
["[1 . 2]" [string/write [cons 1 2]]]
["[1 2]" [string/write [cons 1 '[2]]]]
["[123]" [string/write '[123]]]
["[1 2 3]" [string/write '[1 2 3]]]
["[1 2 . 3]" [string/write '[1 2 . 3]]]
["[1 2 . 3]" [string/write [cons 1 [cons 2 3]]]]
["[1 2.0 3 1 2.0 3]" [string/write [append '[1 2.0 3] '[1 2.0 3]]]]
["[2.0]" [string/write [filter '[1 2.0 #t 4] float?]]]
["[2.0]" [string/write [filter '[1 2.0 #t 4] float?]]]
["2.7" [string/write [+ [- 1 -1.0] [- 5 1.1 1] [- 1 1.1 1] [- 1 1.1 [read/int "1"]]]]]
["[1]" [string/write [cons 1 #nil]]]
["11.6" [string/write [+ [+ 1.1 2.2] [+ 1.1 3] [+ 1 3.2]]]]
["20.1" [string/write [+ [+ 1.1 3] [+ 1 3.3] [+ 3.3 4.1 4.3]]]]
["15.54" [string/write [+ [+ [* 3.2 3.2] [- [- [- 5.5 1.1] 1] 1.1]] [/ 9.9 3.3]]]]
["0.7" [string/write [rem 10 3.1]]]
["11.7" [string/write [+ [+ [+ 1.1 2.2] [+ 1.1 3]] [+ 1 3.3]]]]
["11.75" [string/write [+ [float 10] [read/int "10"] [read/float "-8.25"]]]]
["30.3" [string/write [+ [abs [read/int "-10"]] [int 8.2] 12.3]]]
["3.1" [string/write [+ 1 2.1]]]
["2.1" [string/write [* 1 2.1]]]
["3.33333" [string/write [+ 1.11111 2.22222]]]
[":testerle" [string/write :testerle]]
["[1.0 2.0 3.0]" [string/write [map [split "1,2,3" ","] read/float]]]
["do" [string/write 'do]]
["[123]" [string/write '[123]]]
["[123 #t]" [string/write '[123 #t]]]
["[123 'do]" [string/write '[123 'do]]]
["[123 \"asd\"]" [string/write '[123 "asd"]]]
["[123 #nil]" [string/write '[123 #nil]]]
['[123 #nil] '[123 #nil]]
["#@[asd: 123]" [string/write [tree/new asd: 123]]]
["#@[asd: 123]" [string/write @[asd: 123]]]
["[#nil]" [string/write '[]]]
["[#nil]" [string/write '[#nil]]]
["[#nil]" [string/write [cons #nil #nil]]]
["[#nil #nil]" [string/write '[#nil #nil]]]
["[and #nil #nil]" [string/write '[and #nil #nil]]]
["10.1" [string/write #d10.1]]
["-10.1" [string/write #d-10.1]]
["[a . b]" [string/write [cons 'a 'b]]]
