MPI communicator handle must be converted

The MPI communicator handle must be explicitly converted.

src/ALL_fortran.cpp

@@ -39,6 +39,14 @@ extern "C"
         return new ALL<double,double>(dim,gamma);
     }
 
+    // set grid parameters
+    void ALL_set_proc_grid_params_f(ALL<double,double>* all_obj, int nloc, int* loc, int nsize, int* size)
+    {
+	if(all_obj->get_dimension() != nloc) throw ALL_Invalid_Argument_Exception(__FILE__,__func__,__LINE__,"Length of index array does not match dimension");
+	if(all_obj->get_dimension() != nsize) throw ALL_Invalid_Argument_Exception(__FILE__,__func__,__LINE__,"Length of size array does not match dimension");
+        all_obj->set_proc_grid_params(loc,size);
+    }
+
     // wrapper to set the minimum domain size
     void ALL_set_min_domain_size_f(ALL<double,double>* all_obj, ALL_LB_t method, int dim, double* domain_size)
     {