PLAPACK FORTRAN-C interface

 

PLAPACK provides platform independent level-1 BLAS calls by adding the prefix ``PLA_''. Thus, the sequence of FORTRAN statements

DOUBLE PRECISION X( 100 ), Y( 100 ) 
INTEGER          N, INCX, INCY 
           ... 
CALL DCOPY( N, X, INCX, Y, INCY )

becomes the sequence of C statements

double x[ 100 ], y[ 100 ]
int    n, incx, incy;
         ...
PLA_dcopy( &n, x, &incx, y, &incy );

Since FORTRAN passes arguments by address, n, incx, and incy are passed by address. Similarly, PLAPACK supports calls PLA_ copy for .