構文エラーが見つかりました。および。

Question

私はちょうど非常に古いプログラムの小さな部分を修正したいと思っていました。私はFortranの神を怒らせるために何をしたのか分かりません。

if (r.gt.rstep) xappad = xappad*fakm 

私が変更した：

SP - コ-2-：

if (r.gt.0.58*rstep .and. r.lt.1.42*rstep) .or. (r.gt.2.08*rstep 
: .and. r.lt.2.92*rstep) xappad = xappad*fakm 

私にエラーが発生します

元のコードは、次の行を持っていますMODIFIED.for（785）：エラー＃5082：構文エラー。「.OR」が見つかりました。 1の期待：...

 if (r.gt.0.58*rstep .and. r.lt.1.42*rstep) .or. (r.gt.2.08*rstep 
-------------------------------------------------------------------------^ 

SP-CO-2-MODIFIED.for（786）BLOCK BLOCKDATAプログラムモジュール型錯体 バイト文字DOUBLE DOUBLECOMPLEXを：エラー＃6090：配列値をこの文脈ではオペランドが必要です。

 : .and. r.lt.2.92*rstep) xappad = xappad*fakm 
------^ 

SP-CO-2-MODIFIED.for（786）：エラー＃6087：配列代入文 は、この文脈で必要とされます。

 : .and. r.lt.2.92*rstep) xappad = xappad*fakm 
-------------------------------------------^ 

Answer 1

私は本当に多くのFORTRANを知らないが、あなたは、条件付きの周りの括弧のペアが欠けているように、それは私になります

if ((r.gt.0.58*rstep .and. r.lt.1.42*rstep) .or. (r.gt.2.08*rstep .and. r.lt.2.92*rstep)) xappad = xappad*fakm