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

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

$Z                            set                 Yminimum=`$xrv/extrema.01$X ne=0 fichier=$xTV/POINTS.2$COORD_Y minimum_seul=VRAI`
$Z                            set                 Ymaximum=`$xrv/extrema.01$X ne=0 fichier=$xTV/POINTS.2$COORD_Y maximum_seul=VRAI`

$Z                            set                 XYminimum=`$xcg/MIN2.01$X x=$Xminimum y=$Yminimum`
$Z                            set                 XYmaximum=`$xcg/MAX2.01$X x=$Xmaximum y=$Ymaximum`
$Z                  else
$Z                            set                 XYminimum=$_____XYminimum
$Z                            set                 XYmaximum=$_____XYmaximum
$Z                                      # Possibilite introduite le 20100107182240 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



Copyright © Jean-François Colonna, 2019-2021.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / Ecole Polytechnique, 2019-2021.