Merge a list of vl-emodwire-ps into Verilog-style names.
Function:
(defun vl-verilogify-emodwirelist (x) (declare (xargs :guard (vl-emodwirelist-p x))) (vl-verilogify-emodwirelist-0 (vl-emodwire-sort (list-fix x))))
Theorem:
(defthm string-listp-of-vl-verilogify-emodwirelist (implies (force (vl-emodwirelist-p x)) (string-listp (vl-verilogify-emodwirelist x))))