fixed issue with malloc of tiles

compute/pzgelqf_param.c

@@ -87,8 +87,8 @@ void morse_pzgelqf_param( const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_de
 
     /* Initialisation of tiles */
 
-    tiles = (int*)malloc((qrtree->nt)*sizeof(int));
-    memset( tiles, 0, (qrtree->nt)*sizeof(int) );
+    tiles = (int*)malloc((qrtree->mt)*sizeof(int));
+    memset( tiles, 0, (qrtree->mt)*sizeof(int) );
 
     ws_worker *= sizeof(MORSE_Complex64_t);
     ws_host   *= sizeof(MORSE_Complex64_t);

compute/pzunglq_param.c

@@ -137,6 +137,7 @@ void morse_pzunglq_param(const libhqr_tree_t *qrtree, MORSE_desc_t *A, MORSE_des
             else {
                 for (m = k; m < Q->mt; m++) {
                     tempmm = m == Q->mt-1 ? Q->m-m*Q->mb : Q->mb;
+                    ldqm = BLKLDD(Q, m);
                     MORSE_TASK_zttmlq(
                         &options,
                         MorseRight, MorseNoTrans,

compute/pzunmlq_param.c

@@ -81,8 +81,8 @@ void morse_pzunmlq_param(const libhqr_tree_t *qrtree,
 #endif
 
     /* Initialisation of tiles */
-    tiles = (int*)malloc((qrtree->nt)*sizeof(int));
-    memset( tiles, 0, (qrtree->nt)*sizeof(int) );
+    tiles = (int*)malloc((qrtree->mt)*sizeof(int));
+    memset( tiles, 0, (qrtree->mt)*sizeof(int) );
 
     ws_worker *= sizeof(MORSE_Complex64_t);
     ws_host   *= sizeof(MORSE_Complex64_t);