diff --git a/tests/unit.f b/tests/unit.f index 733e010a..bd0ab42e 100644 --- a/tests/unit.f +++ b/tests/unit.f @@ -524,7 +524,7 @@ subroutine cp_unit(iflag) if (nio.eq.0) write (6,*) 'edif',edif,s1,s2 - if (edif.gt.9.e-11) iexit=iexit+8 + if (edif.gt.5.e-10) iexit=iexit+8 call exitm(iexit)