int METISNAMEU(METIS_NodeND) ( const SCOTCH_Num * const n, const SCOTCH_Num * const xadj, const SCOTCH_Num * const adjncy, const SCOTCH_Num * const numflag, const SCOTCH_Num * const options, SCOTCH_Num * const perm, SCOTCH_Num * const iperm) { return (METISNAMEU(METIS_NodeWND) (n, xadj, adjncy, NULL, numflag, options, perm, iperm)); }
void METISNAMEU(METIS_PartGraphKway) ( const int * const n, const int * const xadj, const int * const adjncy, const int * const vwgt, const int * const adjwgt, const int * const wgtflag, const int * const numflag, const int * const nparts, const int * const options, int * const edgecut, int * const part) { METISNAMEU(METIS_PartGraphRecursive) (n, xadj, adjncy, vwgt, adjwgt, wgtflag, numflag, nparts, options, edgecut, part); }
void METISNAMEU(ParMETIS_V3_PartGeomKway) ( const SCOTCH_Num * const vtxdist, SCOTCH_Num * const xadj, SCOTCH_Num * const adjncy, SCOTCH_Num * const vwgt, SCOTCH_Num * const adjwgt, const SCOTCH_Num * const wgtflag, const SCOTCH_Num * const numflag, const SCOTCH_Num * const ndims, /* Not used */ const float * const xyz, /* Not used */ const SCOTCH_Num * const ncon, /* Not used */ const SCOTCH_Num * const nparts, const float * const tpwgts, const float * const ubvec, const SCOTCH_Num * const options, /* Not used */ SCOTCH_Num * const edgecut, SCOTCH_Num * const part, MPI_Comm * commptr) { METISNAMEU(ParMETIS_V3_PartKway) (vtxdist, xadj, adjncy, vwgt, adjwgt, wgtflag, numflag, ncon, nparts, tpwgts, ubvec, options, edgecut, part, commptr); }
#include "scotch.h" #include "metis.h" /* Our "metis.h" file */ /**************************************/ /* */ /* These routines are the Fortran API */ /* for the graph ordering routines. */ /* */ /**************************************/ /* ** */ FORTRAN ( \ METISNAMEU(METIS_EDGEND), METISNAMEL(metis_edgend), ( \ const SCOTCH_Num * const n, \ const SCOTCH_Num * const xadj, \ const SCOTCH_Num * const adjncy, \ const SCOTCH_Num * const numflag, \ const SCOTCH_Num * const options, \ SCOTCH_Num * const perm, \ SCOTCH_Num * const iperm), \ (n, xadj, adjncy, numflag, options, perm, iperm)) { METISNAMEU(METIS_EdgeND) (n, xadj, adjncy, numflag, options, perm, iperm); } /* ** */
#include "scotch.h" #include "metis.h" /* Our "metis.h" file */ /**************************************/ /* */ /* These routines are the Fortran API */ /* for the graph ordering routines. */ /* */ /**************************************/ /* ** */ FORTRAN ( \ METISNAMEU(METIS_PARTGRAPHKWAY), METISNAMEL(metis_partgraphkway), ( \ const int * const n, \ const int * const xadj, \ const int * const adjncy, \ const int * const vwgt, \ const int * const adjwgt, \ const int * const wgtflag, \ const int * const numflag, \ const int * const nparts, \ const int * const options, \ int * const edgecut, \ int * const part), \ (n, xadj, adjncy, vwgt, adjwgt, wgtflag, numflag, nparts, options, edgecut, part)) { METISNAMEU(METIS_PartGraphKway) (n, xadj, adjncy, vwgt, adjwgt, wgtflag, numflag, nparts, options, edgecut, part); }