MATLAB_CALLS_F77
Examples of MATLAB calling FORTRAN77 functions


MATLAB_CALLS_F77 is a directory of MATLAB programs which illustrate how a MATLAB program can call a FORTRAN77 function, passing data to the function, and receiving results from the FORTRAN77 function.

Of course, a MATLAB call normally looks something like

[ out1, out2 ] = function_name ( in1, in2, in3 )
so in order to pass the information to and from MATLAB, the FORTRAN function is required to have a header like this:
subroutine mexFunction ( nlhs, plhs, nrhs, prhs )
where nlhs counts the number of output arguments, and plhs is an integer array of pointers to those arguments, with nrhs and prhs being the analogous quantities for the input arguments.

The MATLAB Mex library includes a number of operators to extract information from the MATLAB input arguments, and to store the computed results into the output arguments.

Once the F&& file is written, it must be "compiled" with the MATLAB MEX compiler, which will, as part of its work, also invoke some C compiler on your machine. The first time you use the MEX compiler, you may need to tell it where the appropriate compiler is, or which compiler to use. You can also, at any time, request that MEX switch to a different compiler, if there is a choice. (For instance, you may be able to choose between your computer's default "f77" compiler and the GNU "g77" compiler.) To choose or change your compiler, type (inside of MATLAB)

mex -seteup

Assuming your F77 file is called fact.f, for example, you can process it through the MEX compiler. You can always issue this command inside of MATLAB, and on some systems, the MEX compiler may be availabe directly as an external command. In either case, you issue the command:

mex fact.f
which creates a compiled file whose name is system-dependent. On a Windows PC, it might be called fact.dll, and on a UNIX system, it might be something like fact.mexglx. In any case, the compiled file behaves essentially like a MATLAB M file called fact.m (except that it should, you hope, execute much faster than a MATLAB script).

In the very likely event that you have problems compiling the code, or using it from MATLAB, you may want to request the verbose compilation, with symbolic information added for debugging:

mex -v -g fact.f

Licensing:

The computer code and data files described and made available on this web page are distributed under the GNU LGPL license.

Related Data and Programs:

C_CALLS_F77, C programs which illustrate a C program calling a FORTRAN77 subroutine.

C_CALLS_F90, C programs which illustrate a C program calling a FORTRAN90 subroutine.

C++_CALLS_F77, C++ programs which illustrate how a C++ main program can call a FORTRAN77 subroutine.

C++_CALLS_F90, C++ programs which illustrate how a C++ main program can call a FORTRAN90 subroutine.

F77_CALLS_C, FORTRAN77 programs which illustrates how a FORTRAN77 program can call a C function.

F77_CALLS_C++, FORTRAN77 programs which illustrates how a FORTRAN77 program can call a C++ function.

F90_CALLS_C, FORTRAN90 programs which illustrates how a FORTRAN90 program can call a C function.

F90_CALLS_C++, FORTRAN90 programs which illustrates how a FORTRAN90 program can call a C++ function.

F90_CALLS_MATLAB, FORTRAN90 programs which call MATLAB to carry out an auxillary calculation.

MATLAB_CALLS_C, MATLAB programs which call a C function using the MEX facility.

MEX, MATLAB programs which call lower-level functions written in traditional languages such as C, C++, FORTRAN77 or FORTRAN90, compiled with MATLAB's mex compiler.

MIXED, FORTRAN77 programs which call routines in other programming languages, and vice versa.

Reference:

Examples:

FACT is an example in which a FORTRAN77 function is used to compute the factorial function. A single routine is used, which takes care of the "translation" between MATLAB and FORTRAN77, and the computation of the result.

CHEBY_U is an example in which a FORTRAN77 function is used to compute the Chebyshev U polynomial. The coding is done in such a way that the computation is in a separate FORTRAN77 function; the mexFunction is only used to "translate" between MATLAB and C.

You can go up one level to the MATLAB source codes.


Last revised on 01 September 2006.