####################################################################################################################################### # # # 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