#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D E   L A   G R A N D E   O U R S E  :                                                                #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirf/.PAYU.J1.1.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20140628214122).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  setParam            _____Rayon                    0.004

$Z                  setParam            _____TranslationX             0.22

$Z                  setParam            _____TranslationY             0.7

$Z                  setParam            _____RotationZ                -0.9

$Z                  FilSTmpB  FGrandeOurse

$Z                  alias     Genere    'set      CoOrDoNnEeX=\!:1 ; set CoOrDoNnEeY=\!:2                                         ;    \\
$Z                                       echo     "$CoOrDoNnEeX"                                    >>! $FGrandeOurse$COORD_X     ;    \\
$Z                                       echo     "$CoOrDoNnEeY"                                    >>! $FGrandeOurse$COORD_Y     ;    \\
$Z                                       unset    $COORD_X  CoOrDoNnEeY'

$Z                  Genere    0.10 0.05
$Z                  Genere    0.20 0.30
$Z                  Genere    0.37 0.34
$Z                  Genere    0.55 0.40
$Z                  Genere    0.70 0.32
$Z                  Genere    0.80 0.75
$Z                  Genere    0.90 0.55

$Z                  set       NpointSX=`$CA $FGrandeOurse$COORD_X | $WCl`
$Z                  set       NpointSY=`$CA $FGrandeOurse$COORD_Y | $WCl`
$Z                  set       NpointS_=`$xcg/MIN2.01$X x=$NpointSX y=$NpointSY`

$Z                  $xrv/particule.10$X                                                                                                 \
$Z                                      npoints=$NpointS_                                                                               \
$Z                                      LISTE_X=$FGrandeOurse$COORD_X                                                                   \
$Z                                      LISTE_Y=$FGrandeOurse$COORD_Y                                                                   \
$Z                                      TRANSLATION_OX=$_____TranslationX                                                               \
$Z                                      TRANSLATION_OY=$_____TranslationY                                                               \
$Z                                      ROTATION_OZ=$_____RotationZ                                                                     \
$Z                                      editer_extrema_hors=FAUX                                                                        \
$Z                                      rayon_de_visualisation=$_____Rayon                                                              \
$Z                                      fond=VRAI                                                                                       \
$Z                                      F=$_____ImageA                                                                                  \
$Z                                      chiffres=0                                                                                      \
$Z                                      R=$_____ImageR                                                                                  \
$Z                                                                    $formatI

$Z                  FilSTmpE  FGrandeOurse