整列済みの number のリストがある。 '(1 3 4 5 6 12 13 15) このようなリストで数が連続している部分は '(1 2 3) -> '(1 . 3) のように両端のみを書くような記法を導入する。 最初の例のリストであれば以下のようになる。 '(1 (3 . 6) (12 . 13) 15) このようなリストの変換をするコードを書きたい。 自分の答えは↓だが、いまいちスマートではない。もっとかっこいいのを思いついたら教えてください。 (define (compact-number-list lst) (define (exact-next-number? a b) (cond [(and (number? a) (number? b)) (= (- b a) 1)] [(and (pair? a) (number? b)) (exact-next-number? (cd
久々に優雅な時間を過ごしました。もう少し縮みますけど見た目を優先した面もあり。 http://ja.doukaku.org/comment/7271/ まめさんの偉業を見てから二大チューリング完全言語の共演を見たかったのでした。 Symbolic Polyglot Quine とかもできるだろうけど大変そうだなぁ。 Ruby の syntax highlight $/=' ';%#;$/=~('(?{'.(', =$ )'^'_@|_ @||').'$&`,'.('/-).+`&/-'^'__@@_@@@_').'<>})');"#;(___=->(_,*__){$.=/./=~_ $><<([*?`...$&][$.]&&[*$&...?{][$.]?[*?@..$&][~(/@./=~[*$/..?@]*''+_)]+$':_) __[$.]&&___[*__]})[*[*$<]]#"
Wayang88 : Profil Perusahaan Kasino Online Terkemuka 2024 Selamat datang di Wayang88, sebuah nama yang telah menjadi simbol kepercayaan dan hiburan berkualitas tinggi di dunia kasino online. Berdiri sejak tahun 2019 dan berpusat di Filipina, Wayang88 slot telah mengukir namanya sebagai destinasi utama bagi para penggemar kasino online di Indonesia. Dengan lisensi dan regulasi dari Philippine Amuse
ここからが本題です。 Perl は頭がおかしいです。すごすぎる。この感動を伝えたいと思います。まず Perl の基本からです。 Hello world! を書きましょう。 ''=~('(?{'.('[[).[|`%,,/`[/[@$'^'+)@@/^(@@@@@,@),@').'! "})')えーと。このくらいわかりますよね。これは Hello world という一番簡単なプログラムなのでわからない人はちょっとプログラムの才能が無いです。嘘ですが。 Perl では記号だけでは出力もできないかな、というような話をしていたところ、 Acme::EyeDrops の出力は記号だけで出力してるぞ、ということでした。これは見たことがあったのですが、確かに今見ると記号だけです。で、これの出力の意味を理解してたんですが、なんともすごいものでした。書いてから後で Perl ヤロウどものことだから既に常識だ
というわけで、 StackError 記号だと0H10Bが最小？ 全てだと6B (これは使っていい関数なのか？) 無限ループ 記号でメモリ食いはk.inaba氏の0H10B 記号でメモリ食わずはk.inaba氏の3H?B 私が考えてたメモリ食わずは、(" ".."_").all?{|_|_[/./]=$/} なループ変数を勝手に書き換えるものでしたが、最初から進まないのがあるのには気づかなかった… quine 結局0H56Bまで縮んだ。 mameは0H0Bが最小だといっている。 無限ループは id:shinichiro_h:20061030#1162211956 はまあこんな感じでしょう。 いろいろ考えててふと思いついたのだが 「stack level too deep (SystemStackError)」 このエラーを発生させるコードを書くというお題は面白いかも。 記号ゴルフ・通常ゴル
Topcoder is a pioneer in crowdsourcing, with 20+ years of experience, and 325,000+ successful challenges in software development, data science/AI, UX design, and QA. Talk to an expert Topcoder is a pioneer in crowdsourcing, with 20+ years of experience, and 325,000+ successful challenges in software development, data science/AI, UX design, and QA. Talk to an expert Revolutionize How You Get Work D
Collection of golfed binaries. I defined hello world program should produce "Hello, world!\n". 58B hello for x86 linux ELF hello_linux_elf_x86.out . Created by kik. You may need to run the following command to run this program. sudo sh -c 'echo 0 > /proc/sys/vm/mmap_min_addr' 63B hello for x86 linux a.out hello_linux_aout_x86.out . Created by me . 104B hello for x86-64 linux ELF hello_linux_elf_x6
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Amazon.co.jp: Short Coding ~職人達の技法~: Ozy (著), やねうらお (読み手), やねうらお (監修): 本