let rec mbAnd_of_list =
function
| [] -> Ast.MbNil ghost
| [ x ] -> x
| x :: xs ->
let _loc = loc_of_module_binding x
in Ast.MbAnd (_loc, x, (mbAnd_of_list xs))