#!/bin/csh

#######################################################################################################################################
#                                                                                                                                     #
#         C O N V E R S I O N   " N O N   S T A N D A R D "   {X,Y,Z }   -->   " S T A N D A R D "   {R,V,B}  :                       #
#                                                                                                                                     #
#                                                                                                                                     #
#         Utilisation :                                                                                                               #
#                                                                                                                                     #
#                   $xci/XYZ_RVB.11$Z   <imageA non standard> <imageR standard>                                                       #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xci/XYZ_RVB.11$Z' :                                                                                             #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20191029104126).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

set                 imageA=$1
set                 imageR=$2

set                 Arguments="standard=FAUX zero=FAUX"

$xci/acces$X        A=$imageA$COORD_X   $Arguments                              R=$imageR$ROUGE                         $formatI
$xci/acces$X        A=$imageA$COORD_Y   $Arguments                              R=$imageR$VERTE                         $formatI
$xci/acces$X        A=$imageA$COORD_Z   $Arguments                              R=$imageR$BLEUE                         $formatI
                                        # Conversion {X,Y,Z} --> {R,V,B}.                                                             #