c – 在Fortran程序中使用Boost Graph Library(BGL)

发布时间：2020-12-16 09:50:12 所属栏目：百科来源：网络整理

导读：无论如何,我可以在FORTRAN程序中使用Boost Graph Library(BGL)来使用图形数据结构. 任何人都可以帮助我或给我一个提示.我想在我的MPI-FORTRAN代码中的几个处理器上进行并行图结构.是否可以使用Boost Graph Library(BGL)来达到此目的！亲切的问候, 谢夫解决

无论如何,我可以在FORTRAN程序中使用Boost Graph Library(BGL)来使用图形数据结构.

任何人都可以帮助我或给我一个提示.我想在我的MPI-FORTRAN代码中的几个处理器上进行并行图结构.是否可以使用Boost Graph Library(BGL)来达到此目的！

亲切的问候,
谢夫

解决方法

你必须构造一个用C语言编写的中间层,它在一些特殊情况下对你有用,然后从Fortran调用它. bind(C)和iso_c_binding模块是你的朋友.我使用这种方法成功地在Fortran中使用基于Boost的库CGAL.

有点像：

my_bgl.cc：

#include <boost/graph/graph_traits.hpp>
  #include <boost/graph/adjacency_list.hpp>

  using namespace boost;
extern "C"{  
  void* make_graph(int num_vertices,int num_edges,int *edge_array)
  {

    // create a typedef for the Graph type
    typedef adjacency_list<vecS,vecS,bidirectionalS> Graph;

    Graph *g = new Graph(num_vertices);

    // add the edges to the graph object
    for (int i = 0; i < num_edges; ++i)
      add_edge(edge_array[2*i],edge_array[2*i+1],*g);

    return g;
  }
}

my_bgl.f90：

module my_bgl
  use iso_c_binding

  interface
    type(c_ptr) function make_graph(num_vertices,num_edges,edge_array) bind(C,name="make_graph")
      import
      integer(c_int),value :: num_vertices
      integer(c_int),value :: num_edges
      integer(c_int) :: edge_array(2,num_edges)
    end function
  end interface

end module

函数make_graph从输入的点返回一个指向Graph的不透明指针.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!