Create the CombBLAS::SpParMat with the MPI_Comm from the input 'gridinfo_t'.
This prevents a warning/error from CombBLAS about using MPI_COMM_WORLD.

--- a/SRC/AWPM_CombBLAS.hpp
+++ b/SRC/AWPM_CombBLAS.hpp
@@ -52,7 +52,7 @@
     {
         printf("AWPM only supports square process grid. Retuning without a permutation.\n");
     }
-    combblas::SpParMat < int_t, double, combblas::SpDCCols<int_t,double> > Adcsc;
+    combblas::SpParMat < int_t, double, combblas::SpDCCols<int_t,double> > Adcsc(grid->comm);
     std::vector< std::vector < std::tuple<int_t,int_t,double> > > data(procs);
     
     /* ------------------------------------------------------------
@@ -100,11 +100,10 @@
     combblas::AWPM(Adcsc, mateRow2Col, mateCol2Row,true);
     
     // now gather the matching vector
-    MPI_Comm World = mateRow2Col.getcommgrid()->GetWorld();
     int * rdispls = new int[procs];
     int sendcnt = mateRow2Col.LocArrSize();
     int * recvcnt = new int[procs];
-    MPI_Allgather(&sendcnt, 1, MPI_INT, recvcnt, 1, MPI_INT, World);
+    MPI_Allgather(&sendcnt, 1, MPI_INT, recvcnt, 1, MPI_INT, grid->comm);
     rdispls[0] = 0;
     for(int i=0; i<procs-1; ++i)
     {
@@ -112,7 +111,7 @@
     }
     int_t *senddata = (int_t *)mateRow2Col.GetLocArr();
     
-    MPI_Allgatherv(senddata, sendcnt, combblas::MPIType<int_t>(), ScalePermstruct->perm_r, recvcnt, rdispls, combblas::MPIType<int_t>(), World);
+    MPI_Allgatherv(senddata, sendcnt, combblas::MPIType<int_t>(), ScalePermstruct->perm_r, recvcnt, rdispls, combblas::MPIType<int_t>(), grid->comm);
     
     delete[] rdispls;
     delete[] recvcnt;
e='id' value='3b2e88011a485293bd11b25466ffbaa8791ec64a'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=3b2e88011a485293bd11b25466ffbaa8791ec64a'>root</a>/<a href='/guix/log/gnu?id=3b2e88011a485293bd11b25466ffbaa8791ec64a'>gnu</a>/<a href='/guix/log/gnu/services?id=3b2e88011a485293bd11b25466ffbaa8791ec64a'>services</a>/<a href='/guix/log/gnu/services/pm.scm?id=3b2e88011a485293bd11b25466ffbaa8791ec64a'>pm.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/services/pm.scm?id=3b2e88011a485293bd11b25466ffbaa8791ec64a&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2022-06-15 00:25:21 +0200'>2022-06-15</span></td><td><a href='/guix/commit/gnu/services/pm.scm?id=8cb1a49a3998c39f315a4199b7d4a121a6d66449'>services: configuration: Use *unspecified* instead of 'disabled.</a><span class='msg-avail'>...</span></td><td>Attila Lendvai</td></tr>
<tr><td><span title='2022-03-20 16:40:22 +0100'>2022-03-20</span></td><td><a href='/guix/commit/gnu/services/pm.scm?id=10d865aa921f559562fb543d7796c7a08e17f016'>services: thermald: Add 'adaptive?' field.</a><span class='msg-avail'>...</span></td><td>Jelle Licht</td></tr>
<tr><td><span title='2022-02-02 10:43:04 +0100'>2022-02-02</span></td><td><a href='/guix/commit/gnu/services/pm.scm?id=67f28faf42a362ae4d50ede4cc48782e2aea887f'>services: tlp: Add config variables for battery charging.</a><span class='msg-avail'>...</span></td><td>Attila Lendvai</td></tr>
<tr><td><span title='2021-11-30 01:08:55 +0100'>2021-11-30</span></td><td><a href='/guix/commit/gnu/services/pm.scm?id=892f1b7273d57b25940700877a02618fe826cc08'>services: Accept &lt;inferior-package&gt;s in lieu of &lt;package&gt;s.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>