#!/afs/sipb/project/tcsh/tcsh
foreach i (`find . -name "*.Z" -print`)
set j=${i:s/.Z//}
ls -l $i; uncompress -v $i; ls -l $j; gzip --best -v $j; ls -l $j.gz
end
foreach i (`find . -name "*.F" -print`)
set j=${i:s/.F//}
ls -l $i; melt -v $i; ls -l $j; gzip --best -v $j; ls -l $j.gz
end