intel fortranのエラーで困ってます．

質問

character chrc*49・・・
real Tmom,Mw,H0・・・
・・・
・・
write(chrc,'(a7,e12.3,a5,f7.2,a12,f6.1)') 'Mo[Nm]=',Tmom*1.e18,' Mw=', Mw,' Depth[km]=', H0
・・・
・・

をコンパイルすると，以下のようなエラーが出ます．

Main/graphics.f(93): error #5082: 構文エラー、END-OF-STATEMENT が見つかりました、 ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ... の 1 つを指定してください。
write(chrc,'(a7,e12.3,a5,f7.2,a12,f6.1)') 'Mo[Nm]=',Tmom*1.e18,' Mw=', Mw,' Depth[km]=', H0
----------------------------------------------------------------------------------^
コンパイルは Main/graphics.f で異常終了しました (コード 1)。
（矢印の位置はH0の一文字後）

原因がイマイチよく分かりません．．．
考えられる原因・解決法を教えて頂けると幸いです．
よろしくお願いします．

回答No.2

f272 · ベストアンサー

ファイルの拡張子が.fであるからfixed-formatだと判断されて，1行あたりの最大文字数が72になっている。
継続行を使って2行に分割するのが吉。

お礼

回答ありがとうございます．

２行に分割すると，すんなりコンパイルできました．

FORTRAN90しか扱ったことがなかったので，
文字数に制限があることを知りませんでした．

回答No.3

ninoue

特に問題ないとは思われるのですが。
念のため文字列に関してフォーマットの文字数を実際の文字列の文字数と合わせてしていする、
或いは文字数は指定しないでおく等でどうなるかをトライしてみて下さい。

write(chrc,'(a7,e12.3,a4,f7.2,a11,f6.1)') 'Mo[Nm]=',Tmom*1.e18,' Mw=', Mw,' Depth[km]=', H0

write(chrc,'(a,e12.3,a,f7.2,a,f6.1)') 'Mo[Nm]=',Tmom*1.e18,' Mw=', Mw,' Depth[km]=', H0

回答No.1

A88No8

こんにちは
　FORTRAN90なんでしょうかね。
　小文字だらけのコードがどうにもピンときません(^^;
　で、WRITE文の装置番号、書式、IOリストがさっぱり判りません。
　特に書式とIOリストに違和感を覚えます。

　古い規格のものしか知らないので外していたらごめんなさいm(__)m
　的確な助言が早く得られますように(-人-)