Friday, January 6, 2012

[Fortran][ifort] 引数で出力ファイルの名前を指定する

ソース・コードのコンパイル時に出力ファイルの名前を引数として与える方法についてのメモ。

  1. (出力ファイル名を1番目の引数として与えると仮定して、)ソース・コードを用意:
  2. program main
    implicit none
    character(100) filename

    call getarg(1,filename)
    open (12, file=trim(filename), status='replace')
    write (12,*) "Hello!"
    close (12)

    end program main
    • "getarg(1,filename)"はfilenameに引数の1番目を書き込む組み込み型サブルーチン。
  3. 端末で次のようにコンパイル・実行する:
    $ ifort -o main.out main.f90
    $ ./main.out ./filename_output
このとき、実行ファイルと同じディレクトリにfilename_outputの名前で出力ファイルが作成される。

No comments:

Post a Comment