#!/bin/csh
foreach i (1 2 3 4 5 6 7 8)
  foreach j (0 1 2)
    awk '{ print $7 " " $3}' cas$i/article43d.M$j > cas$i/art4.M$j
    awk '{ print $8 " " $4}' cas$i/article43d.Uz$j > cas$i/art4.Uz$j
    awk '{ print $8 " " $4}' cas$i/article43d.Sx$j > cas$i/art4.Sx$j
  end
end