Fortran Builder FAQ – よくある質問とその答え

◇ 32-bit Windows XP / Vista / 7

◇ 64-bit Windows Vista / 7

以上のバージョンに対応しています．

補足：
Fortran Builder は，
32-bit 環境では 32-bit アプリケーション（実行ファイル）を生成します．
64-bit 環境では 64-bit アプリケーション（実行ファイル）を生成します．
また 64-bit 環境で 32-bit アプリケーション（実行ファイル）を生成することもできます．

注意：
Fortran Builder は Windows XP の 64-bit 版には対応していません．

USB キーを破損／紛失した場合の再発行は，所定の料金をお支払いただき，１ライセンスに付き最大１回まで行うことが可能です．

再発行をご希望のお客様は，日本 NAG（株）までお気軽にお問い合わせください．

はい，以下のライセンス形態でのご利用も可能です．

◇ フローティングライセンス

◇ サイトライセンス

◇ ノードロックライセンス

上記のライセンス形態をご希望のお客様は，日本 NAG（株）までお気軽にお問い合わせください．

注意：
ノードロックライセンスは１ライセンスにつき特定の１台のマシンに対してのみ有効なテキストファイル形式のライセンスです．
ノードロックライセンスキーを発行した後にマシンの変更は行えませんので予めご了承ください．
従って，ご利用のマシンに USB ポートが無いなどの特別な理由がない限りは USB キーでのご利用をお勧めします．

Fortran Builder ではユーザープログラムをプロジェクトという単位で管理します．
プロジェクトには実行ファイルを作成するために必要な一連のファイル（ソースファイルやメイクファイル，またコンパイル後に作成されるオブジェクトファイルやモジュールファイルなど）が含まれます．

プロジェクトを作成することはワークフォルダを作成することに似ています．
プロジェクトを作成した後に，実行ファイルを作成するために必要なソースファイルをその中に追加して，プログラムをビルド（コンパイル／リンク）するイメージです．

補足：
Fortran Builder の基本的な使用手順は以下のようになります．

1.　新規にプロジェクトを作成する（または，既存のプロジェクトを開く）．

2.　新規の（または，既存の）ソースファイルをプロジェクトに追加する．

3.　ソースファイルを編集する（プログラムを書く）．

4.　ソースファイルをビルド（コンパイル／リンク）する．

※　ビルドに通らなかった場合は 3 に戻る．

5.　実行ファイルを実行する．

注意：
１つの実行ファイルに対して１つのプロジェクトが対応します．
従って，１つのプロジェクトに対して主プログラムが複数存在してはいけません．

プログラムが単一のソースファイルの場合は，プロジェクトを作成することなくソースファイルを新規作成する（または，既存のソースファイルを開く）ことで，そのままビルド／実行を行う事が可能です．
Fortran Builder では，この機能を「クイック実行」機能と呼んでいます．

Fortran Builder はプロジェクトを開いていない状態では常にこのクイック実行モードとなっています．
（これに対して，プロジェクトを開いている状態をプロジェクト実行モードと呼びます．）

クイック実行は単一のソースファイルに対しての機能となりますので，複数のソースファイルが開かれている場合は，編集エリアでアクティブになっているソースファイルがビルド／実行の対象となります．

実行ファイル（その他，メイクファイルやオブジェクトファイルなど実行ファイルを作成するために必要な一連のファイル）は，対象ソースファイルが置かれているフォルダに作成されます．

複数のソースファイルをビルド／実行する場合は，プロジェクトを作成する必要があります．

クイック実行については Fortran Builder ヘルプ「プロジェクトなしで実行する（クイック実行）」も併せてご参照ください．

これは１つのプロジェクトに対して複数の主プログラムが存在しているために出ているリンクエラーです．

１つの実行ファイルに対して１つのプロジェクトが対応します．
従って，１つのプロジェクトに対して主プログラムが複数存在してはいけません．

プログラムが実行中になっていませんか？
プログラムの編集／ビルド／実行は， 実行中のプログラムを終了させてから行ってください．

プログラムの終了は Fortran Builder メニュー「実行｜プログラムの終了」から行うことができます．

プロジェクトマネージャーの「依存ファイル」には Fortran プログラムから生成／利用される（プロジェクトフォルダに格納されている）モジュールファイル（*.mod）が表示されます．

また，C プログラムから生成／利用される（プロジェクトフォルダに格納されている）ヘッダーファイル（*.h）が表示されます．

「コンパイル 」は編集エリアでアクティブになっている単一のソースファイルを対象にコンパイルを行います．

「ビルド」はコンパイルとリンクを行います．
特に変更があったソースファイルのみをコンパイル対象とします．

※　オブジェクトファイルの無いまっさらな状態の場合は，すべてのソースファイルに対してコンパイル／リンクを行います．

※　すべてのソースファイルがコンパイル済みであり（つまり全てのオブジェクトファイルがある）かつソースファイルに変更がない場合は，リンクのみを行います．

※　すべてのソースファイルがコンパイル／リンク済みであり（つまり全てのオブジェクトファイルと実行ファイルがある）かつソースファイルに変更がない場合は，何も行いません．

「リビルド」はクリーンとビルドを行います．
クリーンはオブジェクトファイルと実行ファイルを削除し，ビルド環境をソースファイルのみの状態に戻します．
従って，すべてのソースファイルがビルドし直されます．

