Searched refs:matrix_type_l (Results 1 – 2 of 2) sorted by relevance
160 CHARACTER :: matrix_type_l local400 matrix_type_l = matrix_type401 CALL uppercase(matrix_type_l)402 SELECT CASE (matrix_type_l)
161 CHARACTER :: matrix_type_l local401 matrix_type_l = matrix_type402 CALL uppercase(matrix_type_l)403 SELECT CASE (matrix_type_l)