agpl_1.0.0_b5da3320/src/agpl-boost/agpl-boost-graphs.ads

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
with Agpl.Interfaces.C.Types;

package Agpl.Boost.Graphs is

   pragma Preelaborate;

   function Inf_Weight return Interfaces.C.Types.Double;

   subtype Weight        is Interfaces.C.Types.Double;
   subtype Weight_Matrix is Interfaces.C.Types.Double_Arrays.C_Matrix;

   function Prim (Weights : Weight_Matrix)
                  return    Weight_Matrix;
   --  Non-tree edges set to Inf_Weight
   --  Tree     edges retain its weight

private

   pragma Import (C, Inf_Weight, "INF_WEIGHT");
   pragma Inline (Inf_Weight);

end Agpl.Boost.Graphs;