C ------------------------------------------------------------- C integer nmxln parameter (nmxln=2000) integer idt real stmerr,stwerr double precision stmass,stwidth character*21 stname common/stdtbl/ idt(nmxln),stmerr(2,nmxln),stwerr(2,nmxln), 1 stmass(nmxln),stwidth(nmxln),stname(nmxln) save /stdtbl/ C C -------------------------------------------------------------