mxCopyComplex16ToPtr (MATLAB Application Program Interface)

Copy COMPLEX*16 values from a Fortran array to a pointer array

subroutine mxCopyComplex16ToPtr(y, pr, pi, n)
complex*16 y(n)
integer*4 pr, pi, n

Arguments

n
Number of elements to copy.

pi
Pointer to pi array.

pr
Pointer to pr array.

y
COMPLEX*16 Fortran array.

Description

mxCopyComplex16ToPtr copies n COMPLEX*16 values from the Fortran COMPLEX*16 array y into the MATLAB arrays pointed to by pr and pi. This subroutine is essential for use with Fortran compilers that do not support the %VAL construct in order to set up standard Fortran arrays for passing as arguments to the computation routine of a MEX-file.