#######################################################################################################################################
#                                                                                                                                     #
#         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/.PIPO.11.2.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20131115165932).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  $CA                 $_____FDecimales                                                                          |     \
$Z                  $SE                 -e "s/^  *//"                                                                                   \
$Z                                      -e "s/^[$Alphabet_0_9][$Alphabet_0_9]*[,.]//"                                             |     \
$Z                  $GRE                -v '^ *$'                                                                                 |     \
$Z                  $GRE                -v 'alcul '                                                                               |     \
$Z                  $SE                 -e "s/ //g"                                                                                     \
$Z                                      -e "s/\(.\)/\1@/g"                                                                        |     \
$Z                  $R                  "@" "$K_NL"                                                                               |     \
$Z                  $GRE                -v '^ *$'                                                                                 |     \
$Z                  $SE                 -f $FiLeSeD                                                                               |     \
$Z                  $CuMuLoUPas         ne=0                                                                                            \
$Z                                      fichier==                                                                                       \
$Z                                                                                                  >> $FiLePhI