C++ (Cpp) IDAMAXの例

コード例 #1

ファイル: blasGoto.c プロジェクト: Vladimir84/rcc

int F77_NAME(idamax)(const int *n, const double *dx, const int *incx)
{
    return IDAMAX(n, dx, incx);
}

コード例 #2

ファイル: IpBlas.cpp プロジェクト: AyMaN-GhOsT/simbody

  /* Interface to FORTRAN routine DASUM. */
  Index IpBlasIdamax(Index size, const Number *x, Index incX)
  {
    ipfint n=size, INCX=incX;

    return (Index) IDAMAX(&n, x, &INCX);
  }