#!/bin/bash
Tlist=`cat run*/Trun`
rm -f Etmp.dat
for T in $Tlist ; do Tn=$T ; if [ $T -lt 1000 ]; then Tn=0$T; fi 
    rm -f junk.$Tn
    for i in run* ; do
	awk -v t=$T '($1 == t){print NR, $2}' $i/nrg >> junk.$Tn
        awk '{print NR, $1}' $i/nrg > $i/Tvst.dat 
	awk '{print NR, $2}' $i/nrg > $i/Evst.dat 
    done
sort -n junk.$Tn | awk '{print $2}' > E.$Tn
cat E.$Tn | std | awk -v t=$T '{print t, $5, $8}' >> Etmp.dat
done
sort -n Etmp.dat > EvsT.dat
rm junk.* Etmp.dat
