let
inner_loc _ =
Wp_parameters
.fatal
"[inner_loc] reserved to funvar"