#!/bin/csh

#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D ' U N E   I M A G E   A N A G L Y P H I Q U E                                                       #
#         E N   V R A I E S   C O U L E U R S   A   P A R T I R   D ' U N                                                             #
#         C O U P L E   S T E R E O S C O P I Q U E   E N   V R A I E S   C O U L E U R S   T E L   Q U E                             #
#         D R O I T E --> R O U G E   E T   G A U C H E --> V E R T E  :                                                              #
#                                                                                                                                     #
#                                                                                                                                     #
#         Utilisation :                                                                                                               #
#                                                                                                                                     #
#                   $xci/anaglyphe.21$Z <nom_du_couple> <nom_de_l_image_resultat>                                                     #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xci/anaglyphe.21$Z' :                                                                                           #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

set  coupleA=$1
set  imageR=$2

$xci/luminance.01$X AR=$coupleA$GAUCHE$ROUGE AV=$coupleA$GAUCHE$VERTE AB=$coupleA$GAUCHE$BLEUE R=$imageR$ROUGE $formatI
$xci/luminance.01$X AR=$coupleA$DROITE$ROUGE AV=$coupleA$DROITE$VERTE AB=$coupleA$DROITE$BLEUE R=$imageR$VERTE $formatI
                                        # Calcul de la luminance de chacun des membres du couple...                                   #
$xci/init$X         niveau=$NOIR                                                               R=$imageR$BLEUE $formatI
                                        # Generation d'une composante BLEUE "invisible"...                                            #