Critical Behavior at the Nematic-To-Smectic-A Transition in a Strong Magnetic Field