TY=$1
FS=`nof $TY`

if test -f adel.pos.Z
then
  svg adel.pos.Z
else
  svg adel.pos
fi

case $# in
 1) echo ' '
    echo -n " Donnez la reference principale:  "
    read prin ;;
 2) prin=$2 ;;
esac

testfZ $FS
op-ex $FS $TY 7 4 $prin > .T/tmp.sel
awkpr1 < .T/tmp.sel > .T/list.sel
fgrep -v -f .T/list.sel $FS >> .T/tmp.sel

mv .T/tmp.sel $FS 
tri $FS

rm .T/list.sel