add getMass.tcl segA3_mass.dat