ÿØÿà JFIF      ÿÛ „ 	 ( %!1!%)+//.383,7(-.+



-%%-////---/-.+/--+------/------/--0+--/-/-----.-----ÿÀ  ¥2" ÿÄ               ÿÄ J  	     ! 1AQ"aq2‘#BR‚¡ÁÑ3br’¢±Âð$CSƒ²á4c“%DsÓñÿÄ              ÿÄ *        !1AQa‘"2q3±ð#b¡ÿÚ   ? ¼QxJQaÍuò¸Zö Úü8,ÐÚú
"SSn<rçù–´âE—^ªBÖ9À\†¸ÔÁT­ÃÛ5
ëd´³Í#Ý;Þ38œî ¶H£M:wÎ3…³…âpÔF&‚FK¸9„â4àGEõªfÿ ‘ñ(ßw­pŽF|È¥ù®häðÍÑ¶¹‘[ÒinÙW¶ùñY˜Q{›K"išÒ[Ú8žë\F¹@-?v"ÔU”,ìöžkÿ {I‡£šÍ?e
ríV
..............................................................................................................................................................................
.............................................................................                                                  
                                                                                                                                                                                     ÿØÿà JFIF      ÿÛ „ 	 ( %!1!%)+//.383,7(-.+



-%%-////---/-.+/--+------/------/--0+--/-/-----.-----ÿÀ  ¥2" ÿÄ               ÿÄ J  	     ! 1AQ"aq2‘#BR‚¡ÁÑ3br’¢±Âð$CSƒ²á4c“%DsÓñÿÄ              ÿÄ *        !1AQa‘"2q3±ð#b¡ÿÚ   ? ¼QxJQaÍuò¸Zö Úü8,ÐÚú
"SSn<rçù–´âE—^ªBÖ9À\†¸ÔÁT­ÃÛ5
ëd´³Í#Ý;Þ38œî ¶H£M:wÎ3…³…âpÔF&‚FK¸9„â4àGEõªfÿ ‘ñ(ßw­pŽF|È¥ù®häðÍÑ¶¹‘[ÒinÙW¶ùñY˜Q{›K"išÒ[Ú8žë\F¹@-?v"ÔU”,ìöžkÿ {I‡£šÍ?e
ríV
..............................................................................................................................................................................
.............................................................................                                                  
                                                                                                                                                                                     #%Module1.0#####################################################################
##
## module-info modulefile
##
proc ModulesHelp { } {
    puts stderr "\tThis module returns all the various module-info values"
    puts stderr "\tin whatever mode you use (except in  `whatis' mode)"
    InfoOut
}

module-whatis   "returns all various module-info values"

proc InfoOut { } {
global ModulesCurrentModulefile
puts stderr     "+++ global vars +++++++++++++++++++++++++++++++"
puts stderr     "ModulesCurrentModulefile = $ModulesCurrentModulefile"
puts stderr     "+++ module-info +++++++++++++++++++++++++++++++"
puts stderr     [ concat        "flags                  = " [module-info flags]]
puts stderr     [ concat        "mode                   = " [module-info mode]]
puts stderr     [ concat        "name                   = " [module-info name]]
puts stderr     [ concat        "specified              = " [module-info specified]]
puts stderr     [ concat        "shell                  = " [module-info shell]]
puts stderr     [ concat        "shelltype              = " [module-info shelltype]]
#puts stderr    [ concat        "alias                  = " [module-info alias]]
puts stderr     [ concat        "version                = " [module-info version [module-info name]]]
puts stderr     [ concat        "user                   = " [module-info user]]
puts stderr     [ concat        "symbols                = " [module-info symbols]]
puts stderr     "+++ info ++++++++++++++++++++++++++++++++++++++"
puts stderr     [ concat        "hostname               = " [info hostname ]]
puts stderr     [ concat        "level                  = " [info level ]]
puts stderr     [ concat        "loaded null            = " [is-loaded null ]]
puts stderr     [ concat        "library                = " [info library ]]
puts stderr     [ concat        "nameofexecutable       = " [info nameofexecutable ]]
puts stderr     [ concat        "sharedlibextension     = " [info sharedlibextension ]]
puts stderr     [ concat        "tclversion             = " [info tclversion ]]
puts stderr     [ concat        "patchlevel             = " [info patchlevel ]]
puts stderr     "+++++++++++++++++++++++++++++++++++++++++++++++"
}
if {! [ module-info mode whatis ] } {InfoOut}

