File tree Expand file tree Collapse file tree
src/GraphBLAS-sharp.Backend Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -102,7 +102,7 @@ module StandardOperations =
102102 let floatMulAtLeastOne = mkNumericMulAtLeastOne 0.0
103103 let float32MulAtLeastOne = mkNumericMulAtLeastOne 0 f
104104
105- let atLeastOneToNormalForm op =
105+ let atLeastOneToOption op =
106106 <@ fun ( leftItem : 'a option ) ( rightItem : 'b option ) ->
107107 match leftItem, rightItem with
108108 | Some left, Some right -> (% op) ( Both( left, right))
Original file line number Diff line number Diff line change @@ -507,7 +507,7 @@ module COOMatrix =
507507 workGroupSize
508508 =
509509
510- elementwise clContext ( StandardOperations.atLeastOneToNormalForm opAdd) workGroupSize
510+ elementwise clContext ( StandardOperations.atLeastOneToOption opAdd) workGroupSize
511511
512512 let transposeInplace ( clContext : ClContext ) workGroupSize =
513513
Original file line number Diff line number Diff line change @@ -126,7 +126,7 @@ module CSRMatrix =
126126 workGroupSize
127127 =
128128
129- elementwiseWithCOO clContext ( StandardOperations.atLeastOneToNormalForm opAdd) workGroupSize
129+ elementwiseWithCOO clContext ( StandardOperations.atLeastOneToOption opAdd) workGroupSize
130130
131131 let transposeInplace ( clContext : ClContext ) workGroupSize =
132132
@@ -232,15 +232,15 @@ module CSRMatrix =
232232 workGroupSize
233233 =
234234
235- elementwiseToCOO clContext ( StandardOperations.atLeastOneToNormalForm opAdd) workGroupSize
235+ elementwiseToCOO clContext ( StandardOperations.atLeastOneToOption opAdd) workGroupSize
236236
237237 let elementwiseAtLeastOne < 'a , 'b , 'c when 'a : struct and 'b : struct and 'c : struct and 'c : equality >
238238 ( clContext : ClContext )
239239 ( opAdd : Expr < AtLeastOne < 'a , 'b > -> 'c option >)
240240 workGroupSize
241241 =
242242
243- elementwise clContext ( StandardOperations.atLeastOneToNormalForm opAdd) workGroupSize
243+ elementwise clContext ( StandardOperations.atLeastOneToOption opAdd) workGroupSize
244244
245245 let spgemmCSC
246246 ( clContext : ClContext )
You can’t perform that action at this time.
0 commit comments