#######################################################################################################################################
#                                                                                                                                     #
#         F O N C T I O N   D E   L I O U V I L L E   V I S U A L I S E E                                                             #
#         T E L   U N   M O U V E M E N T   B R O W N I E N  :                                                                        #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.PRIM.81.6.3.$U' :                                                                                        #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20100103175413).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  if        (($?_____XYminimum == $NEXIST) || ($?_____XYmaximum == $NEXIST)) then
$Z                            set                 Zminimum=`$xrv/extrema.01$X ne=0 fichier=$xTV/POINTS.2$COORD_Z minimum_seul=VRAI`
$Z                            set                 Zmaximum=`$xrv/extrema.01$X ne=0 fichier=$xTV/POINTS.2$COORD_Z maximum_seul=VRAI`

$Z                            set                 XYZminimum=`$xcg/MIN3.01$X x=$Xminimum y=$Yminimum z=$Zminimum`
$Z                            set                 XYZmaximum=`$xcg/MAX3.01$X x=$Xmaximum y=$Ymaximum z=$Zmaximum`
$Z                  else
$Z                            set                 XYZminimum=$_____XYminimum
$Z                            set                 XYZmaximum=$_____XYmaximum
$Z                                      # Possibilite introduite le 20100107190039 afin de pouvoir renormaliser de facon identique    #
$Z                                      # une serie d'images qui doivent etre presentees a la meme echelle ('v $xiirv/PRIM.81',       #
$Z                                      # 'v $xiirv/PRIM.811' et 'v $xiirv/PRIM.81.2' par exemple).                                   #
$Z                  endif