let ring () =
    let neighbourhood_of_zero = Array.init (2*range) (fun i -> i - range + (if i>=range then 1 else 0)) in
    Array.init length (fun i -> Array.map (fun j -> (j+length+i) mod length) neighbourhood_of_zero)