#!/bin/csh -f
# make x,y,z,ptcl from energy loss (ptcl) vs  compnumber
#
#  data is eloss as  ev  comp dE ptcl
#  output is datahippo
# 
set nl = `wc -l eloss`
echo $nl
@ nc=  1
while( $nc <= $nl[1] )
   echo $nc
   set compn = `awk 'NR==nth {print $2, $4}' nth=$nc eloss`
   echo $compn
   awk '$2==comp {print $7, $8, $9, loss}' comp=$compn[1] loss=$compn[2] chvsco\
mptab >> datahippo
   @ nc++
end
