Feature mpi comm user

compute/pzgetrf.c

@@ -400,7 +400,7 @@ void chameleon_pzgetrf( struct chameleon_pzgetrf_s *ws,
     if ( (ws->alg == ChamGetrfNoPivPerColumn) ||
          (ws->alg == ChamGetrfNoPiv ) )
     {
-        RUNTIME_ipiv_init( IPIV );
+        RUNTIME_ipiv_init( sequence, IPIV );
     }
 
     RUNTIME_options_finalize( &options, chamctxt );