A Scientific Approach to Morality