type A =
    { a : int }

type A with
    member this.Item
        with get (i) = this.a + i

let b : A = {a = 5}
b.[5]