補足：
プログラムを機械語に翻訳して実行ファイルを作成するためには，以下の２つの独立したステップが必要になります．

1.　コンパイル

ソースプログラム（*.f90 など）を機械語に変換し，オブジェクトファイル（*.o）を生成します．

2.　リンク

複数のオブジェクトファイル（*.o）（および，外部ライブラリなど）を結合し，実行ファイル（*.exe）を生成します．

プログラムを「デバッグ実行」すると，裏でデバッガが起動し，ブレークポイントを設定した箇所でプログラムの実行が一時停止します．
そして，その時点での変数の値の確認／変更やその後のステップ／トレース実行が行えるようになります．
また，ブレークポイントでプログラムが一時停止した状態から再度「デバッグ実行」を行うと，次のブレークポイントまで実行が行われ一時停止します．

それに対して「実行」は，ブレークポイントを設定した箇所でプログラムの実行を中断することなく，プログラムを通常通り実行するものです．

補足：
ブレークポイントとはプログラムの実行を一時停止する場所を示すものです．
ブレークポイントを設定するには設定したい行の左端をクリックしてください．
同様に，ブレークポイントを解除するには解除したい行の左端をクリックしてください．

「ステップ実行」と「トレース実行」は，デバッグ実行時にプログラムが一時停止した状態からプログラムを１行ずつ実行します．
両者が異なるのは実行箇所が手続き（サブルーチン，関数）を呼び出している時です．
「ステップ実行」は手続きを処理した後に次の行で一時停止します．
「トレース実行」は手続きの中の１行目で一時停止します．

はい，可能です．
実行時引数は Fortran Builder メニュー「実行｜実行時引数」から設定することができます．

（設定例： 入出力リダイレクション）

< input.txt > output.txt

実行時引数の入力リダイレクションに存在していないファイルが指定されていませんか？
この場合，指定されたファイルが見付からないためにプログラムの実行自体が行われません．
Fortran Builder メニュー「実行｜実行時引数」の設定をご確認ください．

はい，可能です．
Alt キーを押しながら編集エリアをドラッグしてください．

プログラムの実行時診断（実行時エラー検出）機能を有効にするには，Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜Fortran コンパイラ｜実行時診断｜実行時診断オプション (-C=)」を設定してください．

「標準」はコンパイラオプション -C に相当し，「ダングリングポインタ (=dangling)」，「未定義の変数 (=undefined)」を除く全てのチェック項目が有効になります．

「全部」はコンパイラオプション -C=all に相当し，「未定義の変数 (=undefined)」を除く全てのチェック項目が有効になります．

「オプション選択」はコンパイラオプション -C=check に相当し，チェック項目（check ）を選択できます．

※　オプションの詳細は Fortran Builder ヘルプ「NAG Fortran Compiler, Release 5.3 マニュアル - 2.4 コンパイラオプション」をご参照ください．

Fortran Builder は検出された実行時エラーのメッセージをメッセージウィンドウに出力します．

補足：
Fortran 言語標準に従って検出される通常の実行時エラーは，上記オプションの指定に関係なく検出されます．

プログラムのメモリトレース（メモリリーク検出）機能を有効にするには，Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜Fortran コンパイラ｜実行時診断｜メモリトレースオプション (-mtrace=)」を設定してください．

「全て」はコンパイラオプション -mtrace=all に相当し，全ての詳細設定が有効になります．

「オプション選択」はコンパイラオプション -C=trace_opt_list に相当し，詳細設定（trace_opt_list ）を選択できます．

※　オプションの詳細は Fortran Builder ヘルプ「NAG Fortran Compiler, Release 5.3 マニュアル - 2.4 コンパイラオプション」をご参照ください．

「ファイル出力と IDE 表示」にチェックを入れますと，メモリトレースの結果がテキストファイル fbrmtrace.log に書き出され，編集エリアに表示されます（デフォルトでは標準出力へ出力されます）．

（メモリ診断の出力例）

 3 allocations
 No memory leaked

[Allocated item 1 (size 1025) = Z'2BB0010']
[Allocated item 2 (size 1025) = Z'2BB0430']
[Allocated item 3 (size 1025) = Z'2BB0850']
[Deallocated item 2 (size 1025, at Z'2BB0430')]
[Deallocated item 3 (size 1025, at Z'2BB0850')]
[Deallocated item 1 (size 1025, at Z'2BB0010')]

注意：
このオプションは「自動的ガーベージコレクションを有効にする (-gc)」オプション（コンパイラオプション -gc に相当）と互換性がありません． 両方のオプションにチェックが入っているとコンパイルエラーとなります．

プログラムの最適化は Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜基本設定｜最適化設定」を指定してください．
これはコンパイラオプション -On （n は最適化レベル 0 〜 4）に相当します．

Fortran Builder（NAG Fortran Compiler）はデフォルトでは「最適化なし」（-O0 に相当）が設定されています．

※　オプションの詳細は Fortran Builder ヘルプ「NAG Fortran Compiler, Release 5.3 マニュアル - 2.4 コンパイラオプション」をご参照ください．

はい，可能です．
Fortran Builder メニュー「ツール｜ソース整形の実行」をご利用ください．
Fortran Builder メニュー「ツール｜ソース整形の設定」で整形内容 （インデント幅や文番号の再設定など）を細かく指定できます．

