39点版無気力ピラミッド

Pyramid Quineの解答出ましたね。私に大いなる絶望を感じさせてくれたOCaml版は、当然ながら、挫折しました。解答例17点は私には絶対に思いつきません、例え人生の終焉まで考え込んだとしても無理です。人間にはやっぱり不可能があるんですね！

というわけで、今回の挫折を記念する意味として、OCaml39点版無気力ピラミッドを掲載しておきます。短くしようとする努力さえ完全に無駄と思える無気力っぷり溢れるコードです。

                                      (
                                     let
                                    x = "
                                   0000000
                                  000000000
                                 00000000000
                                0000000000000
                               000000000000000
                              00000000000000000
                             0000000000000000000
                            000000000000000000000
                           00000000000000000000000
                          0000000000000000000000000
                         000000000000000000000000000
                        00000000000000000000000000000
                       0000000000000000000000000000000
                      000000000000000000000000000000000
                     00000000000000000000000000000000000
                    0000000000000000000000000000000000000
                   000000000000000000000000000000000000000
                  00000000000000000000000000000000000000000
                 0000000000000000000000000000000000000000000
                000000000000000000000000000000000000000000"in
               (fun a b c d e f g h i j k m o p             ->
              Printf.printf"%                               39s
             %                                               27s
            %                             29s%s%s\n  %s\n  %s\n%\
           s\n   %s\n      %s\n   %s\n      %s\n %         s\n%69\
          S%d\n      %S%d\n     %S%d\n    %S%d\n   %S% d\n  %  S\n\
         \ %  S\n%S %d)"  "(" "let"                        "x = \""x
        "\"in" a c e g i k m o a 0 c 0 e 0 g 0 i 0 k   m   o       0)
       "             (fun a b c d e f g h i j k m o p             ->"0
      "            Printf.printf\"%                               39s"0
     "             %                                               27s"0
    "         %                             29s%s%s\\n  %s\\n  %s\\n%\\"0
   "     s\\n   %s\\n      %s\\n   %s\\n      %s\\n %         s\\n%69\\" 0
  "       S%d\\n      %S%d\\n     %S%d\\n    %S%d\\n   %S% d\\n  %  S\\n\\"
 "   \\ %  S\\n%S %d)\"  \"(\" \"let\"                        \"x = \\\"\"x"
"       \"\\\"in\" a c e g i k m o a 0 c 0 e 0 g 0 i 0 k   m   o       0)" 0)

ちなみに0の数は気分で適当に決めました。内容について色々疑問に思うところがありますが、人生に無駄は付きものではないでしょうか。ポジティブに考えれば、ピラミッドは大き方が立派で見た目もいいよね、なんて。遠目で見たらなんか飛行機みたいでカッコ良くない？