Aquinas on Virtue: A Causal Reading