list_mk_disjboolSyntax.list_mk_disj : term list -> term
Constructs the disjunction of a list of terms.
list_mk_disj([t1,...,tn]) returns
t1 \/ ... \/ tn.
Fails if the list is empty or if the list has more than one element,
one or more of which are not of type bool.
> list_mk_disj [T,F,T];
val it = “T ∨ F ∨ T”: term
> try list_mk_disj [T,mk_var("x",alpha),F];
Exception- HOL_ERR (at boolSyntax.mk_disj: Non-boolean argument) raised
> list_mk_disj [mk_var("x",alpha)];
val it = “x”: term
boolSyntax.strip_disj,
boolSyntax.mk_disj