####################################################################################################################################### # # # G E N E R A T I O N D ' U N A R B R E D E T E S T : # # # # # # Author of '$xiirv/.QUAD.21.1.$U' : # # # # Jean-Francois Colonna (LACTAMME, 20150624213859). # # # ####################################################################################################################################### $Z set Increment_X=+0.5 $Z set aX1=+0.0 $Z set aX2=`$xcg/ADD2.01$X a=$aX1 b=$Increment_X` $Z set aX3=`$xcg/ADD2.01$X a=$aX2 b=$Increment_X` $Z set aX4=`$xcg/ADD2.01$X a=$aX3 b=$Increment_X` $Z set Increment_Y=+0.5 $Z set aY1=+0.0 $Z set aY2=`$xcg/ADD2.01$X a=$aY1 b=$Increment_Y` $Z set aY3=`$xcg/ADD2.01$X a=$aY2 b=$Increment_Y` $Z set aY4=`$xcg/ADD2.01$X a=$aY3 b=$Increment_Y` $Z set aY5=`$xcg/ADD2.01$X a=$aY4 b=$Increment_Y` $Z set aZ1=+0.5 $Z FilSTmpB FiLeTmP_ARBRE $Z echo "RacineQuadrangulation NumeroNoeud=0 EtiquetteNoeud=0 X2=$aX1 Y2=$aY1 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "RacineArbre NumeroPere=0 NumeroNoeud=1 EtiquetteNoeud=1 X2=$aX2 Y2=$aY1 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=1 NumeroNoeud=2 EtiquetteNoeud=2 X1=$aX2 Y1=$aY1 Z1=$aZ1 X2=$aX2 Y2=$aY2 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=2 NumeroNoeud=3 EtiquetteNoeud=1 X1=$aX2 Y1=$aY2 Z1=$aZ1 X2=$aX1 Y2=$aY3 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=3 NumeroNoeud=4 EtiquetteNoeud=2 X1=$aX1 Y1=$aY3 Z1=$aZ1 X2=$aX2 Y2=$aY2 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=4 NumeroNoeud=5 EtiquetteNoeud=3 X1=$aX2 Y1=$aY2 Z1=$aZ1 X2=$aX3 Y2=$aY3 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=5 NumeroNoeud=6 EtiquetteNoeud=2 X1=$aX3 Y1=$aY3 Z1=$aZ1 X2=$aX2 Y2=$aY4 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=6 NumeroNoeud=7 EtiquetteNoeud=1 X1=$aX2 Y1=$aY4 Z1=$aZ1 X2=$aX2 Y2=$aY5 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=7 NumeroNoeud=8 EtiquetteNoeud=2 X1=$aX2 Y1=$aY5 Z1=$aZ1 X2=$aX2 Y2=$aY4 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=8 NumeroNoeud=9 EtiquetteNoeud=3 X1=$aX2 Y1=$aY4 Z1=$aZ1 X2=$aX3 Y2=$aY3 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=9 NumeroNoeud=10 EtiquetteNoeud=2 X1=$aX3 Y1=$aY3 Z1=$aZ1 X2=$aX4 Y2=$aY4 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=10 NumeroNoeud=11 EtiquetteNoeud=3 X1=$aX4 Y1=$aY4 Z1=$aZ1 X2=$aX3 Y2=$aY3 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=11 NumeroNoeud=12 EtiquetteNoeud=2 X1=$aX3 Y1=$aY3 Z1=$aZ1 X2=$aX2 Y2=$aY2 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z echo "Arborescence= NumeroPere=12 NumeroNoeud=13 EtiquetteNoeud=1 X1=$aX2 Y1=$aY2 Z1=$aZ1 X2=$aX2 Y2=$aY1 Z2=$aZ1" \ $Z >> $FiLeTmP_ARBRE $Z # Voir 'v www.math.u-bordeaux1.fr/MAS10/DOC/PDF-PRES/LeGall.pdf' document d'ou est tire # $Z # cet exemple. Voir de plus 'v $xrv/QuadrangulationArbre.11$K exemple'... #