list_mk_imp : term list * term -> term
STRUCTURE
SYNOPSIS
Iteratively constructs implications.
DESCRIPTION
list_mk_imp([t1,...,tn],t) returns t1 ==> ( ... (tn ==> t)...).
FAILURE
Fails if any of t1,...,tn are not of type bool. Also fails if the list of terms is non-empty and t is not of type bool. If the list of terms is empty the type of t can be anything.
EXAMPLE
- list_mk_imp ([T,F],T);
> val it = `T ==> F ==> T` : term


- try list_mk_imp ([T,F],mk_var("x",alpha));
evaluation failed     list_mk_imp

- list_mk_imp ([],mk_var("x",alpha));
> val it = `x` : term

SEEALSO
HOL  Trindemossen-1