ソース整形は編集エリアでアクティブになっているソースファイルが対象となります．
特に対象となるソースファイルが固定形式（拡張子が *.f, *.for 例えば abc.f）の場合は，整形結果として自由形式のソースファイル（拡張子が *.f95 例えば abc.f95）が別途作成されます（元の固定形式のソースファイル（例えば abc.f）はそのまま残ります）．

注意：
ソース整形は元のプログラムが Fortran Builder（NAG Fortran Compiler）でコンパイルに通るプログラムであること（つまり正しい Fortran のプログラムであること）が前提となります．

はい，ございます．
Fortran Builder メニュー「ツール｜ソース整形の実行」をご利用ください．
Fortran Builder メニュー「ツール｜ソース整形の設定」で整形内容 （インデント幅や文番号の再設定など）を細かく指定できます．

ソース整形は編集エリアでアクティブになっているソースファイルが対象となります．
特に対象となるソースファイルが固定形式（拡張子が *.f, *.for 例えば abc.f）の場合は，整形結果として自由形式のソースファイル（拡張子が *.f95 例えば abc.f95）が別途作成されます（元の固定形式のソースファイル（例えば abc.f）はそのまま残ります）．

注意：
ソース整形は元のプログラムが Fortran Builder（NAG Fortran Compiler）でコンパイルに通るプログラムであること（つまり正しい Fortran のプログラムであること）が前提となります．

コールグラフとは，コンピュータプログラムの手続き間の呼び出し関係を表現した有向グラフです．

Fortran Builder には「コールグラフの表示」機能が搭載されており，Fortran プログラム（主プログラム，外部副プログラム，モジュール）の手続き（サブルーチン，関数）間の呼び出し関係をテキストファイル nagfcalls.txt に出力します．
この機能は Fortran Builder メニュー「ツール｜コールグラフの表示」からご利用いただけます．

（コールグラフの出力例）

コールグラフ 2011年12月02日 15:31

    1: MAIN
    2:     SUB


コールグラフの索引

   行    手続
    1    MAIN
    2    SUB


呼び出しテーブル

  手続       呼び出し元
  SUB        MAIN

はい，コマンドラインからコンパイラ（NAG Fortran Compiler）を単体で使用することも可能です．

スタートメニュー「すべてのプログラム｜NAG｜Fortran Builder 5.3｜NAG Fortran コマンドプロンプト」からコンパイラにパスが通った状態でコマンドプロンプトを起動することができます．
また Fortran Builder メニュー「表示｜コマンドプロンプト」からコンパイラにパスが通った状態で（かつ，プロジェクトフォルダをカレントフォルダとした状態で）コマンドプロンプトを起動することができます．

◇ コンパイラの格納位置

[Fortran Builder インストールフォルダ]¥nagfor¥bin¥nagfor.exe

32-bit Windows 環境のデフォルトは，
C:¥Program Files¥NAG¥FBuilder 5.3¥nagfor¥bin¥nagfor.exe

64-bit Windows 環境のデフォルトは，
C:¥Program Files (x86)¥NAG¥FBuilder 5.3¥nagfor¥bin¥nagfor.exe

◇ 使用方法（コマンド）

nagfor [オプション] ... ファイル ...

※　詳細は Fortran Builder ヘルプ「NAG Fortran Compiler, Release 5.3 マニュアル - 2 コンパイラの使用」をご参照ください．

◇ 簡単な使用例

1.　プログラム（myprog.f90）を作成する．

program main
  print *, 'Hello World'
end program

2.　プログラム（myprog.f90）をコンパイル／リンクする．

nagfor -o hello.exe myprog.f90

※　オプションの詳細は Fortran Builder ヘルプ「NAG Fortran Compiler, Release 5.3 マニュアル - 2.4 コンパイラオプション」をご参照ください．

3.　作成された実行ファイル（hello.exe）を実行する．

hello.exe

はい，線形代数用の数値計算ライブラリとして標準的な BLAS (Basic Linear Algebra Subprograms) と LAPACK (Linear Algebra PACKage) がバンドルされています．

Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜基本設定｜付加機能｜LAPACK を利用する」を指定してください．
ライブラリルーチンを利用できるようになります（リンク時にライブラリがリンクされます）．

はい，Fortran Builder では，C/C++ で main 関数から Fortran の手続き（サブルーチン，関数）を呼び出すことや，また逆に Fortran の主プログラムから C/C++ の関数を呼び出すことが可能です．

コンソールアプリケーションのプロジェクトを新規作成する時に「Fortran と C/C++ の混合プロジェクト」の指定を行い，メインを記述する言語とサブを記述する言語を選択していただきますと，簡単なテンプレートプログラム付きでプロジェクトが作成されますのでご参照ください．

メインプログラムが Fortran で書かれていない場合には f90_init を C から呼び出す必要があります．
この関数は Fortran の浮動小数点環境の初期化を行うと共に，Fortran の UNIX モジュールがコマンドライン引数にアクセスすることを可能にします．
また，最後には後処理関数 f90_io_finish を呼び出し，バッファをフラッシュしてから処理を終了する必要があります．

一般的に C から Fortran を呼び出す際の C プログラム側の記述は以下の通りです．

int main(int argc, char *argv[])
{
  f90_init(argc, argv); 

  /* ここに Fortran 呼び出し処理を記述する */

  f90_io_finish();

  return 0;
}

