Cleanup - Lapack to tile

Keep going on with the cleanup of the flush and getoncpu.

I start by the basic function of lapack to tile and tile to lapack. The idea is to remove all workspaces from pz*.c files if possible.

In this MR:

• Remove the asynchronous interface to change the data format. People cans till do it by copy/paste the synchronous one in their own code and using the asynchronous version of zlacpy.
• Remove the pztile.c file
  • Data format converion uses zlacpy
  • ztile_to_zero is a zlaset so no need for duplicated code

compute/zbuild.c

@@ -84,7 +84,7 @@
  ******************************************************************************/
 int MORSE_zbuild( MORSE_enum uplo, int M, int N,
                   MORSE_Complex64_t *A, int LDA,
-                  void *user_data, void* user_build_callback)
+                  void *user_data, void* user_build_callback )
 {
     int NB;
     int status;
@@ -124,10 +124,10 @@ int MORSE_zbuild( MORSE_enum uplo, int M, int N,
 
     /* Set NT */
     NB = MORSE_NB;
-    morse_sequence_create(morse, &sequence);
+    morse_sequence_create( morse, &sequence );
 
     /* Submit the matrix conversion */
-    morse_zlap2tile( morse, &descAl, &descAt, uplo,
+    morse_zlap2tile( morse, &descAl, &descAt, MorseDescOutput, uplo,
                      A, NB, NB, LDA, N, M, N, sequence, &request );
 
     /* Call the tile interface */
@@ -135,15 +135,15 @@ int MORSE_zbuild( MORSE_enum uplo, int M, int N,
 
     /* Submit the matrix conversion back */
     morse_ztile2lap( morse, &descAl, &descAt,
-                     MorseUpperLower, sequence, &request );
+                     MorseDescOutput, uplo, sequence, &request );
 
-    morse_sequence_wait(morse, sequence);
+    morse_sequence_wait( morse, sequence );
 
     /* Cleanup the temporary data */
     morse_ztile2lap_cleanup( morse, &descAl, &descAt );
 
     status = sequence->status;
-    morse_sequence_destroy(morse, sequence);
+    morse_sequence_destroy( morse, sequence );
 
     return status;
 }
@@ -203,13 +203,15 @@ int MORSE_zbuild_Tile( MORSE_enum uplo, MORSE_desc_t *A,
         morse_fatal_error("MORSE_zbuild_Tile", "MORSE not initialized");
         return MORSE_ERR_NOT_INITIALIZED;
     }
-    morse_sequence_create(morse, &sequence);
+    morse_sequence_create( morse, &sequence );
+
     MORSE_zbuild_Tile_Async( uplo, A, user_data, user_build_callback, sequence, &request );
 
-    morse_sequence_wait(morse, sequence);
+    MORSE_Desc_Flush( A, sequence );
 
+    morse_sequence_wait( morse, sequence );
     status = sequence->status;
-    morse_sequence_destroy(morse, sequence);
+    morse_sequence_destroy( morse, sequence );
     return status;
 }
 
@@ -259,7 +261,7 @@ int MORSE_zbuild_Tile( MORSE_enum uplo, MORSE_desc_t *A,
 int MORSE_zbuild_Tile_Async( MORSE_enum uplo, MORSE_desc_t     *A,
                              void *user_data, void* user_build_callback,
                              MORSE_sequence_t *sequence,
-                             MORSE_request_t  *request)
+                             MORSE_request_t  *request )
 {
     MORSE_context_t *morse;
 
@@ -277,10 +279,12 @@ int MORSE_zbuild_Tile_Async( MORSE_enum uplo, MORSE_desc_t     *A,
         return MORSE_ERR_UNALLOCATED;
     }
     /* Check sequence status */
-    if (sequence->status == MORSE_SUCCESS)
+    if (sequence->status == MORSE_SUCCESS) {
         request->status = MORSE_SUCCESS;
-    else
+    }
+    else {
         return morse_request_fail(sequence, request, MORSE_ERR_SEQUENCE_FLUSHED);
+    }
 
     /* Check descriptors for correctness */
     if (morse_desc_check(A) != MORSE_SUCCESS) {
@@ -289,10 +293,11 @@ int MORSE_zbuild_Tile_Async( MORSE_enum uplo, MORSE_desc_t     *A,
     }
 
     /* Quick return */
-    if (chameleon_min( A->m, A->n ) == 0)
+    if (chameleon_min( A->m, A->n ) == 0) {
         return MORSE_SUCCESS;
+    }
 
-    morse_pzbuild(uplo, A, user_data, user_build_callback, sequence,  request);
+    morse_pzbuild( uplo, A, user_data, user_build_callback, sequence, request );
 
     return MORSE_SUCCESS;
 }