You could list just one of the fields
(* make a copy *)
let savedTio = { tio with some_field = tio.some_field } in
You could list just one of the fields
(* make a copy *)
let savedTio = { tio with some_field = tio.some_field } in