type ('perm, 'record, 'field) t
=
{
force_variance : 'perm ‑> unit;
name : string;
setter : ('record ‑> 'field ‑> unit) option;
getter : 'record ‑> 'field;
fset : 'record ‑> 'field ‑> 'record;
}