fixed a typo 0.0E+o --> 0.0D+0 in TESTING/LIN/zchksy.f
authorigor175 <igor175@8a072113-8704-0410-8d35-dd094bca7971>
Sun, 25 Dec 2011 23:37:10 +0000 (23:37 +0000)
committerigor175 <igor175@8a072113-8704-0410-8d35-dd094bca7971>
Sun, 25 Dec 2011 23:37:10 +0000 (23:37 +0000)
TESTING/LIN/zchksy.f

index d37f771..cd9068e 100644 (file)
       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