mxCopyReal8ToPtr (MATLAB Application Program Interface)

Copy REAL*8 values from a Fortran array to a pointer array

subroutine mxCopyReal8ToPtr(y, px, n)
real*8 y(n)
integer*4 px, n

Arguments

n
Number of elements to copy.

px
Pointer to pr or pi array.

y
REAL*8 Fortran array.

Description

mxCopyReal8ToPtr(y,px,n) copies n REAL*8 values from the Fortran REAL*8 array y into the MATLAB array pointed to by px, either a pr or pi array. 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.