invcor function

Changing core sign