いいえ，特にコンパイラオプションを指定する必要はありません．

Fortran Builder（NAG Fortran Compiler）は Fortran 77 の規格を含む Fortran 言語標準に従ってコンパイルを行います．
ただし，ファイルの拡張子によってプログラム形式（固定形式か自由形式か）の区別は行います．
拡張子が *.f, *.for, *.ftn のファイルに対しては固定形式のプログラムとしてコンパイルを行い，拡張子が *.f90, *.f95 のファイルに対しては自由形式のプログラムとしてコンパイルを行います．

補足：
特に，拡張子に関係なく全てのソースファイルを固定形式でコンパイルしたい場合は Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜ Fortran コンパイラ｜詳細設定 (1)｜固定形式を強制する (-fixed)」（コンパイラオプション -fixed に相当）を指定してください．
また，拡張子に関係なく全てのソースファイルを自由形式でコンパイルしたい場合は Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜ Fortran コンパイラ｜詳細設定 (1)｜自由形式を強制する (-free)」（コンパイラオプション -free に相当）を指定してください．

注意：
コンパイラオプション -fixed と -free の両方が指定された場合は -free が優先されます．

Fortran Builder（NAG Fortran Compiler）はプログラムが Fortran 言語標準に準拠しているかどうか厳しいチェックを行います．
新たなプログラムを作成する場合これはコンパイラのあるべき姿とも言えますが，昔書かれたプログラム（レガシーコード）をコンパイルしたい場合など厳しいチェックを望まない場合もあります．
このため Fortran Builder（NAG Fortran Compiler）では，厳しいチェックを行わないことを指示するためのコンパイラオプションが用意されています．

Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜Fortran コンパイラ｜基本設定｜古典的ソースコードのエラーを警告にする (-dusty)」（コンパイラオプション -dusty に相当）を指定してください．
これにより，レガシーコードに良く見られるエラーを警告として扱うようになり，コンパイルが続行できます．

さらに必要であれば Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜Fortran コンパイラ｜基本設定｜警告表示選択｜全て非表示」（コンパイラオプション -w に相当）を指定して警告を出力を抑止することも可能です．

はい，大丈夫です．

Fortran Builder（NAG Fortran Compiler）は Fortran 77 の規格を含む Fortran 言語標準に従ってコンパイルを行います．
ただし，ファイルの拡張子によってプログラム形式（固定形式か自由形式か）の区別は行います．
拡張子が *.f, *.for, *.ftn のファイルに対しては固定形式のプログラムとしてコンパイルを行い，拡張子が *.f90, *.f95 のファイルに対しては自由形式のプログラムとしてコンパイルを行います．

補足：
特に，拡張子に関係なく全てのソースファイルを固定形式でコンパイルしたい場合は Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜ Fortran コンパイラ｜詳細設定 (1)｜固定形式を強制する (-fixed)」（コンパイラオプション -fixed に相当）を指定してください．
また，拡張子に関係なく全てのソースファイルを自由形式でコンパイルしたい場合は Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜ Fortran コンパイラ｜詳細設定 (1)｜自由形式を強制する (-free)」（コンパイラオプション -free に相当）を指定してください．

注意：
コンパイラオプション -fixed と -free の両方が指定された場合は -free が優先されます．

CDABS などの組込み関数は Fortran 言語標準の組込み関数ではありませんが，多くのコンパイラがこれら非標準の組込み関数をサポートしています．

Fortran Builder（NAG Fortran Compiler）では Fortran 言語標準に準拠するために，Fortran 言語非標準の倍精度複素数組込み手続きは Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜Fortran コンパイラ｜基本設定｜非標準の倍精度複素数組込み手続きを有効にする (-dcfuns)」（コンパイラオプション -dcfuns に相当）を指定した時にのみ利用可能となっています．

はい，Fortran Builder（NAG Fortran Compiler）は多くの POSIX システムコールを独自の組込みモジュールで提供しています．
これらにアクセスするためには，該当するモジュールを use 文により指定する必要があります．
system はモジュール f90_unix_proc においてサブルーチンとして提供されます．
詳細は Fortran Builder ヘルプ「NAG Fortran Compiler, Release 5.3 マニュアル - 7.8 f90_unix_proc」をご参照ください．

サブルーチン system を利用したプログラム例を以下に示します．

program system_example
  use f90_unix_proc
  call system('echo hello')
end program

はい，Fortran Builder（NAG Fortran Compiler）は多くの POSIX システムコールを独自の組込みモジュールで提供しています．
これらにアクセスするためには，該当するモジュールを use 文により指定する必要があります．
getenv はモジュール f90_unix_env においてサブルーチンとして提供されます．
詳細は Fortran Builder ヘルプ「NAG Fortran Compiler, Release 5.3 マニュアル - 7.4 f90_unix_env」をご参照ください．

しかしながら標準準拠の観点からは，Fortran 2003 から導入された組込みサブルーチン get_environment_variable の利用が推奨されます．
組込みサブルーチン get_environment_variable を利用したプログラム例を以下に示します．

program environment_example
!
! This program displays the values of the environment variables FRED and USERNAME
! (if they exist).
!
  implicit none
  call show('FRED')
  call show('USERNAME')
