Lines Matching defs:ZMAKE
2747 SUBROUTINE ZMAKE( TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, KL, subroutine
2764 COMPLEX*16 ZERO, ONE
2767 COMPLEX*16 ROGUE
2769 DOUBLE PRECISION RZERO
2771 DOUBLE PRECISION RROGUE
2774 COMPLEX*16 TRANSL
2775 INTEGER KL, KU, LDA, M, N, NMAX
2776 LOGICAL RESET
2777 CHARACTER*1 DIAG, UPLO
2778 CHARACTER*2 TYPE
2780 COMPLEX*16 A( NMAX, * ), AA( * )
2782 INTEGER I, I1, I2, I3, IBEG, IEND, IOFF, J, JJ, KK
2783 LOGICAL GEN, LOWER, SYM, TRI, UNIT, UPPER
2785 COMPLEX*16 ZBEG
2817 10 CONTINUE
2824 20 CONTINUE
2832 30 CONTINUE
2835 40 CONTINUE
2836 50 CONTINUE
2841 60 CONTINUE
2844 70 CONTINUE
2847 80 CONTINUE
2848 90 CONTINUE
2868 100 CONTINUE
2871 110 CONTINUE
2874 120 CONTINUE
2879 130 CONTINUE
2901 140 CONTINUE
2904 150 CONTINUE
2907 160 CONTINUE
2912 170 CONTINUE
2937 * End of ZMAKE. argument