Add routine to find the net force