Skip to content

Commit 7af8b21

Browse files
committed
disable NaN checks before BLAS calls dsolve.R (shorter formula)
1 parent 2777a7f commit 7af8b21

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

benchmark/scripts/R/dsolve.R

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -40,7 +40,7 @@ while (n <= nto) {
4040
solve(A, B)
4141
})
4242

43-
mflops <- (2.0/3 * n * n * n + 2 * n * n * n) * loops/ (z[3] * 1e+06)
43+
mflops <- (8.0 / 3 * n * n * n) * loops / (z[3] * 1e+06)
4444

4545
st <- sprintf("%.0fx%.0f :", n, n)
4646
cat(sprintf("%20s %10.2f MFlops %10.6f sec\n", st, mflops, z[3]))

0 commit comments

Comments
 (0)