#!/bin/csh

setenv dr0 /Projects/sure/Lac_3D_Loop/2.Bend_ends/Up-2

set j = 49
set i = 11
while ( $j >= 23 )
  echo "$dr0/f_ends_$j.pdb -> force_$i.pdb"
  cp $dr0/f_ends_$j.pdb force_$i.pdb
#  cp $dr0/$j.pdb rod_$i.pdb
  @ j -= 2
  @ i ++
end

while ( $j > 0 )
  echo "$dr0/f_ends_$j.pdb -> force_$i.pdb"
  cp $dr0/f_ends_$j.pdb force_$i.pdb
#  cp $dr0/$j.pdb rod_$i.pdb
  @ j -= 5
  @ i ++
end
