D. Leopoldina, Arqueduquesa de Austria