fortran66のブログ

fortran について書きます。

FORTRAN77

FORTRAN77での実引数の扱い

FORTRAN77 での再帰を使ったプログラムで気になるは、引数が参照渡しになっていることです。局所変数は、みな AUTOMATIC 変数として呼び出しごとに確保されるからよいわけですが、引数が参照渡しである場合、呼び出しの深さに関わらず実引数の内容が書き換え…

77 での再帰 QuickSort を昔の処理系で

MS-FORTRAN Ver.5.1 オプション指定に Automatic 変数が見当たりませんが、とりあえず動きます。症状からするとコンパイラの default が 77 規格通りに Automatic になっている模様。マニュアルを見れば調べられますが、段ボールの奥底に眠っているので略。 …

FORTRAN77で再帰を使ってQUICK SORT

たまたま面白いサイトに出くわしました。本来再帰が許されていない FORTRAN77 で、シンタックスエラーを出さず、違法と合法のスレスレで再帰を実現する方法を発見した方がおられました。 http://www.esm.psu.edu/~ajm138/fortranexamples.html自分自身を関数…

再帰を使わない quick sort

再帰を使わない Quicksort を書いてみたのですが、ついでなのでFORTRAN77 に書き直してみました。再帰を使わない分、作業領域として入力配列とほぼ同じ長さの作業配列が3本使っています。再帰を使っていないので大幅にスピードアップしました。また、同じ再…