contains
  subroutine show(name)
    character(*), intent(in) :: name
    character(:), allocatable :: value
    integer len, status
    intrinsic get_environment_variable
    call get_environment_variable(name, status=status, length=len)
    if (status == 1) then
      print *, 'Environment variable "', name, '" does not exist.'
    else if (status /= 0) then
      print *, 'Unexpected status', status, 'for environment variable "', name, '"'
    else
      allocate(character(len) :: value)
      call get_environment_variable(name, value=value)
      print *, 'The value of environment variable "', name, '" is "', value, '".'
    end if
  end subroutine
end program

はい，Fortran Builder（NAG Fortran Compiler）は多くの POSIX システムコールを独自の組込みモジュールで提供しています．
これらにアクセスするためには，該当するモジュールを use 文により指定する必要があります．
flush はモジュール f90_unix_io においてサブルーチンとして提供されます．
詳細は Fortran Builder ヘルプ「NAG Fortran Compiler, Release 5.3 マニュアル - 7.7 f90_unix_io」をご参照ください．

しかしながら標準準拠の観点からは，Fortran 2003 から導入された flush 文の利用が推奨されます．
flush 文を利用したプログラム例を以下に示します．

program slow_dots
!
! This program prints 10 dots, one per second, then finishes.
!
  use iso_fortran_env, only : output_unit
  implicit none
  integer i
  do i = 1, 10
    write (*, '(a)', advance='no') '.'
    call delay
    flush (output_unit)
  end do
  print *, 'Done.'
contains
  subroutine delay
    integer cps,start,now
    intrinsic system_clock
    call system_clock(count=start, Count_Rate=cps)
    if (start == -huge(start)) stop 'No clock.'
    do
      call system_clock(count = now)
      if (now < start .or. now >= start + cps) exit
    end do
  end subroutine
end program

関数 fdate は Fortran 言語標準の機能ではありません．
代わりに Fortran 言語標準の組込みサブルーチン date_and_time を以下のプログラム例を参考にご利用ください．

program date_time
  character date*8, time*10 
  call date_and_time(date, time) 
  print *, date, ' ', time 
end program

関数 dtime や etime は Fortran 言語標準の機能ではありません．
代わりに Fortran 言語標準の組込みサブルーチン cpu_time や system_clock を以下のプログラム例「代替その１」を参考にご利用ください．
なお「代替その２」はそれぞれ Fortran Builder（NAG Fortran Compiler）独自の組込みモジュール f90_unix_env で提供される関数 times を利用したものとなります．

（dtime の代替その１）

real function dtime(time)
  real time(2)
  double precision, save :: last_time = 0
  double precision this_time
  call cpu_time(this_time)
  time(1) = this_time - last_time
  time(2) = 0
  dtime = time(1)
  last_time = this_time
end function

（dtime の代替その２）

real function dtime(time)
  use f90_unix_env, only : tms, times
  real time(2)
  type(tms), save :: lastbuf
  logical :: start = .true.
  type(tms) buffer
  integer junk
  junk = times(buffer)
  if (start) then
    lastbuf%utime = 0
    lastbuf%stime = 0
    start = .false.
  end if
  time(1) = buffer%utime - lastbuf%utime
  time(2) = buffer%stime - lastbuf%stime
  dtime = time(1) + time(2)
  lastbuf = buffer
end function

（etime の代替その１）

real function etime(time)
  real time(2)
  call cpu_time(etime)
  time(1) = etime
  time(2) = 0
end function

（etime の代替その２）

real function etime(time)
  use f90_unix_env, only : tms, times
  real time(2)
  type(tms) buffer
  integer junk
  junk = times(buffer)
  time(1) = buffer%utime
  time(2) = buffer%stime
  etime = buffer%utime + buffer%stime
end function

TAB 書式は Fortran 言語標準では拡張機能に位置づけられます．
このため，このような警告メッセージが出力されます．
TAB 書式は新しくプログラムを作成する場合には推奨されていない形式です．

integer*2 の様な書式で変数のバイト数を指定する方法は Fortran 言語標準では拡張機能に位置づけられます．
このため，このような警告メッセージが出力されます．

この警告メッセージを抑止したい場合は，Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜Fortran コンパイラ｜基本設定｜警告表示選択｜表示抑止する警告を選択」を指定した後に「Fortran 77 の拡張仕様 (=x77)」（コンパイラオプション -w=x77 に相当）を指定してください．

なお Fortran Builder（NAG Fortran Compiler）では以下のバイト数指定を受け付けます．

real*4     !単精度実数
real*8     !倍精度実数
complex*8  !単精度複素数
complex*16 !倍精度複素数
logical*1  !１バイト論理
logical*2  !２バイト論理
logical*4  !４バイト論理
logical*8  !８バイト論理
integer*1  !１バイト整数
integer*2  !２バイト整数
integer*4  !４バイト整数
integer*8  !８バイト整数

この書式は新しくプログラムを作成する場合には推奨されていない形式です．
新しくプログラムを作成する場合は，例えば以下のような書き方を推奨します．

integer, parameter :: int8   = selected_int_kind(2)
integer, parameter :: int16  = selected_int_kind(4)
integer, parameter :: int32  = selected_int_kind(9)
integer, parameter :: int64  = selected_int_kind(18)
integer, parameter :: real32 = selected_real_kind(6)
integer, parameter :: real64 = selected_real_kind(15)

などとした上で，例えば 8-bit 整数を使用する場合には以下のようにします．

integer(int8)

