Fortran90のデータ型一致しないエラー

質問

Fortran90のコード修正をしています。

Tr(i) = max(min(Tr(i), 0.95), 0.25)

の行がエラーとなります。エラーの内容は下記の通りです。
エラー : 組込みMINの参照で、第2引数A2のデータ型REALが前の引数のデータ型（DOUBLE PRECISION）と一致しません

いろいろやってみましたが、デバグすることができず、
エラーの修正方法につきまして、何かアドバイスやお気づきの点がございましたらご教示いただけますと幸いです。

なお、
Tr(i) = min(Tr(i),0.95)
Tr(i) = max(Tr(i),0.25)
と書き換えてみたけど、同じエラーでした。

回答No.2

notnot · ベストアンサー

引数の型が合ってないという日本語のわかりやすいメッセージなのですが、これの意味がわからないという事であれば、他人の書いたプログラムの修正は困難ではないでしょうか。

案1：realに合わせる
max(min(real(Tr(i)), 0.95), 0.25)

案2：double precisionに合わせる
max(min(Tr(i), 0.95D0), 0.25D0)

普通、この手の物はエラーじゃなくて警告だと思います。エラーになってしまうようなコンパイラだと特殊な物かもしれないので、上記でエラーが解消するかは定かではないです。

お礼

ありがとうございます。
案1、２いずれでもエラー解消できました m..m

回答No.1

watanabe04

minへ渡すパラメータの第一引数tr(i)が（DOUBLE PRECISION）で
第２引数0.95がREALでデータの型が一致しないということです。

これを合わせてください。と言っています。

お礼

ありがとうございます。ですよね。。