A concatenation is well-formed iff it is not empty and all its repetitions are well-formed.
(concatenation-wfp concatenation) → yes/no
This non-emptiness condition
is required by the rule
Function:
(defun concatenation-wfp (concatenation) (declare (xargs :guard (concatenationp concatenation))) (and (consp concatenation) (repetition-list-wfp concatenation)))