#!/bin/csh

#######################################################################################################################################
#                                                                                                                                     #
#         C H O I X   D E S   D I M E N S I O N S   D E S   I M A G E S   A S S O C I E E S   A U X   P A L E T T E S  :              #
#                                                                                                                                     #
#                                                                                                                                     #
#                   set                 XYmaxNeDiv=...                                                                                #
#                   source              $xciP/XYmaxNe$Y                                                                               #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xciP/XYmaxNe$Y' :                                                                                               #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

if                  ($?XYmaxNeDiv == $NEXIST) then
                    set                 XYmaxNeDiv=8
                                        # Une valeur de 1 permet de faire des images carrees...                                       #
else
endif

@                   maximumX = $BLANC
@                   hauteur = $COULEURS / $XYmaxNeDiv
@                   maximumY = $hauteur - 1
source              $Fdivers
XYmaxNe             $maximumX $maximumY
                                        # Choix d'une mode ou l'image est petite et suffisante...                                     #

unset               XYmaxNeDiv