Fortran error

1.error#6552: The CALL statement is invoking a function subprogram as a subroutine.Fortran调用外部接口，接口返回值错误

Subroutine直接 CALL Function(a,b,c,d)

C接口存在返回值，要写出来。

logical :: CALERR
CALERR = Function(O_g(1,1),O_g(2,1),O_g(3,1))

2.error #6404: This name does not have a type, and must have an explicit type.   [……]

应用接口函数的地方忘记添加接口函数的Module了

module c

……

interface
    FUNA……
end interface

……
end module c

调用FUNA时要添加use c

subroutine FUNB(ID)
    use c
    ……

    call FUNA……

end subroutine FUNB

简单示意代码，不完整。