fortran循环，求助！！

fcode

问题1：

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

!!!!!!!!!
 Z0=50.0
 Zi=-3.0
 !!!!!!!!
 real::daltf=0.0
 integer i

换一下位置

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

 real::daltf=0.0
 integer i
!!!!!!!!!
 Z0=50.0
 Zi=-3.0
 !!!!!!!!

Fortran 里的声明语句必须在所有执行语句前面

问题2：
Get_A1 函数有4个参数，但调用时只给了3个

fcode

没有写 DALTF_TO_A1 函数（子程序）

主程序中 E H REF 是什么？如果是数组，要定义，如果是函数（子程序），要写出来。

我感觉你的函数命名很乱

fcode

Get_A1 就是 Dalt_To_A1 这是你的想法，编译器并不知道你的想法。你缺少 Dalt_To_A1，编译器就不让你运行。

E H REF 也一样。

fcode

ttt 发表于 2014-4-27 14:58
我有两个参数变化呢，daltf, Zr啊，我该怎么做啊

这是你的算法，你比我更清楚。

我没有足够的时间阅读你的代码，并从中理解你的算法，并针对算法给你建议。

我只能从 Fortran语法 角度给你意见。