#!/bin/csh

set j = 58

setenv dr0 /Projects/sure/Lac_3D_Loop/30.Variable_Moduli/Up_0

set i = 51
echo "$dr0/$i.pdb -> rod_$j.pdb"
cp $dr0/$i.pdb rod_$j.pdb
cp $dr0/f_ends_$i.pdb force_$j.pdb
@ j ++

setenv dr0 /Projects/sure/Lac_3D_Loop/31.Var_Mod_Curvs/Exact_Up_0

set i = 11
while ( $i <= 101 )
  echo "$dr0/$i.pdb -> rod_$j.pdb"
  cp $dr0/$i.pdb rod_$j.pdb
  cp $dr0/f_ends_$i.pdb force_$j.pdb
  @ j ++
  @ i += 10
end
