From aa17a407706b76a08187e1cc6d2a5f9d1b8b2ffb Mon Sep 17 00:00:00 2001 From: igor175 Date: Sun, 25 Dec 2011 23:37:10 +0000 Subject: [PATCH] fixed a typo 0.0E+o --> 0.0D+0 in TESTING/LIN/zchksy.f --- TESTING/LIN/zchksy.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/TESTING/LIN/zchksy.f b/TESTING/LIN/zchksy.f index d37f771..cd9068e 100644 --- a/TESTING/LIN/zchksy.f +++ b/TESTING/LIN/zchksy.f @@ -197,7 +197,7 @@ DOUBLE PRECISION ZERO PARAMETER ( ZERO = 0.0D+0 ) COMPLEX*16 CZERO - PARAMETER ( CZERO = ( 0.0E+0, 0.0E+0 ) ) + PARAMETER ( CZERO = ( 0.0D+0, 0.0D+0 ) ) INTEGER NTYPES PARAMETER ( NTYPES = 11 ) INTEGER NTESTS -- 2.7.4