#!/bin/csh

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

set j = 6
while ( $j <= 51 )
  @ i = ( $j - 1 ) / 5 + 20
  echo $j "->" $i
  cp $dr0/f_ends_$j.pdb force_$i.pdb
  @ j = $j + 5
end
