add methods to create select operator

Author: abhinavmehndiratta

src/Object_Methods/Algebra_Methods.jl

@@ -218,3 +218,21 @@ function GrB_Semiring_new(semiring::GrB_Semiring, monoid::GrB_Monoid, binary_op:
                 )
             )
 end
+
+function GxB_SelectOp_new(op::GxB_SelectOp, GxB_select_function::Function, xtype::GrB_Type{T}, ktype::GrB_Type{U}) where {T <: valid_types, U <: valid_types}
+
+    GxB_select_function_C = @cfunction(
+                                    $GxB_select_function, 
+                                    Bool, 
+                                    (Cintmax_t, Cintmax_t, Cintmax_t, Cintmax_t, Ref{T}, Ref{U})
+                                )
+    
+    return GrB_Info(
+            ccall(
+                    dlsym(graphblas_lib, "GxB_SelectOp_new"),
+                    Cint,
+                    (Ptr{Cvoid}, Ptr{Cvoid}, Ptr{Cvoid}),
+                    op.p, GxB_select_function_C, xtype.p
+                )
+            )
+end

src/Structures.jl

@@ -2,7 +2,7 @@ import Base.show
 import Base.==
 import Base.pointer
 export GrB_Type, GrB_UnaryOp, GrB_BinaryOp, GrB_Monoid, GrB_Semiring,
-       GrB_Vector, GrB_Matrix, GrB_Descriptor
+       GrB_Vector, GrB_Matrix, GrB_Descriptor, GxB_SelectOp
 
 abstract type GrB_Struct end
 

src/SuiteSparseGraphBLAS.jl

@@ -183,7 +183,7 @@ GrB_Vector_nvals, GrB_Vector_setElement, GrB_Vector_extractElement, GrB_Vector_e
 GrB_Descriptor_new, GrB_Descriptor_set,
 
 # Algebra Methods
-GrB_UnaryOp_new, GrB_BinaryOp_new, GrB_Monoid_new, GrB_Semiring_new,
+GrB_UnaryOp_new, GrB_BinaryOp_new, GrB_Monoid_new, GrB_Semiring_new, GxB_SelectOp_new,
 
 # Free Methods
 GrB_free, GrB_UnaryOp_free, GrB_BinaryOp_free, GrB_Monoid_free, GrB_Semiring_free,