Markus Mottl avatar Markus Mottl committed 9ad9d24

Minor cleanups

Comments (0)

Files changed (1)

   let m = get_rows_mat_tr loc a_str a ar ac transa m_str m in
   let n = get_cols_mat_tr loc b_str b br bc transb n_str n in
   let k = get_inner_dim loc a_str a ar ac transa b_str b br bc transb k_str k in
-  let transa_char = get_trans_char transa in
-  let transb_char = get_trans_char transb in
+  let transa = get_trans_char transa in
+  let transb = get_trans_char transb in
   let c = get_c loc mat_create cr cc c m n in
-  m, n, k, transa_char, transb_char, c
+  m, n, k, transa, transb, c
 
 (* symm -- auxiliary functions *)
 
   else check_mat_square loc a_str a ar ac n;
   let side_char = get_side_char side in
   let uplo_char = get_uplo_char up in
-  let transa_char = get_trans_char transa in
+  let transa = get_trans_char transa in
   let diag_char = get_diag_char diag in
-  m, n, side_char, uplo_char, transa_char, diag_char
+  m, n, side_char, uplo_char, transa, diag_char
 
 (* syrk -- auxiliary functions *)
 
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.