#!/bin/csh

#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D E   L A   P A L E T T E   ' gris.52.1 '  :                                                          #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xigP/gris.52.1$Z' :                                                                                             #
#                                                                                                                                     #
#                     Jean-Francois COLONNA (LACTAMME, 20040909182517).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

set       numeros   = (  001  002  003  004  005  006  007  008  009  010  011  )
set       niveaux   = (  000  001  002  063  064  159  160  192  193  254  255  )
set       fonction  = (   N    1    2    3    4    3    4    3    4    3    4   )
set       rouge     = (  000  001  002  015  015  063  063  223  223  255  255  )
set       verte     = (  000  001  002  015  015  063  063  223  223  255  255  )
set       bleue     = (  000  001  002  015  015  063  063  223  223  255  255  )
                                        # On notera que pour les '$niveaux' {001,002}, on trouve des {$rouge,$verte,$bleue} egaux     #
                                        # a {001,002} et non pas egaux a {001,001}. Cela est rendu necessaire par le '$xciP/LISSE$X'  #
                                        # qui est fait et qui provoque des niveaux qui seraient dans ce cas hors du segment [001,015] #
                                        # et des niveaux '000' apparaitraient alors, chose que l'on veut justement eviter afin qu'il  #
                                        # n'y ait qu'un seul niveau 'NOIR' (le premier) ; cela est du a l'usage qui en est fait dans  #
                                        #                                                                                             #
                                        # Le 20040910143721, l'option 'v $xigP/.INTERPOLE$Y EpsilonLissage' a ete introduite pour     #
                                        # resoudre ce probleme. Il suffit de donner a '$EpsilonLissage' une valeur non nulle et       #
                                        # petite...                                                                                   #

set       Fderivee  = 1.0

source    $xigP/.INTERPOLE$Y