function cblas_idamax is not giving the correct answer