mirror of
https://gitlab.alpinelinux.org/alpine/aports.git
synced 2025-07-24 19:55:26 +03:00
13 lines
365 B
Diff
13 lines
365 B
Diff
diff --git a/test/utils.f b/test/utils.f
|
|
index 83b8811..e1c5039 100644
|
|
--- a/test/utils.f
|
|
+++ b/test/utils.f
|
|
@@ -241,7 +241,7 @@ c
|
|
external slamch
|
|
common /stats/ passed,failed
|
|
integer passed,failed
|
|
- if (rnrm < 2e2*slamch('p')) then
|
|
+ if (rnrm < 3e2*slamch('p')) then
|
|
spftol = 'PASS'
|
|
passed = passed + 1
|
|
else
|