| 查看: 595 | 回复: 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
» 猜你喜欢
40+中年人失业后，还能找到好工作吗？
已经有15人回复
-
二审4个多月了还是Awaiting Reviewer Scores
已经有5人回复
-
申请科研项目纯靠实力能成功吗？
已经有12人回复
-
用NBS溴化时溶剂除了CCl4外还有什么
已经有6人回复
-
极限拉扯，如何抉择
已经有15人回复
-
OpenAI又攻克数学难题了，离AI做有机合成还有多远？
已经有13人回复
-
课题组会帮你通过考核么？
已经有7人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急
已经有10人回复
-
招收博士生一名
已经有3人回复