subroutine kset_track_is_covar(ktrk, lcovar) * * begin_doc * * Sets the covariance flag (which says if the track has a covariance matrix) * for a KWFIT track * * Input Parameters: * ktrk integer variable * KWFIT track number * * lcovar logical variable * TRUE ==> Track has covariance matrix * FALSE ==> Track does not have covariance matrix * * Output Parameters: * None * * Other routines: * * Notes: * * Author: Paul R Avery Created: Mon Jul 28 06:12:33 EDT 1997 * * Major revisions: * * * end_doc