File: align_infix.ml.ref

package info (click to toggle)

ocamlformat 0.28.1-1

file content (5 lines) | stat: -rw-r--r-- 114 bytes

let sum_of_squares num =
  num + 1
  |> List.range 0
  |> List.map ~f:square
  |> List.fold_left ~init:0 ~f:( + )