Turn On Vector Control

If `class(pars$vector_control) == 'none'` then dynamic vector_control has not been set up by any other function. This sets `class(vector_control) <- 'dynamic'` and then sets up a trivial module for every mode of vector control.