#######################################################################################################################################
# #
# 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.31.1.$U' : #
# #
# Jean-Francois Colonna (LACTAMME, 20150626141258). #
# #
#######################################################################################################################################
$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 aY6=`$xcg/ADD2.01$X a=$aY5 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=2 X1=$aX2 Y1=$aY2 Z1=$aZ1 X2=$aX2 Y2=$aY3 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z echo "Arborescence= NumeroPere=3 NumeroNoeud=4 EtiquetteNoeud=1 X1=$aX2 Y1=$aY3 Z1=$aZ1 X2=$aX1 Y2=$aY4 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z echo "Arborescence= NumeroPere=4 NumeroNoeud=5 EtiquetteNoeud=2 X1=$aX1 Y1=$aY4 Z1=$aZ1 X2=$aX2 Y2=$aY3 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z echo "Arborescence= NumeroPere=5 NumeroNoeud=6 EtiquetteNoeud=3 X1=$aX2 Y1=$aY3 Z1=$aZ1 X2=$aX3 Y2=$aY4 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z echo "Arborescence= NumeroPere=6 NumeroNoeud=7 EtiquetteNoeud=2 X1=$aX3 Y1=$aY4 Z1=$aZ1 X2=$aX2 Y2=$aY5 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z echo "Arborescence= NumeroPere=7 NumeroNoeud=8 EtiquetteNoeud=3 X1=$aX2 Y1=$aY5 Z1=$aZ1 X2=$aX3 Y2=$aY4 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z echo "Arborescence= NumeroPere=8 NumeroNoeud=9 EtiquetteNoeud=3 X1=$aX3 Y1=$aY4 Z1=$aZ1 X2=$aX4 Y2=$aY5 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z echo "Arborescence= NumeroPere=9 NumeroNoeud=10 EtiquetteNoeud=3 X1=$aX4 Y1=$aY5 Z1=$aZ1 X2=$aX3 Y2=$aY4 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z echo "Arborescence= NumeroPere=10 NumeroNoeud=11 EtiquetteNoeud=2 X1=$aX3 Y1=$aY4 Z1=$aZ1 X2=$aX2 Y2=$aY3 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z echo "Arborescence= NumeroPere=11 NumeroNoeud=12 EtiquetteNoeud=2 X1=$aX2 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=$aX3 Y2=$aY3 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z echo "Arborescence= NumeroPere=13 NumeroNoeud=14 EtiquetteNoeud=2 X1=$aX3 Y1=$aY3 Z1=$aZ1 X2=$aX2 Y2=$aY2 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z echo "Arborescence= NumeroPere=14 NumeroNoeud=15 EtiquetteNoeud=1 X1=$aX2 Y1=$aY2 Z1=$aZ1 X2=$aX2 Y2=$aY1 Z2=$aZ1" \
$Z >> $FiLeTmP_ARBRE
$Z # Voir 'v http://www.math.u-bordeaux1.fr/MAS10/DOC/PDF-PRES/2G2Menard.pdf' document d'ou #
$Z # est tire cet exemple. #
Copyright © Jean-François Colonna, 2019-2021.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / Ecole Polytechnique, 2019-2021.