FORTRAN と格闘した話

Transcript

1. FORTRANと格闘した話 2026/3/21（土）＠伊勢IT交流会 森ソフト 森純一
2. 誰？ • 森ソフト 代表 森純一 https://www.mori-soft.com • 三重県伊勢市にいるプログラマー（個人事業主）です • スマホのアプリ開発（Java, Flutter） • 業務システム開発（Excel, Access, SQL Server） 2
3. FORTRAN って知ってますか？ • 昔々からあるプログラミング言語 • 50代より上の方は、授業でやった人もいるかもしれません • 数値計算の分野で使われてました（使われています？） • 分野によってはいまでも現役 • 言語仕様も進化してる • FORTRAN77, Fortran90, 95, 2003, 2008, 2018, 2023, ・・・ 3
4. 試したい人向け：VSCode でも使えます • コンパイラ • gfortran: GNU、無償 • ifx (旧 intel fortran)、無償版もある • その他有償のコンパイラ • おすすめの拡張機能 • Modern Fortran • fortls • findent • ブログにもまとめてます https://blog.mori-soft.com/entry/2025/12/12/172608 4
5. Fortran 90 以降へリファクタリング • FORTRAN77 以前は固定形式 • 一行72文字 • コードは7文字目から • 長いものは次の行の6文字目に文字を入れる • コメントは1文字目に『C』をタイプ • 古のパンチカード時代の名残 • Fortran90 以降 • 自由形式, 行長の制限なし • コメントも自由に入れらる • 言語としても大きく変化：廃止機能多数、新機能多数 5
6. はまりポイント • リファクタリングをやって、気になった点をいくつか話します • FORTRAN にめっちゃ詳しいというわけでもないので間違いが あったときはご容赦ください • 何かに活用するならご自分でも調べてくださいね • すべて、私の主観なのでその点はご了承ください 6
7. 暗黙の変数 • 変数の型が暗黙的に決まる • I, J, K, L, M, N で始まる変数→整数型 • A－H, O-Z で始まる変数→実数型 • 変数だけじゃなく関数の戻り値の型もこれに従う • Fortran 90 以降だとこれを無効にできる • implicit none という宣言を追加 • すべての変数（と関数）にあとから型を追加する必要がある • 数が多いと大変 7
8. サブルーチンと関数 • 戻り値のないものがサブルーチン、戻り値があるのが関数 • 引数がすべて参照渡し • 引数の型, 個数, 戻り値がチェックされない • サブルーチンを呼ぶとき • CALL Sub1() • でも、 x = Sub1() としても呼べてしまう 8
9. サブルーチンを関数として呼び出す 実行結果：これなに？ こういうプログラムがあります 9
10. 勝手にstatic変数 • 定数：PARAMETERとすると定数になる • 定数にすると、自動的にstatic（SAVE属性）になる • 初期化：DATA文というので値を設定 • 初期化すると、自動的にstatic（SAVE属性）になる 10
11. 共有メモリブロック • 共有メモリブロック • COMMON文というので名前を付けて宣言 • そのメモリブロックに含まれる変数を記述 • 複数のサブルーチン・関数で同じブロック名を宣言するとメモリが共 有される • グルーバル変数的な扱い • COMMONブロックの宣言 • 関数ごとに（同じCOMMONブロックであっても）変数名が違ってOK • 変数名だけではなく、型も違ってよい • 全体のサイズは一致する必要がある • 怖い 11
12. 閑話休題：FORTRAN と Fortran • FORTRAN77 以前のものを指すことが多い • 固定形式, 72 カラム制限, ・・・ • Fortran90以降のものを指すことが多い • 自由形式, コメント位置が自由, ・・・ • 決まりというよりは慣習 12
13. 温故知新 • VBA 触ってるときの文法上の決まり • 似たような書き方がある • sub/functionの区別 • functionの戻り値は関数名に値を代入 • etc • たぶん、古からの流れ • メモリとかを意識する • 今の言語がいかにハードウェアに近い層を意識しなくてよいかを痛感 • たまには昔からの言語を触るのもよいですね 13
14. 以上