¿Cómo escribir un nuevo tipo que sea compatible con Array.sum?

Question

type Foo(...) = 
    ... 

let a = Array.create 10 (new Foo()) 

let sum = Array.sum a 

Answer 1

es necesario agregar algunos miembros que son utilizados por la función sum para hacer el cálculo:

type Foo(value:int) = 
    member x.Value = value 
    // Two members that are needed by 'Array.sum' 
    static member (+) (a:Foo, b:Foo) = Foo(a.Value + b.Value) 
    static member Zero = Foo(0) 
    // Not needed for 'Array.sum', but allows 'Array.average' 
    static member DivideByInt(a:Foo, n:int) = Foo(a.Value/n) 

La función sum comienza con el valor devuelto por Zero y luego añade los valores de Foo utilizando la sobrecarga + operador (average luego se divide el resultado por un número entero):

let a = Array.init 10 (fun n -> Foo(n)) 
let sum = Array.sum a 
sum.Value // Returns 45 

Answer 2

No es posible.

Cuando desee utilizar cualquier método de matriz (suma, etc.), debe usar un tipo de matriz para el almacenamiento de datos.

EDIT: Interpreté mal su pregunta. Es posible que desee intentar implementar ciertas sobrecargas del operador, como +, -, etc. Tal vez el tipo sea compatible con el método de suma.