| 查看: 562 | 回复: 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
» 猜你喜欢
我在等一个没有答案的答案
已经有3人回复
-
半夜喝咖啡
已经有5人回复
-
面上本子正文33页，违规吗？会被低分嘛？
已经有6人回复
-
今年审到国自然15份，谈谈感受
已经有9人回复
-
售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急
已经有4人回复
-
售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急
已经有7人回复
-
售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急
已经有5人回复
-
售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急
已经有6人回复
-
售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急
已经有7人回复
-
售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急
已经有5人回复
20