Another BLAS basic function: iamax()