Home
last modified time | relevance | path

Searched refs:NINC (Results 1 – 8 of 8) sorted by relevance

/external/cblas/testing/
Dc_dblat2.f79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
172 READ( NIN, FMT = * )NINC
173 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
177 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
178 DO 30 I = 1, NINC
204 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
318 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
324 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
332 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
338 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
[all …]
Dc_sblat2.f79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
172 READ( NIN, FMT = * )NINC
173 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
177 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
178 DO 30 I = 1, NINC
204 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
318 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
324 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
332 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
338 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
[all …]
Dc_cblat2.f82 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
176 READ( NIN, FMT = * )NINC
177 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
181 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
182 DO 30 I = 1, NINC
208 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
322 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
328 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
336 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
342 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
[all …]
Dc_zblat2.f83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
177 READ( NIN, FMT = * )NINC
178 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
182 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
183 DO 30 I = 1, NINC
209 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
322 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
328 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
336 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
342 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
[all …]
/external/eigen/blas/testing/
Ddblat2.f126 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
220 READ( NIN, FMT = * )NINC
221 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
225 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
226 DO 30 I = 1, NINC
252 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
343 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
349 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
355 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
360 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
Dsblat2.f126 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
220 READ( NIN, FMT = * )NINC
221 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
225 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
226 DO 30 I = 1, NINC
252 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
343 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
349 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
355 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
360 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
Dcblat2.f129 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
225 READ( NIN, FMT = * )NINC
226 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
230 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
231 DO 30 I = 1, NINC
257 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
348 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
354 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
360 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
365 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
Dzblat2.f130 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
226 READ( NIN, FMT = * )NINC
227 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
231 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
232 DO 30 I = 1, NINC
258 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
349 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
355 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
361 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
366 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]