WRITE文，READ文の引数に数式は入るのかどうか

Question

質問

こちらでhttps://teratail.com/questions/qgzkpk01qg6bls#reply-paiao497p4yfhi
昨日も質問させていただいたのですが，
フォートランでバイナリファイルをテキストファイルに変換するプログラムを作っています．
バイナリファイルを出力するプログラムに

write(unitflux) ix+jy*numxgrid+kz*numxgrid*numygrid,
1.e12*flux(3,ix,jy,kz,k,kp,nage)/areanorth(ix,jy,kz)/outstep

という部分があるため

  program readflux4
  
  character (len=150) :: outfile, fname
  real,allocatable, dimension (:,:,:,:,:,:,:) :: flux
  real,allocatable, dimension (:,:,:) :: areanorth
  real,allocatable, dimension (:,:,:) :: areaeast

  open (9, file='fluxlist')
10 read (9,'(a)',end=90) fname

    open (10,file=trim(fname),form='unformatted',ACCESS='stream')
    print*, 'reading ',trim(fname)
    write (outfile,900) trim(fname)
  900 format (a,'.dat')

    open (20, file=trim(outfile)  )
      read (10) 1.e12*flux(:,:,:,:,:,:,:)/areanorth(:,:,:)/outstep
      write (20,901) 1.e12*flux(:,:,:,:,:,:,:)/areanorth(:,:,:)/outstep
  901 format (f12.5)

go to 10
90 close (9)

  end

というプログラムを作成してコンパイルしようとしました，がエラーが発生しています．
エラーが発生する原因はread文，write文の引数が数式であるからでしょうか？
それとも別の原因(配列の扱い方が悪いなど)が考えられますか？
何かヒントをいただけたら幸いです．よろしくお願いします．

発生している問題・エラーメッセージ

readflux7.f90:17:15:

   17 |       read (10) 1.e12*flux(:,:,:,:,:,:,:)/areanorth(:,:,:)/outstep
      |               1
Error: Expecting variable in READ statement at (1)
readflux7.f90:18:27-56:

   18 |       write (20,901) 1.e12*flux(:,:,:,:,:,:,:)/areanorth(:,:,:)/outstep
      |                           1                            2
Error: Inconsistent ranks for operator at (1) and (2)

試したこと

・エラーの内容的にread文の引数が認識されていないことやdimensionの理解ができていないことによるものではないかと思いdimensionについて調べましたが，よくわかりませんでした．
・read文，write文の引数をread (10) 1.e12*flux(:,:,:,:,:,:,:)/areanorth(:,:,:)/outstepという配列・数式ではなく，read(10) flux　のみにしたところコンパイルと実行はできました．
しかし，この数式の計算結果を出力したいため困っています．

Answer 1

先の質問に回答しましたが、
READ文の意味がわかっていないとは思いませんでした。

READ文の引数に数式は入るのかどうか

READ文の意味を理解していれば自明です。

その状態で試行錯誤するよりも、プログラミングの入門書を読み返して、
READ文とWRITE文を理解してから、再開するのが良いと思います。急がば回れです。

Comments

[yashiyashiyashi]

昨日も回答ありがとうございました．初歩的な質問ですみませんでした．
時間がなく焦っていた点があるので落ち着いて頑張ってみたいと思います．

[otn]

先の回答を見直すと、ちゃんと「～～型の値」と「～～型の変数」を区別して書いてました。

Answer 2

read 文には式はこれない。今のプログラムを見て冷静に考えれば、どの変数に入力データを読み込むのか決められないのが分かる。自分がコンピュータになったつもりで考えれば、当惑するはず。

write文の方は式は来れるが、その式がおかしいので叱られている。配列の次元が（rankが）整合していない。7次元のものを3次元で割れと言われても、どの成分がどれに対応するのか決まらない。これまた当惑。

たとえば、以下のような式なら問題ない。

1.e12*flux(3,:,:,:,k,kp,nage)/areanorth(:,:,:)/outstep

I/O は計算の本質ではないので軽視されがちだが、躓きポイントではあるので焦らず考えた方がいい。

Comments

[yashiyashiyashi]

すごく腑に落ちましたありがとうございます．
やはり配列の理解が足りていなかったです．
自分はかなり勉強不足だと自覚したので一から勉強します．
ありがとうございました．