error #6404怎么解决？

宫园薰的小提琴 · 发表于 2022-4-1 16:30:16

在学习老师给的一段代码，遇到了一个自定义的函数，调用就报错错误 1 error #6404: This name does not have a type, and must have an explicit type. [SEPRATION_CONJUGATE_TOOTHSURFACE_BYCOONS]。代码有点长，不太好全部贴上来，网上四处搜索无果，因为fortran的资源有点少，我就不明白，这就是一个函数调用，为什么会报这么一个错误呢，是函数定义写的不对吗？还是参数还是哪里有问题。有没有人指点一下

gps99 · 发表于 2022-4-1 16:50:59

本帖最后由 gps99 于 2022-4-1 16:54 编辑

没看到全部代码，只能大致估计。
Sepration_Con***是不是用function定义的？如果是function且不是在外部module中定义的，那么在引用前要加 external定义修饰。
比如:
real, external :: Sepration_Con***

Dragon · 发表于 2022-4-2 21:06:40

给函数SEPRATION_CONJUGATE_TOOTHSURFACE_BYCOONS加返回值类型，或将函数从function改为subroutine

宫园薰的小提琴 · 发表于 2022-4-6 12:30:00

gps99 发表于 2022-4-1 16:50
没看到全部代码，只能大致估计。
Sepration_Con***是不是用function定义的？如果是function且不是在外部mo ...

对的时function，我试试。谢谢了

宫园薰的小提琴 · 发表于 2022-4-6 12:32:49

gps99 发表于 2022-4-1 16:50
没看到全部代码，只能大致估计。
Sepration_Con***是不是用function定义的？如果是function且不是在外部mo ...

解决了，谢谢了，原来的程序只有一个external sepration……。像这种错误时引用的时候没有指定返回值吗

[子程序] error #6404怎么解决？

评分

评分