subroutine kfil_track_cd(cdtrk, type, ldedx, lcovar, ktrk, error)
*
* begin_doc
*
*  Load CD track and its errors into track list
*
*  Input Parameters:
*  cdtrk     Integer variable
*            CD track number (this is the hypothesis track number.
*            It runs from 1 to ntrkcd+nbadcd)
*
*  type      integer variable
*            Particle type to be stored: 1-5 ==> e/mu/pi/K/p
*
*  ldedx     Logical variable
*            TRUE  ==> apply dE/dx correction to the track. This
*                      flag is ignored for Kalman tracks.
*            FALSE ==> do not apply any dE/dx corrections
*
*  lcovar    Logical variable
*            TRUE  ==> Calculate error matrix
*            FALSE ==> Do not calculate error matrix
*
*  Output Parameters:
*  ktrk      Integer variable
*            KWFIT track number
*
*  error     integer variable
*            Error flag
*            = 0 ==> all OK
*            > 0 ==> error
*
*  Other routines:
*
*  Notes:
*
*  Author:   Paul R Avery      Created:  Sun Jul 27 12:12:38 EDT 1997
*
*  Major revisions:
*
*
* end_doc