Tag: metis

使用Fortran和C调用Metis API

我编写了以下代码,用于使用Fortran和C调用Metis,但仍然会出现分段错误。 代码的目标是为输入文件chanelElements执行分区。 module metis_vars use iso_c_binding ! Variables integer :: ia, ic integer(kind=c_int) :: ne, nn integer(kind=c_int) :: ncommon, objval integer(kind=c_int) :: nparts integer(kind=c_int), allocatable, dimension(:) :: eptr, eind integer(kind=c_int), allocatable, dimension(:) :: epart, npart type(c_ptr) :: vwgt, vsize, tpwgts integer :: opts(0:40) interface subroutine METIS_PartMeshDual(ne,nn,eptr,eind,vwgt,vsize,ncommon,nparts,tpwgts,opts, & objval,epart,npart)bind(C, name=”METIS_PartMeshDual”) !subroutine METIS_PartMeshDual(ne,nn,eptr,eind,vwgt,vsize,nparts,tpwgts,opts,objval,epart,npart) & ! bind(C, name=”METIS_PartMeshDual”) […]