fortran 调用 matlab 函数

fcode

因为你用的64位 Fortran，所以你应该用
integer(8),external::engOpen,engPutVariable,engGetVariable,engEvalString,engClose
integer(8) , external :: mxCreateDoubleMatrix,mxGetPr
代替
integer,external::engOpen,engPutVariable,engGetVariable,engEvalString,engClose
integer,external::mxCreateDoubleMatrix,mxGetPr

同样的还有：
integer(8) ep !指针，用于指向打开的matlab
integer(8) ptemp

凡是 Matlab 返回指针的，都应该用 integer(8) 才对。

我记得有个 include "fintrf.h" 文件，里面定义了 mwPointer 这个东西。在64位时自动为integer(8)，在32位时自动为 integer
这样，你就可以不必考虑是32位还是64位了。