Использование Boost Graph Library (BGL) в программе Fortran

Question

Использование Boost Graph Library (BGL) в программе Fortran

Есть ли в любом случае, я могу использовать структуру данных графа, используя Boost Graph Library (BGL) внутри моей программы FORTRAN.

Может ли кто-нибудь помочь мне или дать мне подсказку. Я хочу создать параллельную структуру графа на нескольких процессорах в моем коде MPI-FORTRAN. Можно ли использовать Boost Graph Library (BGL) для этой цели!

С уважением,
Зив

3

boost c++fortran hybrid

Решение

Другие решения

Нет, boost — это библиотека шаблонов C ++. Если вы не перенесете код на FORTRAN, это невозможно.

0

Источник

Accepted Answer

Вам придется создать промежуточный слой, написанный на C ++, который делает все шаблоны в каком-то особом случае полезным для вас, а затем вызывать его из Fortran. bind(C) а также iso_c_binding модуль ваши друзья. Я успешно использую основанную на Boost библиотеку CGAL в Fortran, используя этот подход.

Что-то вроде:

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 возвращает непрозрачный указатель на график из введенных точек.

7