| /external/eigen/blas/testing/ |
| H A D | cblat2.f | 78 INTEGER NINMAX, NIDMAX, NKBMAX, NALMAX, NBEMAX variable in program:CBLAT2
80 $ NALMAX = 7, NBEMAX = 7 )
92 $ ALF( NALMAX ), AS( NMAX*NMAX ), BET( NBEMAX ),
200 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
201 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
|
| H A D | cblat3.f | 60 INTEGER NIDMAX, NALMAX, NBEMAX variable in program:CBLAT3
61 PARAMETER ( NIDMAX = 9, NALMAX = 7, NBEMAX = 7 )
73 $ BB( NMAX*NMAX ), BET( NBEMAX ),
151 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
152 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
|
| H A D | dblat2.f | 75 INTEGER NINMAX, NIDMAX, NKBMAX, NALMAX, NBEMAX variable in program:DBLAT2
77 $ NALMAX = 7, NBEMAX = 7 )
89 $ ALF( NALMAX ), AS( NMAX*NMAX ), BET( NBEMAX ),
195 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
196 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
|
| H A D | dblat3.f | 55 INTEGER NIDMAX, NALMAX, NBEMAX variable in program:DBLAT3
56 PARAMETER ( NIDMAX = 9, NALMAX = 7, NBEMAX = 7 )
68 $ BB( NMAX*NMAX ), BET( NBEMAX ),
144 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
145 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
|
| H A D | sblat2.f | 75 INTEGER NINMAX, NIDMAX, NKBMAX, NALMAX, NBEMAX variable in program:SBLAT2
77 $ NALMAX = 7, NBEMAX = 7 )
89 $ ALF( NALMAX ), AS( NMAX*NMAX ), BET( NBEMAX ),
195 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
196 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
|
| H A D | sblat3.f | 55 INTEGER NIDMAX, NALMAX, NBEMAX variable in program:SBLAT3
56 PARAMETER ( NIDMAX = 9, NALMAX = 7, NBEMAX = 7 )
68 $ BB( NMAX*NMAX ), BET( NBEMAX ),
144 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
145 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
|
| H A D | zblat2.f | 79 INTEGER NINMAX, NIDMAX, NKBMAX, NALMAX, NBEMAX variable in program:ZBLAT2
81 $ NALMAX = 7, NBEMAX = 7 )
93 $ ALF( NALMAX ), AS( NMAX*NMAX ), BET( NBEMAX ),
201 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
202 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
|
| H A D | zblat3.f | 61 INTEGER NIDMAX, NALMAX, NBEMAX variable in program:ZBLAT3
62 PARAMETER ( NIDMAX = 9, NALMAX = 7, NBEMAX = 7 )
74 $ BB( NMAX*NMAX ), BET( NBEMAX ),
152 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
153 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
|