subroutine kutl_sum3(wout, w1, w2, w3)
*
* begin_doc
*
*  Add the 4-momentum and charge in w1 - w3 to compute the information
*  in wout. The position is set to the position of w1.
*
*  Input Parameters:
*  w1(10)       double precision array
*               Input w track 1
*
*  w2(10)       double precision array
*               Input w track 2
*
*  w3(10)       double precision array
*               Input w track 3
*
*  Output Parameters:
*  wout(10)     double precision array
*               Output track information
*
*  Other routines:
*
*  Notes:
*
*  Author:   Paul R Avery      Created:  Mon Jul 28 05:32:22 EDT 1997
*
*  Major revisions:
*
*
* end_doc