(Stdpp.location * string) Lazy.t * bool) list) list ->
(Stdpp.location *
(int list *
(int list * (Stdpp.location list * string * string) list *
(Stdpp.location * string) Lazy.t * bool) list) list ->
(Stdpp.location *
(int list *
(int list * (Stdpp.location list * string * string) list *