PAT=/usr2/mermio/bda/ic/$1

sort -n +0 +1 -o $PAT/adel.coo $PAT/adel.coo
sort -n +0 +1 -o $PAT/adel.pos $PAT/adel.pos

CH=/usr2/mermio/bda/contenu

for i in coo pos
do
NET=`zex $PAT/adel.$i | net | awkpr1`
NENR=`zex $PAT/adel.$i | nenr | awkpr1`
AMA=`awkam 6`

testfO $CH/adel.$i
awkmsjcnt $NENR $NET $AMA < $CH/adel.$i > $CH/cnt.mod
mv $CH/cnt.mod $CH/adel.$i
done