Modified ToFast[a/q] to do what I needed.  Not too pretty.