mxCopyPtrToComplex16 (MATLAB Application Program Interface)

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

subroutine mxCopyPtrToComplex16(pr, pi, y, 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

mxCopyPtrToComplex16 copies n COMPLEX*16 values from the MATLAB arrays pointed to by pr and pi into the Fortran COMPLEX*16 array y. 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.