update CommonSense.hs