#!/bin/csh

setenv dr0 /Projects/sure/Lac_3D_Loop/3.Change_moduli/Up_0

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