#######################################################################################################################################
#                                                                                                                                     #
#         V I S U A L I S A T I O N   D E S   P R E M I E R E S   D E C I M A L E S   D E   P I                                       #
#         C O M M E   U N E   M A R C H E   A L E A T O I R E   E N   C O O R D O N N E E S   P O L A I R E S  :                      #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.CHAM.41.9.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20131224153025).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  alias     GeNeRe_A  'set      ChIfFrE="\!*"                                                                   ;    \\
$Z                                       (calcul  ($dpi*$ChIfFrE)/$_____Base)                                                     |    \\
$Z                                       $SE      -e "s+^\(.*\)+s/^$ChIfFrE$K_DOLLAR/\1/+"                                             \\
$Z                                                                                                  >> $FiLeSeD                   ;    \\
$Z                                       unset    ChIfFrE'

$Z                  GeNeRe_A  0
$Z                  GeNeRe_A  1
$Z                  GeNeRe_A  2
$Z                  GeNeRe_A  3
$Z                  GeNeRe_A  4
$Z                  GeNeRe_A  5
$Z                  GeNeRe_A  6
$Z                  GeNeRe_A  7
$Z                  GeNeRe_A  8
$Z                  GeNeRe_A  9