FUNCTION    : FFCHG(IPDG)
 
AUTHOR : S.Burke
 
DATE : 04/03/93
 
LANGUAGE : FORTRAN
 
SHORT SUMMARY of PURPOSE:                                                
                                                                                
 Calculate a particle charge from a PDG code                                    
                                                                                
LIST and DESCRIPTION of INPUT VARIABLES/ARGUMENTS:                       
                                                                                
 IPDG - PDG code                                                                
                                                                                
LIST and DESCRIPTION of OUTPUT VARIABLES/ARGUMENTS:                      
                                                                                
 The return value is the signed charge (zero for unknown values)                
                                                                                
 
CALLING TREE from FFCHG :
 
None
 
FUNCTIONS USED :
 
None
 
KEEP SEQUENCES USED :
 
None
 

Comments from FFCHG