| 查看: 532 | 回复: 0 | |||
[求助]
fortran程序接口(interface)报错,大神路过请指点一二!!
|
|
接口如下: INTERFACE DOUBLE PRECISION FUNCTION DENORM (N, X) INTEGER,INTENT(IN) :: N DOUBLE PRECISION,INTENT(IN) :: X(N) END FUNCTION DENORM END INTERFACE DENORM函数如下: DOUBLE PRECISION FUCTION DENORM(N,X) INTEGER I, N DOUBLE PRECISION AGIANT, FLOATN, ONE, RDWARF, RGIANT, S1, S2, S3, & X(*), X1MAX, X3MAX, XABS, ZERO SAVE ONE, ZERO, RDWARF, RGIANT DATA ONE,ZERO,RDWARF,RGIANT /1.0D0,0.0D0,3.834D-20,1.304D19/ 其中N是向量X的维数,其它均为中间变量或者常量。 |
» 本帖附件资源列表
-
欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com - 附件 1 : slatec.f90
- 附件 2 : Source1.for
2016-11-20 20:25:25, 3.4 K
2016-11-20 20:25:32, 5.45 K
» 猜你喜欢
导师想让我从独立一作变成了共一第一
已经有9人回复
博士读完未来一定会好吗
已经有23人回复
到新单位后,换了新的研究方向,没有团队,持续积累2区以上论文,能申请到面上吗
已经有11人回复
读博
已经有4人回复
JMPT 期刊投稿流程
已经有4人回复
心脉受损
已经有5人回复
Springer期刊投稿求助
已经有4人回复
小论文投稿
已经有3人回复
申请2026年博士
已经有6人回复













回复此楼