Decided to move the prime marks from the UnitName -> UnitName functions onto the ones lifted into the Maybe monad.