また 32-bit（単精度）実数を使用する場合には以下のようにします．

real(real32)

更に定数の指定も，例えば以下のように行うことが可能です．

3.141592653589793238_real64

コンパイラによって kind 値の解釈が異なるために出ているエラーです．

多くのコンパイラは kind 値がデータバイト数を表す方法（バイト指定）か，もしくは１番から順番に値を割り振る方法（シーケンシャル指定）のどちらかを採用しています．
Fortran Builder（NAG Fortran Compiler）では，後者の順番に割り振る方法（シーケンシャル指定）をデフォルトで採用しているため，データバイト数を表す方法（バイト指定）で書かれたプログラムはこのようなエラーとなります．

Fortran Builder（NAG Fortran Compiler）では，コンパイラオプションの指定で kind 値にデータバイト数を利用することが可能です．
Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜Fortran コンパイラ｜詳細設定 (1)｜Kind モード (-kind=)｜バイト (=byte)」（コンパイラオプション -kind=byte に相当）を指定してください．

移植性を考えたコードを作成する場合には，real(4) などと直接 kind 値の指定を行わずに，例えば real(kind(1.0)) などと kind 組込み関数を利用した表現を推奨します．

これはファイルバッファの大きさを超えて formatted 入力または出力が行われたことを意味します．
デフォルトのバッファサイズは 1024 文字です．
これをより大きくする場合には open 文で「recl=バッファサイズ」と指定してください．

open (13, file="myfile", form="formatted", recl=2048)

この例では，バッファサイズを 2048 文字に拡張しています．
また，iolength 指定子を inquire 文で指定して recl 指定子に必要なサイズを求める事ができます．

inquire (iolength=irecl) my_big_array
open (13, file="dump", form="formatted", recl=irecl)

この例では，装置 13 に my_big_array を読み書きするのに必要なサイズを設定しています．

「実行終了時の一時停止」機能は環境変数で指定することが可能です．
環境変数 NAGFORTRAN_PAUSE_ON_EXIT に何らか値（例えば "A" など，空でなければ何でも良い）を設定すると一時停止が行われるようになります．
この環境変数 NAGFORTRAN_PAUSE_ON_EXIT が未定義な環境では一時停止は行われません．

32-bit 環境で配列の大きさが 2GB を超えているために出ているエラーです．

32-bit 環境での利用可能メモリの上限は通常 2GB となっており，そのためプログラムの作成においても配列の大きさ（の合計）の上限が 2GB までとなります．

このような場合は 64-bit 環境をご利用ください．

補足：
Fortran Builder は，
32-bit 環境では 32-bit アプリケーション（実行ファイル）を生成します．
64-bit 環境では 64-bit アプリケーション（実行ファイル）を生成します．
また 64-bit 環境で 32-bit アプリケーション（実行ファイル）を生成することもできます．

注意：
Fortran Builder は Windows XP の 64-bit 版には対応していません．

32-bit 環境での利用可能メモリの上限は通常 2GB となっており，そのためプログラムの作成においてもオブジェクト（配列など）の大きさ（の合計）の上限が 2GB までとなります．
通常，単一で 2GB を超えるオブジェクト（配列など）を宣言した場合は，コンパイル時にコンパイラがエラーとして検出します．
しかしながら，2GB に非常に近い値で超えていない場合や複数の配列の合計が 2GB に近い値になる場合などは，コンパイラはエラーと認識せずに実行ファイルを生成しますが，実行時に OS 側から 32-bit アプリケーションではないといった旨の警告が出力されることがあります．

（Fortran 90/95 でコンパイルされるがエラーとなる例）

program runtime_error
  !
  ! 以下の配列 a は，
  ! 倍精度（8 バイト）× 1024 × 1024 × 255 合計 2GB - 8B です.
  ! コンパイルエラーにはなりませんが，実行時エラーとなります.
  !
  implicit none
  double precision :: a(1024, 1024, 255) 
  a = 100
  print *, a(1, 1, 1)
end program

このような場合は 64-bit 環境をご利用ください．

補足：
Fortran Builder は，
32-bit 環境では 32-bit アプリケーション（実行ファイル）を生成します．
64-bit 環境では 64-bit アプリケーション（実行ファイル）を生成します．
また 64-bit 環境で 32-bit アプリケーション（実行ファイル）を生成することもできます．

注意：
Fortran Builder は Windows XP の 64-bit 版には対応していません．

メインプログラムの最初の行にブレークポイントを設定した場合に，ブレークポイントがメインプログラムの外側に設定されてしまうために発生する現象です．

これを回避するためには，メインプログラムに program [プログラム名] 文を追加した上で program 文の次の行にブレークポイントを設定してください．

（変更前の例）
この例で１行目にブレークポイントがあるとこの現象が発生します．

1: print *, 'Hello World'
2: end

（変更後の例）
２行目にブレークポイントを設定します．

1: program main
2: print *, 'Hello World'
3: end

ウィンドウフレーム制御（例えば，質問にあるウィンドウのタイトルバーの右上にある「閉じる」ボタン）を用いて，プログラムを終了した時にこの問題は発生します．
この場合，プログラムはプログラムが終了であることを示す GLUT イベントを得られません．
（これは glutMainLoop() の仕様上の問題で，実際，ウィンドウが破壊される時 glutMainLoop() は exit(0) を単に呼び出すだけです．）

