User`s manual

3 Creating Fortran MEX-Files

3-34

call mxFreeMatrix(lhs(1))

return

end

C $Revision: 1.3 $

================================================================

C fill.f

C This is the subfunction called by sincall that fills the

C mxArray with data. Your version of fill can load your data

C however you would like.

C This is a MEX-file for MATLAB.

================================================================

C Subroutine for filling up data.

subroutine fill(pr, m, n, max)

real*8 pr(*)

integer i, m, n, max

m=max/2

n=1

do 10 i=1,m

10 pr(i)=i*(4*3.1415926/max)

return

end

It is possible to use mexCallMATLAB (or any other API routine) from within your

computational Fortran subroutine. Note that you can only call most MATLAB

functions with double-precision data. M-functions that perform computations,

eig, will not work correctly with data that is not double precision.