gfortran遇到Error: Incompatible ranks 0 and 1 in assignment

fcode

这个错误是等号左右变量数组维度不一致导致的。
比如

[Fortran] 纯文本查看 复制代码

  real :: a(3),c
  c = a

就会出现这个错误。

我检查了你的代码，左边 w0(1) 是单变量，右边可能有数组，比如 Kn 是一个数组？

fcode

一个数是不能够等于一个数组的。这是逻辑问题，而不是语法问题。
如何修改，看你想法。

fcode

数组应该是几维的，应该根据你的需求而定。而不是如何定义能让编译通过。
请不要本末倒置。

你要做的，是根据你的需求而设计代码。
而不是根据语法要求来更改你的需求。

不管怎么样，一个单变量，都不能等于一个数组。