C++ (Cpp) SCOPY_F77 Beispiele

Beispiel #1

Datei: Epetra_BLAS.cpp Projekt: cakeisalie/oomphlib_003

//=============================================================================
void Epetra_BLAS::COPY(const int N, const float * X, float * Y, const int INCX, const int INCY) const {
  SCOPY_F77(&N, X, &INCX, Y, &INCY);
  return;
}

Beispiel #2

 void BLAS<int, float>::COPY(const int n, const float* x, const int incx, float* y, const int incy) const 
 { SCOPY_F77(&n, x, &incx, y, &incy); }