#! /bin/tcsh 

echo '# plot of the current vs z of the he atom ' > current.dat

foreach d1 ( 0 1 2 3 4 )
  foreach d2 ( 0 1 2 3 4 )
    foreach d3 ( 0 1 2 3 4 )

       cd  $d1.$d2.$d3

       echo '--------> ' `pwd` ' <-------'
       cp ../input.dat .

       curr tot_ks.dat eigenvalues_eignevectors.dat 1.0 > ../tmp

       
       cd ..

       echo $d1 $d2 $d3 `cat tmp` >> current.dat

    end
  end
end



