我正在将一些Fortran代码转换为C，我不明白这里发生了什么。
此代码来自TOMS，数学软件交易，因此我不认为这是一行错误的代码。
除了我在这里展示的内容外，ZCOS和A在文件中没有其他定义。这是一种将ZCOS定义为COS的Fortran技术，如果是这样，它会实现什么？
REAL ZCOS
ZCOS(A) = COS(A)
C(I) = ONE / (TWO * ZCOS ( C(I) * PI / DBLE(N+N) ))
答案 0 :(得分：2)
这是一个声明函数，多次解释on SO。 ZCOS是一个真正的函数，在前两行中定义。
第一行定义ZCOS的类型。
第二行定义了函数本身。
第三行可以是数组访问或另一个语句功能。没有上下文就无法决定。
备注：ZCOS通常是COS泛型的特定函数，采用double complex参数。它是一个非标准扩展，您的代码不使用此内在函数。