従って，Fortran Builder メニュー「実行｜プログラムの終了」から（またはプロンプトを閉じて）プログラムを終了してください．

Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜リンク｜オプション｜Fortran ランタイムライブラリの非共有（静的）バージョンを結合 (-unsharedrts)」（コンパイラオプション -unsharedrts に相当）にチェックを入れて，再度ビルドを行ってください．

このオプション（-unsharedrts）を指定しますと，NAG Fortran Compiler の実行時ライブラリがスタティック（静的）にリンク（結合）されます．
これにより Fortran Builder（NAG Fortran Compiler）がインストールされていないマシンにおいても，実行ファイル（*.exe）を実行させることが可能になります．

また，実行時ライブラリをスタティック（静的）にリンク（結合）したくない場合（つまり，このオプション（-unsharedrts）を付けない場合）は，実行ファイルと共に実行時ライブラリが必要となります．
実行時ライブラリは，[Fortran Builder インストールフォルダ]¥nagfor¥bin フォルダからコピーしてご利用ください．

32-bit アプリケーション（実行ファイル）の場合：

• libf53.dll
  通常
• libf53gc.dll
  「自動ガベージコレクションを有効にする (-gc) 」（コンパイラオプション -gc に相当）付きでビルドした場合
• libf53safe.dll
  「スレッドセーフなコードを生成する (-thread_safe) 」（コンパイラオプション -thread_safe に相当）付きでビルドした場合
• libf53tpc.dll
  「メモリトレースオプション (-mtrace=) 」（コンパイラオプション -mtrace または -mtrace=trace_opt_list に相当）付きでビルドした場合

64-bit アプリケーション（実行ファイル）の場合：

• lib64f53.dll
  通常
• lib64f53safe.dll
  「スレッドセーフなコードを生成する (-thread_safe) 」（コンパイラオプション -thread_safe に相当）付きでビルドした場合
• lib64f53tpc.dll
  「メモリトレースオプション (-mtrace=) 」（コンパイラオプション -mtrace または -mtrace=trace_opt_list に相当）付きでビルドした場合

※　オプションの詳細は Fortran Builder ヘルプ「NAG Fortran Compiler, Release 5.3 マニュアル - 2.4 コンパイラオプション」をご参照ください．

補足：
Fortran Builder のプロジェクト設定（またはクイック実行設定）はデフォルトではこのオプション（-unsharedrts）にチェックが入っていません．

注意：
-thread_safe と -mtrace の両方を指定した場合は libf53safe.dll または lib64f53safe.dll をご利用ください．
また，-gc は -thread_safe および -mtrace とは両立しません．

以下に手順を示します．

1.　コンパイラモジュールの設定

弊社コンパイラが提供するモジュール

ieee_arithmetic

を use してください．引き続き，サブルーチン

ieee_set_halting_mode(ieee_underflow, .true.) 

を call してください．

2.　コンパイラオプションの設定

FB メニューバー「プロジェクト｜プロジェクトの設定｜Fortran コンパイラ｜詳細設定 (1)」

を開いてください．コンパイラオプション

「実行時エラーメッセージの出力時いトレースバック情報を出力するコードを生成する (-gline)」

にチェックを入れてください．

これにより，アンダーフローが発生した時点でプログラムが停止すると共に，停止した行番号が出力されます．
以下にプログラム例を示します．

program underflow
  use ieee_arithmetic
  call ieee_set_halting_mode(ieee_underflow, .true.)
  read *, x
  print *, x / huge(x)
  print *, "Hello World"
end program

このプログラムを実行して 0.1 と入力すると Fortran Builder のメッセージウィンドウに以下のようなメッセージが出力されます．

===
実行時エラー: *** 算術例外 : 浮動小数アンダーフロー - 終了します
main.f95, line 5: エラーが MAIN で発生しました
===

これにより 5 行目でアンダーフローが発生し，プログラムが停止したことが分かります．

注意：
一般的に，アンダーフローは実行結果に対して致命的な影響を及ぼすケースが少ないため Fortran Builder（NAG Fortran Compiler）では「警告」としてメッセージを出力しています．
ただし，アンダーフローが実行結果に及ぼす影響度はそのプログラム次第となりますし，また，その影響を重大であると考えるかどうかは解析者（プログラマー）次第となります．

Fortran Builder メニュー「プロジェクト｜プロジェクトの設定｜リンク｜オプション｜アンダーフロー警告の非表示 (-no_underflow_warning)」（コンパイラオプション -no_underflow_warning に相当）にチェックを入れてください．

これにより「警告：浮動小数アンダーフローが発生しました」メッセージの出力を抑止することができます．

注意：
一般的に，アンダーフローは実行結果に対して致命的な影響を及ぼすケースが少ないため Fortran Builder（NAG Fortran Compiler）では「警告」としてメッセージを出力しています．
ただし，アンダーフローが実行結果に及ぼす影響度はそのプログラム次第となりますし，また，その影響を重大であると考えるかどうかは解析者（プログラマー）次第となります．

はい，サポートしています．

Fortran Builder（NAG Fortran Compiler）が提供するデータ型の詳細は Fortran Builder ヘルプ「NAG Fortran Compiler, Release 5.3 マニュアル - 2.16 データ型」をご参照ください．

《 補足１： 変数宣言や定数表現について 》

