###############################################################################
#  this example shows how to generate and simulate in the detector 
#  p pbar --> t tbar process
#
#  CDF2SIM defaults: - path AllPath is enabled
#                    - all the modules are disabled 
#  so one needs to enable the modules he needs
#
# this input file mixes TCL and ROOT so one needs to redirect input when 
# running cdf2sim on it:
#                              cdf2sim.exe isajet_ttbar.tcl
#
# to run cdf2sim in batch mode one needs to add "-b" flag to disable 
# initialization of ROOT graphics :
#
#                              cdf2sim.exe isajet_ttbar.tcl -b
# or 
#
#     ~murat/bin/run -q MPQ -E $CDFSOFT2_DIR/bin/IRIX6-KCC_3_3/cdf2sim.exe \
#  -I "/cdf/upgrade/tracking/murat/g3/test/uic/production/isajet_ttbar.tcl -b"
#
# as of today (Jul 01 1999) it takes a bit less than 14 seconds to generate 
# one event on CDFSGA (with everything compiled in debug mode)
###############################################################################
#
#                                       make CDFPVLI env variable to point to
#                                       to the right file (ttbar production)
root TString s = getenv("CDFSOFT2_DIR");
root s        += \"/generatorMods/examples/isajet/top175.val\";
root gSystem->Setenv("CDFPVLI",s.Data());
#                                       use Isajet to generate ttbar production
#                                       use QQ to decay B-mesons
module input Isajet
talk Isajet
  call_qq set 1
  exit
#                                       configure path to be executed, 
#                                       note that event display module (evd)
#                                       is linked in, however it is disabled 
#                                       and has to be enabled by hand if 
#                                       necessary
module enable GEANT3 g3hist
path list
#
#                                       configure output
talk FileOutput
   output create stream1 /data69/upgrade/mc_data/ttbar/isajet_t175_new.ybs
   output path   stream1 AllPath
   output list
   exit
#                                       ****** talk to GEANT3
talk GEANT3
  GFLASH ON
  DETECTORS OFF PIPE
  source $env(CDFSOFT2_DIR)/RootMods/examples/cdf2sim/tcl/geant3_output_banks.tcl
  exit
#                                       define ROOT histogram file
talk g3hist
  histfile /data69/upgrade/mc_data/ttbar/isajet_t175_new.root
  exit
#                                       start processing the events
begin -nev 500
show timer
exit