let parse_bool = function |(_,("Yes"|"yes"|"True" |"true")) -> true |(_,("No" |"no" |"False"|"false")) -> false (* this one usually is not there *) |(_,s) -> assert false