A repetition is well-formed iff its repetition range and its element are well-formed.
(repetition-wfp repetition) → yes/no
This condition is structural.
Function:
(defun repetition-wfp (repetition) (declare (xargs :guard (repetitionp repetition))) (and (repeat-range-wfp (repetition->range repetition)) (element-wfp (repetition->element repetition))))