72桁の呪縛から解き放たれよ：モダンFortranへの「令和的」移行ガイド
こんにちは。宇宙開発の現場で数十年にわたり、数百万行のスパゲッティコードと格闘してきた、元・数値計算アーキテクトです。
これからFortranを始める皆さんは、きっとCやPythonといった「柔軟でモダンな言語」の経験があることでしょう。そんな皆さんが古いFortranのコードに出会ったとき、最初にぶつかる壁が「72桁制限」という名の古代遺跡です。
今日は、この「固定形式（Fixed Form）」と「自由形式（Free Form）」の決定的な違い、そして泥臭い現場で培った「安全かつ劇的な移行戦略」について、魂を込めてお話しします。
—
1. なぜ「72桁」なのか？：歴史という名の制約
まず、古き良きFortran 77（固定形式）の姿を想像してみてください。なぜ「72桁」なのか。それは、当時のパンチカード（穴あけカード）の物理的な限界だったからです。
- 1〜5桁目: 文番号（goto文で使うラベル）
- 6桁目: 継続行の指定（ここに何か書くと、「前の行の続きだ」と認識される）
- 7〜72桁: 本文
- 73〜80桁: コメントやID（無視される）
現代のディスプレイでは信じられないかもしれませんが、この「カラム（列）位置」がすべてを支配していました。もし、うっかり73桁目にコードを書こうものなら、コンパイラはそれを無視し、計算結果は地獄へ直行です。
2. 自由形式（Free Form）へのシフト：現代の書き方
モダンFortran（Fortran 90以降）では、こうした制約は完全に撤廃されました。今の主流である「自由形式」では、以下のルールが適用されます。
- カラム位置は関係ない: インデント（字下げ）が自由に使えます。コードの可読性が劇的に向上します。
- 行の末尾に `&` を置く: これが継続行の合図です。
- セミコロン `;` で区切る: 1行に複数の命令を書けます（あまり推奨しませんが）。
比較コード：固定形式 vs 自由形式
! — 固定形式 (旧態依然としたスタイル) —
PROGRAM TEST
A = 1.0
B = 2.0
C = A + B
STOP
END
! — 自由形式 (モダンなスタイル) —
program test_modern
implicit none ! 変数の宣言を強制する（これがないとバグの温床になります！）
real :: a, b, c
a = 1.0
b = 2.0
c = a + b
print , “計算結果は: “, c
end program test_modern
3. 泥臭い移行戦略：コンパイラを味方につける
既存の古い資産をモダンなプロジェクトに持ち込む際、一気に書き換えるのは自殺行為です。まずはコンパイラに「ソース形式の判別」を任せましょう。
コンパイラフラグの活用
多くのコンパイラ（gfortran, ifort/ifxなど）は、ファイル拡張子で自動判別します。
- `.f` または `.for`: 固定形式として扱う
- `.f90` または `.f95`: 自由形式として扱う
しかし、現場では「中身は固定形式なのに拡張子が `.f90`」なんていうカオスな状況もザラです。そんな時は、コンパイラの明示的なフラグを使いましょう。
gfortranの場合:
明示的に固定形式としてコンパイル
gfortran -ffixed-form legacy_code.f90
明示的に自由形式としてコンパイル
gfortran -ffree-form modern_code.f90
現場の知恵：まずは「拡張子」から変える
移行の第一歩は、「まずはソースコードを1行も書き換えずに、拡張子を `.f90` に変えてみる」ことです。
その上で、コンパイラが「ここは文法エラーだ」と教えてくれる箇所（多くの場合、72桁目を超えている行や、不適切なインデント）を一つずつ修正していく。この「静的解析によるデバッグ」こそが、最も確実な移行ルートです。
4. 最後に：数値計算エンジニアへのエール
Fortranは、今の言語に比べれば無骨で厳しい言語かもしれません。しかし、コンパイラがメモリアクセスの最適化（SIMDベクトル化やメモリの局所性向上）を極限まで引き出せるよう設計された、「計算のための純粋な道具」です。
自由形式への移行は、単なる書き方の変更ではありません。それは、あなたのコードを「歴史の遺物」から「現代の計算リソースをフル活用する高性能な資産」へと進化させる儀式です。
まずは、`implicit none` を書いて、自由形式の世界に飛び込んでみてください。何か詰まったら、いつでも戻ってきてくださいね。応援しています！
コメント