This routine transforms the TKR parameters given in PAR, at RADIUS to particle 3 momentum and the cartesian coordinates of the point where PAR was given.
RADIUS : radius where track parameters are given. If RADIUS = 0, the parameters are assumed to be at the perigee. PAR : Track parameters.
P : 3-momentum of the track. X : Cartesian coordinates of the point where PAR was given.
From /PXCONS/ : BMAG, magnetic field; CONSA, speed of light.
none.
(To bring an angle In the range 0 to 2PI.)