2970 X=(PM(1)-PM(2)-XKP)*ZA