Lines Matching defs:ZMMCH
2434 SUBROUTINE ZMMCH( TRANSA, TRANSB, M, N, KK, ALPHA, A, LDA, B, LDB, subroutine
2449 COMPLEX*16 ZERO
2451 DOUBLE PRECISION RZERO, RONE
2454 COMPLEX*16 ALPHA, BETA
2455 DOUBLE PRECISION EPS, ERR
2456 INTEGER KK, LDA, LDB, LDC, LDCC, M, N, NOUT
2457 LOGICAL FATAL, MV
2458 CHARACTER*1 TRANSA, TRANSB
2460 COMPLEX*16 A( LDA, * ), B( LDB, * ), C( LDC, * ),
2461 $ CC( LDCC, * ), CT( * )
2462 DOUBLE PRECISION G( * )
2464 COMPLEX*16 CL
2465 DOUBLE PRECISION ERRI
2466 INTEGER I, J, K local
2467 LOGICAL CTRANA, CTRANB, TRANA, TRANB
2471 DOUBLE PRECISION ABS1
2489 10 CONTINUE
2495 20 CONTINUE
2496 30 CONTINUE
2504 40 CONTINUE
2505 50 CONTINUE
2512 60 CONTINUE
2513 70 CONTINUE
2522 80 CONTINUE
2523 90 CONTINUE
2530 100 CONTINUE
2531 110 CONTINUE
2542 120 CONTINUE
2543 130 CONTINUE
2551 140 CONTINUE
2552 150 CONTINUE
2562 160 CONTINUE
2563 170 CONTINUE
2570 180 CONTINUE
2571 190 CONTINUE
2579 200 CONTINUE
2591 210 CONTINUE
2593 220 CONTINUE
2621 * End of ZMMCH. argument