Function: byte-optimize-divide
(fn FORM)