*-- Author : Stephen J. Maxfield 19/08/92 FUNCTION FRDSYS(RAD, LINT) * Calculate systematic correction to charge division coordinate *