diff --git a/test/cblat3.f b/test/cblat3.f index b26be91e6..5df1ddd64 100644 --- a/test/cblat3.f +++ b/test/cblat3.f @@ -1301,6 +1301,8 @@ NC = 0 RESET = .TRUE. ERRMAX = RZERO + RALS = RONE + RBETS = RONE * DO 100 IN = 1, NIDIM N = IDIM( IN ) diff --git a/test/zblat3.f b/test/zblat3.f index d6a522f2a..f03b1a617 100644 --- a/test/zblat3.f +++ b/test/zblat3.f @@ -1303,6 +1303,8 @@ NC = 0 RESET = .TRUE. ERRMAX = RZERO + RALS = RONE + RBETS = RONE * DO 100 IN = 1, NIDIM N = IDIM( IN )