subroutine kset_track_is_mass_fixed(ktrk, lmass_fixed) * * begin_doc * * Sets the fixed mas flag (which says if the track has a fixed mass, thus * forcing the energy to follow the momentum appropriately) for a KWFIT track * * Input Parameters: * ktrk integer variable * KWFIT track number * * lmass_fixed logical variable * TRUE ==> Track has fixed mass * FALSE ==> Track does not have fixed mass * * Output Parameters: * None * * Other routines: * * Notes: * * Author: Paul R Avery Created: Mon Jul 28 06:12:33 EDT 1997 * * Major revisions: * * * end_doc