fortran66のブログ

fortran について書きます。

2012-12-02から1日間の記事一覧

しつこく自己記述プログラム

マルチ・ステートメント版 character(51)::f="('character(51)::f=',a1,a,a1';print f,34,f,34;end')";print f,34,f,34;end 改行版 character(53)::f="('character(53)::f=',a1,a,a1/'print f,34,f,34'/'end')" print f,34,f,34 end