Lines Matching refs:SIDE
729 CHARACTER*1 SIDE, SIDES, UPLO, UPLOS local
784 SIDE = ICHS( ICS: ICS )
785 LEFT = SIDE.EQ.'L'
825 SIDES = SIDE
847 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SIDE,
852 CALL CHEMM( SIDE, UPLO, M, N, ALPHA, AA, LDA,
855 CALL CSYMM( SIDE, UPLO, M, N, ALPHA, AA, LDA,
869 ISAME( 1 ) = SIDES.EQ.SIDE
946 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, M, N, ALPHA, LDA,
1007 CHARACTER*1 DIAG, DIAGS, SIDE, SIDES, TRANAS, TRANSA, UPLO, local
1056 SIDE = ICHS( ICS: ICS )
1057 LEFT = SIDE.EQ.'L'
1099 SIDES = SIDE
1120 $ SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA,
1124 CALL CTRMM( SIDE, UPLO, TRANSA, DIAG, M,
1129 $ SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA,
1133 CALL CTRSM( SIDE, UPLO, TRANSA, DIAG, M,
1147 ISAME( 1 ) = SIDES.EQ.SIDE
1256 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, TRANSA, DIAG, M,