list_mk_disj : term list -> term
- list_mk_disj [T,F,T]; > val it = `T \/ F \/ T` : term - try list_mk_disj [T,mk_var("x",alpha),F]; Exception raised at boolSyntax.mk_disj: Non-boolean argument - list_mk_disj [mk_var("x",alpha)]; > val it = `x` : term