can't read "GscopeDir": no such variable
    while executing
"set FichierGscopeGIF             "$GscopeDir/wscope/graphiste/graphiste.tcl""
    (in namespace eval "::request" script line 4)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
####### faire source de ce fichier gscope_source.tcl pour avoir acces a tout gscope ######

global FichierGscopeGIF            ; set FichierGscopeGIF             "$GscopeDir/wscope/graphiste/graphiste.tcl"
global FichierGscopeHublot         ; set FichierGscopeHublot          "$GscopeDir/gscope_hublot.gif"

global CafeDesSciencesDir
if {[info exists env(CAFEDESSCIENCESDIR)]} {
    set CafeDesSciencesDir $env(CAFEDESSCIENCESDIR)
} else {
    set CafeDesSciencesDir "$GscopeDir/wscope/cafedessciences"
}
global FichierGscopeCafeCafe       ; set FichierGscopeCafeCafe        "$CafeDesSciencesDir/cafe_des_sciences_proc.tcl"
global FichierGscopeCafeQues       ; set FichierGscopeCafeQues        "$CafeDesSciencesDir/question_de_science_proc.tcl"

global FichierCorrelator
if {[info exists env(CORRELATORHOME)]} {
    set FichierCorrelator            "$env(CORRELATORHOME)/src/correlator_show.tcl"
} else {
    set FichierCorrelator            "$GscopeDir/correlator/src/correlator_show.tcl"
}

global FichierGscopeVero           ; set FichierGscopeVero            "$GscopeDir/vero/gscope_vero.tcl"

global FichierGscopeHelp           ; set FichierGscopeHelp            "$GscopeDir/help/gscope_help.txt"
global FichierGscopeListe          ; set FichierGscopeListe           "$GscopeDir/gscope_liste.tcl"
global FichierGscopeDessins        ; set FichierGscopeDessins         "$GscopeDir/gscope_dessins.tcl"
global FichierGscopeOrdres         ; set FichierGscopeOrdres          "$GscopeDir/gscope_ordres.tcl"
global FichierGscopeOutils         ; set FichierGscopeOutils          "$GscopeDir/gscope_outils.tcl"
global FichierGscopeHomolog        ; set FichierGscopeHomolog         "$GscopeDir/gscope_homolog.tcl"
global FichierGscopeAffiche        ; set FichierGscopeAffiche         "$GscopeDir/gscope_affiche.tcl"
global FichierGscopeCollection     ; set FichierGscopeCollection      "$GscopeDir/gscope_collection.tcl"
global FichierGscopeAful           ; set FichierGscopeAful            "$GscopeDir/gscope_aful.tcl"
global FichierGscopeProc           ; set FichierGscopeProc            "$GscopeDir/gscope_proc.tcl"
global FichierGscopeSequence       ; set FichierGscopeSequence        "$GscopeDir/gscope_sequence.tcl"
global FichierGscopePsy            ; set FichierGscopePsy             "$GscopeDir/gscope_psy.tcl"
global FichierGscopeBigBang        ; set FichierGscopeBigBang         "$GscopeDir/gscope_bigbang.tcl"
global FichierGscopeImage          ; set FichierGscopeImage           "$GscopeDir/gscope_image.gif"
global FichierGscopeVRP            ; set FichierGscopeVRP             "$GscopeDir/gscope_vrp.vec"
global FichierTranslate            ; set FichierTranslate             "$GscopeDir/gscope_translate.txt"
global FichierTranslateStop        ; set FichierTranslateStop         "$GscopeDir/gscope_translate_stop_en_x.txt"
global FichierGlossaire            ; set FichierGlossaire             "$GscopeDir/gscope_glossaire"
global FichierMiniConfigSansGenome ; set FichierMiniConfigSansGenome  "$GscopeDir/gscope_miniconfig"

global FichierOrdaliOutils         ; set FichierOrdaliOutils          "$OrdaliDir/ordali_outils.tcl"
global FichierOrdaliAffiche        ; set FichierOrdaliAffiche         "$OrdaliDir/ordali_affiche.tcl"

global BanqueGCG 
if {[info exists env(BANQUEGCGPOURGSCOPE)]} {
    set BanqueGCG $env(BANQUEGCGPOURGSCOPE)
} else {
    set BanqueGCG "protein"
}

source $FichierGscopeOutils
source $FichierGscopeProc

if {[file exists $FichierOrdaliOutils]}  { source $FichierOrdaliOutils }
if {[file exists $FichierOrdaliAffiche]} { source $FichierOrdaliAffiche }

global FichierGscopePerso ; set FichierGscopePerso "gscoperso_non_defini" 
if {[info exists env(HOME)] && [file exists "$env(HOME)/gscoperso/gscope_source.tcl"]} {
    set FichierGscopePerso "$env(HOME)/gscoperso/gscope_source.tcl" 
    if {[file exists $FichierGscopePerso]} { source $FichierGscopePerso }
}