SUBROUTINE KWCVTC(TRACKW, TRACKC) C >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> C Takes a helix expressed in W form and converts it into C form. C C TRACKW real array (read) C W track parameters (Px, Py, Pz, E, X, Y, Z, pt, p, Q) C C *TRACKC real array (write) C C track parameters (cu, fi0, da, ct, z0, cos(fi0), sin(fi0), P, Q) C >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>