FORTRAN 複素数 （実部を取り出す方法）

fortran77で複素数の実部を取り出したいのですが、
関数が存在するかわかりません。どなたか、ご存知の方、
教えてください。虚部は出せました。
FORTRAN77(SALFORD FTN77)を使っています。

確か、fortran90なら real(○＋□i)だったと思います。

No.1 ベストアンサー 回答者： notnot 回答日時： 2007/02/18 08:31

real() でいいと思いますが。

complex x/(1,2)/
write(*,*) x
write(*,*) real(x)
write(*,*) imag(x)
end

この回答へのお礼

ありがとうございました。REAL(ｘ)は、画面表示の際にformat(2e10.6)のように、2つの数値の定義をしないと正しく表示されないことが、わかりました。

お礼日時：2007/02/19 23:11

No.2 回答者： 530529 回答日時： 2007/02/18 10:47

もっと昔のＦＯＲＴＲＡＮ（６４）でも複素数が扱える物であれば、実数部、虚数部をそれぞれ取り出せる関数が有りました。

（本当に２０年以上前）
＃１の方が書かれているようにＲＥＡＬ（複素数型の変数）で良いと思います。