subroutine kset_track_copy(trk_in, trk_out) * * begin_doc * * Copy one KWFIT track into another. * * Input Parameters: * trk_in integer variable * Input track * * trk_out integer variable * Output track * * Output Parameters: * None * * Other routines: * * Notes: * * Author: Paul R Avery Created: Sun Jul 27 11:42:21 EDT 1997 * * Major revisions: * * * end_doc