LAPACK  3.7.0
LAPACK: Linear Algebra PACKage
#define F77_ccopy   F77_GLOBAL(ccopy,CCOPY)