let
mk_index_update e i x =
Fol
.
Tdata
(
E0mu
(e,
WpFol
.
Pidx
i, x))