 |
配布されている "fluent2fvp.f" では、ソースファイルの中の 77 〜 85 行目にある 変数名文字列検出に "(" の特定文字検出を利用していることに起因して上記のエラーがでます。fluent の粒子データ側に単位系のない変数を利用すると "(" 文字が検出できなくなり、コンパイラによって出力 fvp ファイルに空白行を書き出します。
無次元 scalar 変数をお使いの場合は、プログラムソースファイルの 77 〜 85 行目の部分にある read 文を以下のように書き換えてください。
do i=1,ncol
read(10,*) charColumn, charType, charVariable, charUnits
read(charColumn, *) intColumn
read(charType, *) intType
if(i .gt. 4)then
write(11,*) charVariable
end if
enddo
上記で扱う読み込み変数に対して、プログラム冒頭部で変数宣言を行ってください。
こちらにサンプルをご用意したので、ご利用ください。
ご案内している プログラム類の改変は自由に行ってもかまいませんが、ご紹介しているプログラムと改変後のプログラムによる損害は弊社では責任負いかねますので、ご留意ください。
|
