diff options
| author | traz <wangqian10@iscas.ac.cn> | 2011-09-05 16:30:55 +0000 |
|---|---|---|
| committer | traz <wangqian10@iscas.ac.cn> | 2011-09-05 16:30:55 +0000 |
| commit | 64fa709d1f2b758a5bcea3f32f2bb50ddae97e30 (patch) | |
| tree | 83b722388139cb2300f1218e6b3ee7028276c957 /test | |
| parent | 74d4cdb81a59393feee3affeb777d9724a5b6ff0 (diff) | |
| download | openblas-64fa709d1f2b758a5bcea3f32f2bb50ddae97e30.tar.gz openblas-64fa709d1f2b758a5bcea3f32f2bb50ddae97e30.tar.bz2 openblas-64fa709d1f2b758a5bcea3f32f2bb50ddae97e30.zip | |
Fixed #46. Initialize variables in cblat3.f and zblat3.f.
Diffstat (limited to 'test')
| -rw-r--r-- | test/cblat3.f | 2 | ||||
| -rw-r--r-- | test/zblat3.f | 2 |
2 files changed, 4 insertions, 0 deletions
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 ) |