@@ -208,7 +208,7 @@ and CSRMatrix<'a> =
208208 RowCount = rowsCount
209209 ColumnCount = columnsCount }
210210
211- static member ToBackend ( context : ClContext ) matrix =
211+ static member ToBackend ( context : ClContext ) matrix =
212212 let rowIndices2rowPointers ( rowIndices : int []) rowCount =
213213 let nnzPerRow = Array.zeroCreate rowCount
214214 let rowPointers = Array.zeroCreate rowCount
@@ -224,24 +224,27 @@ and CSRMatrix<'a> =
224224 | MatrixCOO m ->
225225 let rowPointers =
226226 context.CreateClArray(
227- rowIndices2rowPointers m.Rows m.RowCount
228- , hostAccessMode = HostAccessMode.ReadOnly
229- , deviceAccessMode = DeviceAccessMode.ReadOnly
230- , allocationMode = AllocationMode.CopyHostPtr)
227+ rowIndices2rowPointers m.Rows m.RowCount,
228+ hostAccessMode = HostAccessMode.ReadOnly,
229+ deviceAccessMode = DeviceAccessMode.ReadOnly,
230+ allocationMode = AllocationMode.CopyHostPtr
231+ )
231232
232233 let cols =
233- context.CreateClArray (
234- m.Columns
235- , hostAccessMode = HostAccessMode.ReadOnly
236- , deviceAccessMode = DeviceAccessMode.ReadOnly
237- , allocationMode = AllocationMode.CopyHostPtr)
234+ context.CreateClArray(
235+ m.Columns,
236+ hostAccessMode = HostAccessMode.ReadOnly,
237+ deviceAccessMode = DeviceAccessMode.ReadOnly,
238+ allocationMode = AllocationMode.CopyHostPtr
239+ )
238240
239241 let vals =
240- context.CreateClArray (
241- m.Values
242- , hostAccessMode = HostAccessMode.ReadOnly
243- , deviceAccessMode = DeviceAccessMode.ReadOnly
244- , allocationMode = AllocationMode.CopyHostPtr)
242+ context.CreateClArray(
243+ m.Values,
244+ hostAccessMode = HostAccessMode.ReadOnly,
245+ deviceAccessMode = DeviceAccessMode.ReadOnly,
246+ allocationMode = AllocationMode.CopyHostPtr
247+ )
245248
246249 { Backend.CSRMatrix.Context = context
247250 Backend.CSRMatrix.RowCount = m.RowCount
@@ -284,17 +287,32 @@ and COOMatrix<'a> =
284287
285288 COOMatrix.FromTuples( Array2D.length1 array, Array2D.length2 array, rows, cols, vals)
286289
287- static member ToBackend ( context : ClContext ) matrix =
290+ static member ToBackend ( context : ClContext ) matrix =
288291 match matrix with
289292 | MatrixCOO m ->
290293 let rows =
291- context.CreateClArray ( m.Rows, hostAccessMode = HostAccessMode.ReadOnly, deviceAccessMode = DeviceAccessMode.ReadOnly, allocationMode = AllocationMode.CopyHostPtr)
294+ context.CreateClArray(
295+ m.Rows,
296+ hostAccessMode = HostAccessMode.ReadOnly,
297+ deviceAccessMode = DeviceAccessMode.ReadOnly,
298+ allocationMode = AllocationMode.CopyHostPtr
299+ )
292300
293301 let cols =
294- context.CreateClArray ( m.Columns, hostAccessMode = HostAccessMode.ReadOnly, deviceAccessMode = DeviceAccessMode.ReadOnly, allocationMode = AllocationMode.CopyHostPtr)
302+ context.CreateClArray(
303+ m.Columns,
304+ hostAccessMode = HostAccessMode.ReadOnly,
305+ deviceAccessMode = DeviceAccessMode.ReadOnly,
306+ allocationMode = AllocationMode.CopyHostPtr
307+ )
295308
296309 let vals =
297- context.CreateClArray ( m.Values, hostAccessMode = HostAccessMode.ReadOnly, deviceAccessMode = DeviceAccessMode.ReadOnly, allocationMode = AllocationMode.CopyHostPtr)
310+ context.CreateClArray(
311+ m.Values,
312+ hostAccessMode = HostAccessMode.ReadOnly,
313+ deviceAccessMode = DeviceAccessMode.ReadOnly,
314+ allocationMode = AllocationMode.CopyHostPtr
315+ )
298316
299317 { Backend.COOMatrix.Context = context
300318 Backend.COOMatrix.RowCount = m.RowCount
0 commit comments