#!/bin/tcsh -f
setenv D /Net/water/abhardwaj/GSM1/p2sig
setenv S /Net/elninost4/amishra/RSM/rsm_runs/runscr
setenv T /Net/elninost4/abhardwaj/RCM-FL/RSM/libs/etc
setenv in /Net/elninoshare/abhardwaj/PR/R_GSM/RSM_sstn

set ren = `cat lp2Ren`
set nren = `cat lp2Ren | wc -l`
set p20 = `cat lp2sig`
set p21 = `cat lp2sig2`

set cnt = 1
set cnt2 = 1
while ($cnt <= $nren)
if ($cnt <= 488) then
cp $in/2000/$p20[$cnt] ./$ren[$cnt] 
else
cp $in/2001/$p21[$cnt2] ./$ren[$cnt] 
@ cnt2 = $cnt2 + 1
endif


@ cnt = $cnt + 1
end
