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

Question

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

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

С наилучшими пожеланиями, Зив

Answer 1

Вам нужно будет создать промежуточный уровень, написанный на C++, который делает все шаблоны в каком-то специальном случае полезными для вас, а затем вызывает его из Fortran. bind(C) и iso_c_binding модуль - ваши друзья. Используя этот подход, я успешно использую библиотеку CGAL на основе Boost в 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 возвращает непрозрачный указатель на графике из точек, введенных ,

Answer 2

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