subroutine kutl_convert_wcov_to_ccov(w, Vw, c, Vc)
*
* begin_doc
*
*  Convert a 7x7 W covariance matrix into a 5x5 C covariance matrix
*
*  Input Parameters:
*  w(10)          double precision array
*                 W track parameters
*
*  Vw(7,7)        double precision array
*                 7x7 covariance matrix of W track
*
*  c(13)          double precision array
*                 C track parameters (corresponding to w parameters)
*
*  Output Parameters:
*  Vc(5,5)        double precision array
*                 5x5 covariance matrix for C track
*
*  Other routines:
*
*  Notes:
*
*  Author:   Paul Avery      Created:  Tue Sep 23 22:53:06 EDT 1997
*
*  Major revisions:
*
*
* end_doc