let
get_in_size net =
let
neurons =
List
.hd net
in
Array
.length (get_synapses neurons.(0)) -1