ポータビリティなどを考えると selected_real_kind 組込み関数を用いて，必要な有効桁数を持つ型の kind 番号を取得する方法が推奨されます．
例えば，以下の例のようなモジュールを利用すると便利です．
（なお 0.1q0 といった表現は Fortran 言語非標準であるため，文法エラーとなります．）

プログラム例：

module my_precision
  implicit none
  ! 有効桁数から種別番号を求めるために selected_real_kind を用いる．
  ! 例えば p=5 等とすると単精度 p=15 等とすると倍精度の種別番号が取得される．
  integer, parameter :: wp = selected_real_kind(p=30)
end module my_precision

program precision
  use my_precision
  implicit none
  real(wp) x     ! wp には指定された有効桁数を持つ型の種別番号が格納される．
  complex(wp) c  ! real と complex で種別番号は対応している．
  x = 0.1_wp     ! このような方法で指定種別の定数表現が可能である．
  c = (0.5_wp, 1.2_wp)
  print *, x
  print *, c
end program

出力例（p=5）：

  0.1000000
(0.5000000,1.2000000)

出力例（p=15）：

  0.1000000000000000
(0.5000000000000000,1.2000000000000000)

出力例（p=30）：

.10000000000000000000000000
(0.5000000000000000000000000,1.20000000000000000000000000)

《 補足２： 組込み関数の個別名について 》

Fortran 言語標準では４倍精度に対応した個別名は定義されていません．
（例えば qmax といった組込み関数は Fortran 言語非標準であるため，文法エラーとなります．）
４倍精度に対しては常に総称名（例えば max）をご利用ください．
なお今後は４倍精度に限らず（単精度，倍精度に対しても）個別名は使用しないことが推奨されます．

サポートしていません．

編集記述子 $（改行抑止）は Fortran 言語非標準であるため，文法エラーとなります．

Fortran 言語標準では，改行を抑止する場合は write 文において advance='no' という指定を行います．
以下に例を示します．

プログラム例：

program advance_example
  implicit none
  integer age
  write (*, fmt='(a)', advance='no') "Enter your age: " ! 改行なし．
  read *, age
  print *, "Your age is:", age
end program

出力例：

Enter your age: 20
 Your age is: 20

はい，可能です．

DLL 形式の外部ライブラリ（グラフィックライブラリや数値計算ライブラリなど）を利用している場合には，実行ファイル（*.exe）と共に該当の DLL が必要となることに注意してください．

アプリケーションの再配布についての詳細は Fortran Builder ヘルプ 「32-bit アプリケーションの再配布」または「64-bit アプリケーションの再配布」をご参照ください．

注意：
Simdem, LAPACK, OpenGL, GTK+ ライブラリの商用利用時のライセンスについては，各ライブラリのコミュニティ（製造・提供元）にお問い合わせ（ご参照・ご確認）ください．
Fortran Builder ではこれらのライブラリを各コミュニティのライセンスに基づき商用利用していますが，ユーザーアプリケーションでの２次利用については弊社は一切の責任を持ちません．

Fortran 言語標準の組込み関数には総称名（例えば EXP）と個別名（例えば CEXP）があります．
コンパイルに通らない原因としては Fortran 言語非標準の（特定のコンパイラが独自にサポートしている）個別名（例えば CDEXP）の使用が考えれます．

解決策としては，個別名の代わりに総称名をご利用ください．
個別名は特定の精度に対応しますが，総称名はご利用のコンパイラがサポートする全ての精度に対応しており，引数の型と同じ型の戻り値を得ることができます．

Fortran 言語非標準の個別名をリストアップすることは不可能ですが，一般的なルールとして xFUN のような関数の代わりに FUN を使用してください．
ここで x は１文字または複数文字の個別名の接頭辞，FUN は数学関数の名前です．

（良く利用される）数学関数の名前：
ABS, ACOS, ASIN, ATAN, ATAN2, CONJG, COS, COSH, DIM, EXP, LOG, LOG10, MAX, MIN, SIGN, SIN, SINH, SQRT, TAN, TANH

（典型的な）個別名の接頭辞：
C, CD, CQ, D, DC, Q, Z

例えば，個別名 CEXP, DEXP, CDEXP, DCEXP, QEXP, CQEXP, ZEXP はどれも総称名 EXP に置き換えても同じ結果を得ることができます．

いくつかの組込み関数については，ルールが若干異なります．
xINT, xNINT（ここで x は上述した個別名の接頭辞）は，AINT, ANINT に置き換えてください．

接頭辞 C または D で始まる個別名の中には Fortran 言語標準の個別名（例えば CEXP）もあることに注意してください．
しかし，いずれにせよ（総称名の代わりに）個別名を用いるべき理由は特にありません．

このような場合，64-bit 環境（Windows Vista 64-bit または Windows 7 64-bit）で Fortran Builder 実行形式の別バージョン（FortranBuilder_3G.exe）をお試しください．

具体的には，[Fortran Builder のインストールフォルダ]¥bin フォルダにおいて以下の操作を行ってください．
（デフォルトでは，C:¥Program Files (x86)¥NAG¥FBuilder 5.3¥bin ）

(1) FortranBuilder.exe ファイルの名前を適当な名前（例えば FortranBuilder_Original.exe など）に変える．

(2) FortranBuilder_3G.exe ファイルの名前を FortranBuilder.exe に変える．