set HERE=`pwd`
source ~/.login
set path= ( . $HOME/bin $path /cern/new/bin /usr/sbin )
set prompt="`hostname`> "
setenv EDITOR "emacs -nw"
setenv TRIUMF_TERMINAL_TYPE X
alias ls 'ls -CF --color'
alias rm 'rm -i'
source ~/e614soft/triumf/setup.com
if ( ! $?TRIUMF_ROOT ) then
setenv TRIUMF_ROOT /home/e614/e614soft/triumf
endif
if ( ! $?E614_CAL ) then
setenv E614_CAL /home/e614/e614soft
endif
if ( ! $?TRIUMF_SCRIPTS ) then
setenv TRIUMF_SCRIPTS $TRIUMF_ROOT
endif
if ( ! $?ROOTSYS ) then
if ( ! $?CERN_LIBRARY ) then
setenv CERN_LIBRARY /cern/2002/lib
endif
if ( ! $?CERN_LIBRARY_ABSOFT ) then
setenv CERN_LIBRARY_ABSOFT /twist/local/cern_absoft/2002/lib
endif
setenv CVS_RSH ssh
if ( ! $?CVSROOT ) then
if ( -d /home/e614mgr/cvs ) then
setenv CVSROOT /home/e614mgr/cvs
else
endif
if ( $?ROOTSYS ) then
setenv PATH ${PATH}:${ROOTSYS}/bin
if ( $?LD_LIBRARY_PATH ) then
setenv LD_LIBRARY_PATH ${LD_LIBRARY_PATH}:${ROOTSYS}/lib
else
endif
if ( ! $?GPLOT_DIR ) then
setenv GPLOT_DIR ${TRIUMF_ROOT}/gplot
endif
if ( ! $?BRU_COMMANDS ) then
setenv BRU_COMMANDS ${TRIUMF_ROOT}/bru
endif
if ( ! $?MOFIA_COMMANDS ) then
setenv MOFIA_COMMANDS ${TRIUMF_ROOT}/mofia
endif
if ( ! $?GEANT_COMMANDS ) then
setenv GEANT_COMMANDS ${TRIUMF_ROOT}/geant
endif
if ( ! $?CFM_COMMANDS ) then
setenv CFM_COMMANDS ${TRIUMF_ROOT}/cfm
endif
if ( ! $?YBOS_COMMANDS ) then
setenv YBOS_COMMANDS ${TRIUMF_ROOT}/ybos
endif
alias setup 'set setup_args=(!:*); eval source `echo \${!:1_COMMANDS}|tr \[a-z\] \[A-Z\]`/setup.com; unset setup_args'
alias unsetup 'eval source `echo \${!:1_COMMANDS}|tr \[a-z\] \[A-Z\]`/unsetup.com'
alias mlib "set mlib_args=(!:*); source ${TRIUMF_SCRIPTS}/mlib.csh; unset mlib_args"
setup mofia devel
source $MOFIA_COMMANDS/setup.com
set nargs = $#setup_args
if ( $nargs > 2 ) then
if ( $nargs > 1 ) then
set vers = $setup_args[2]
else
if ( ! -e $MOFIA_COMMANDS/${vers} ) then
echo Setting up MOFIA $vers
Setting up MOFIA devel
setenv MOFIA_ROOT ${MOFIA_COMMANDS}/${vers}
if ( $vers == "1.0" || $vers == "1.5" || $vers == "1.6" ) then
setenv MOFIA_BIN ${MOFIA_ROOT}/bin
setenv MOFIA_DEBUG ${MOFIA_ROOT}/debug
setenv MOFIA_DOC ${MOFIA_ROOT}/help
setenv MOFIA_HELP ${MOFIA_ROOT}/help
setenv MOFIA_SOURCE ${MOFIA_ROOT}/source
setenv MOFIA_UPDATE ${MOFIA_ROOT}/update
endif
if ( $?DEBUG ) then
setenv MOFIA_LIBDIR ${MOFIA_ROOT}/lib
endif
setenv MOFIA_DUMMY ${MOFIA_SOURCE}/dummy
setenv MOFIA_INCLUDE ${MOFIA_SOURCE}/include
setenv MOFIA_KCM ${MOFIA_SOURCE}/kcm
setenv MOFIA_MAIN ${MOFIA_SOURCE}/main
setenv MOFIA_MAINF90 ${MOFIA_SOURCE}/mainf90
setenv MOFIA_MIDAS ${MOFIA_SOURCE}/midas
setenv MOFIA_MODULES ${MOFIA_SOURCE}/modules
setenv MOFIA_OLD ${MOFIA_SOURCE}/old
setenv MOFIA_PHOTO ${MOFIA_SOURCE}/photo
setenv MOFIA_QOD ${MOFIA_SOURCE}/qod
setenv MOFIA_USER ${MOFIA_SOURCE}/user
cat ${MOFIA_UPDATE}/note.txt
-------------------------------------------------------------------------------
[7;1m MOFIA devel [0m
1999-Oct-13 Initial f90 version
2000-Mar-30 See $MOFIA_UPDATE/note1.txt for changes.
2000-Sep-05 Version 2.0.1. See $MOFIA_UPDATE/note2.txt for changes.
2001-Apr-03 Version 2.1. See $MOFIA_UPDATE/note3.txt for changes.
2002-Feb-28 Version 2.2. See $MOFIA_UPDATE/note4.txt for changes.
2002-Mar-27 Version 2.2.1 See $MOFIA_UPDATE/note5.txt for changes.
2002-Apr-03 Version 2.2.2 See $MOFIA_UPDATE/note6.txt for changes.
-------------------------------------------------------------------------------
alias mnew more ${MOFIA_UPDATE}/note.txt
alias mnews more ${MOFIA_UPDATE}/notes_all.txt
echo Setting up packages for MOFIA $vers
Setting up packages for MOFIA devel
if ( $vers == "1.0" ) then
new:
setup cfm 2.2
source $CFM_COMMANDS/setup.com
set nargs = $#setup_args
if ( $nargs > 2 ) then
if ( $nargs > 1 ) then
set vers = $setup_args[2]
else
if ( ! -e $CFM_COMMANDS/${vers} ) then
echo Setting up CFM $vers
Setting up CFM 2.2
setenv CFM_ROOT ${CFM_COMMANDS}/${vers}
setenv CAL_DB $E614_CAL/caldb_ascii
setenv CFM_DB $E614_CAL/cfm/db_noswap
setenv CFM_LOG $E614_CAL/cfm/log
setenv CFM_DOC ${CFM_ROOT}/doc
setenv CFM_LIBRARY ${CFM_ROOT}/lib
setenv CFM_MAIN ${CFM_ROOT}/main
setenv CFM_SOURCE ${CFM_ROOT}/source
setenv CFMLOG ${CFM_LOG}/cfm.log
setenv CFMREADLOCK ${CFM_DB}/cfm.readlock
setenv CFMWRITELOCK ${CFM_DB}/cfm.writelock
setenv CFMREC ${CFM_DB}/cfm.record
alias cfm ${CFM_MAIN}/cfm.exe
setup bru 1.1
source $BRU_COMMANDS/setup.com
set nargs = $#setup_args
if ( $nargs > 2 ) then
if ( $nargs > 1 ) then
set vers = $setup_args[2]
else
if ( ! -e $BRU_COMMANDS/${vers} ) then
setenv BRU_LIBRARY $BRU_COMMANDS/${vers}
setup ybos 4.1
source $YBOS_COMMANDS/setup.com
set P1 ; set P2
set nargs = $#setup_args
if ( $nargs < 2 ) goto no_more
set P1 = $setup_args[2]
if ( $P1 == "PRODUCTION" ) set P1 = "production"
if ( $nargs < 3 ) goto no_more
unset nargs
if ( $P1 == "" ) set P1 = "production"
set YBOS_Version = $P1
set Use_Root = $YBOS_COMMANDS
setenv YBOS_ROOT ${Use_Root}/${YBOS_Version}
setenv YBOS_DOC ${Use_Root}/${YBOS_Version}/doc
setenv YBOS_LIBRARY ${Use_Root}/${YBOS_Version}/library
setenv YBOS_TEST ${Use_Root}/${YBOS_Version}/test
setenv YBOS_SOURCE ${Use_Root}/${YBOS_Version}/source
Exit:
unset YBOS_Version
unset Use_Root
unset P1 ; unset P2
unsetenv IO_DIR
goto end
if ( $?DISPLAY ) then
echo " "
date
Fri Oct 1 03:08:08 PDT 2004
alias http "cd /home/e614/public_html; pwd"
alias pu "rm -iv *~"
alias ll "ls -al"
alias rm "rm -iv"
alias cp "cp -iv"
alias mv "mv -iv"
set prompt='%n[%B%c3%b]>'
source $HERE/triumf/setup.com
if ( ! $?TRIUMF_ROOT ) then
if ( ! $?E614_CAL ) then
if ( ! $?TRIUMF_SCRIPTS ) then
if ( ! $?ROOTSYS ) then
if ( ! $?CERN_LIBRARY ) then
if ( ! $?CERN_LIBRARY_ABSOFT ) then
setenv CVS_RSH ssh
if ( ! $?CVSROOT ) then
if ( $?ROOTSYS ) then
setenv PATH ${PATH}:${ROOTSYS}/bin
if ( $?LD_LIBRARY_PATH ) then
setenv LD_LIBRARY_PATH ${LD_LIBRARY_PATH}:${ROOTSYS}/lib
else
endif
if ( ! $?GPLOT_DIR ) then
if ( ! $?BRU_COMMANDS ) then
if ( ! $?MOFIA_COMMANDS ) then
if ( ! $?GEANT_COMMANDS ) then
if ( ! $?CFM_COMMANDS ) then
if ( ! $?YBOS_COMMANDS ) then
alias setup 'set setup_args=(!:*); eval source `echo \${!:1_COMMANDS}|tr \[a-z\] \[A-Z\]`/setup.com; unset setup_args'
alias unsetup 'eval source `echo \${!:1_COMMANDS}|tr \[a-z\] \[A-Z\]`/unsetup.com'
alias mlib "set mlib_args=(!:*); source ${TRIUMF_SCRIPTS}/mlib.csh; unset mlib_args"
setenv MOFIA_COMMANDS $HERE/triumf/mofia
setenv GEANT_COMMANDS $HERE/triumf/geant
setup geant devel
source $GEANT_COMMANDS/setup.com
set nargs = $#setup_args
if ( $nargs > 2 ) then
if ( $nargs > 1 ) then
set vers = $setup_args[2]
else
if ( ! -e $GEANT_COMMANDS/${vers} ) then
echo Setting up GEANT $vers
Setting up GEANT devel
setenv GEANT_ROOT ${GEANT_COMMANDS}/${vers}
setenv GEANT_BIN ${GEANT_ROOT}/bin
setenv GEANT_RUN ${GEANT_ROOT}/run
setenv GEANT_SOURCE ${GEANT_ROOT}/source
setenv GEANT_DOC ${GEANT_ROOT}/doc
setenv GEANT_HELP ${GEANT_ROOT}/help
setenv GEANT_UPDATE ${GEANT_ROOT}/update
setenv GEANT_WORK ${GEANT_ROOT}/work
cat ${GEANT_UPDATE}/note.txt
alias gnew more ${GEANT_UPDATE}/note.txt
alias gnews more ${GEANT_UPDATE}/notes_all.txt
echo Setting up packages for GEANT $vers
Setting up packages for GEANT devel
setup ybos 4.1
source $YBOS_COMMANDS/setup.com
set P1 ; set P2
set nargs = $#setup_args
if ( $nargs < 2 ) goto no_more
set P1 = $setup_args[2]
if ( $P1 == "PRODUCTION" ) set P1 = "production"
if ( $nargs < 3 ) goto no_more
unset nargs
if ( $P1 == "" ) set P1 = "production"
set YBOS_Version = $P1
set Use_Root = $YBOS_COMMANDS
setenv YBOS_ROOT ${Use_Root}/${YBOS_Version}
setenv YBOS_DOC ${Use_Root}/${YBOS_Version}/doc
setenv YBOS_LIBRARY ${Use_Root}/${YBOS_Version}/library
setenv YBOS_TEST ${Use_Root}/${YBOS_Version}/test
setenv YBOS_SOURCE ${Use_Root}/${YBOS_Version}/source
Exit:
unset YBOS_Version
unset Use_Root
unset P1 ; unset P2
setup cfm 2.2
source $CFM_COMMANDS/setup.com
set nargs = $#setup_args
if ( $nargs > 2 ) then
if ( $nargs > 1 ) then
set vers = $setup_args[2]
else
if ( ! -e $CFM_COMMANDS/${vers} ) then
echo Setting up CFM $vers
Setting up CFM 2.2
setenv CFM_ROOT ${CFM_COMMANDS}/${vers}
setenv CAL_DB $E614_CAL/caldb_ascii
setenv CFM_DB $E614_CAL/cfm/db_noswap
setenv CFM_LOG $E614_CAL/cfm/log
setenv CFM_DOC ${CFM_ROOT}/doc
setenv CFM_LIBRARY ${CFM_ROOT}/lib
setenv CFM_MAIN ${CFM_ROOT}/main
setenv CFM_SOURCE ${CFM_ROOT}/source
setenv CFMLOG ${CFM_LOG}/cfm.log
setenv CFMREADLOCK ${CFM_DB}/cfm.readlock
setenv CFMWRITELOCK ${CFM_DB}/cfm.writelock
setenv CFMREC ${CFM_DB}/cfm.record
alias cfm ${CFM_MAIN}/cfm.exe
goto end
mlib g77
set os_type = `uname -a | awk '{print $1}'`
set VERBOSE
unsetenv MOFIA_LIBDIR
setenv FFLAGS " "
unsetenv CFLAGS
unsetenv DFLAGS
unsetenv MAKESTD
unsetenv CERN_LIBDIR
unsetenv CERN_INCLUDE
unsetenv F90FLAGS
unsetenv I90FLAGS
unsetenv LD_COMP
setenv CXX " "
setenv CXXFLAGS " "
setenv ROOTCFLAGS " "
setenv ROOTGLIBS " "
setenv LIB_SPECIAL " "
if ( ! $?TRIUMF_SCRIPTS ) then
setenv SYNTAX "syntax"
if ( $os_type == IRIX64 || $os_type == IRIX ) then
setenv SYNTAX "syntax: mlib [-h] [g77] [gfortran] [f90] [f95] [absoft90] [icc7] [icc8] [debug] [profile] [nocheck] [static] [quiet] [[-]query]"
endif
foreach arg ( $mlib_args )
if ( $arg == -h ) then
end
unsetenv SYNTAX
foreach arg ( $mlib_args )
if ( $arg == -query ) goto query
end
if ( `echo $mlib_args | grep -c quiet` ) then
if ( `echo $mlib_args | grep -c debug` ) then
unsetenv MLIB_DEBUG
endif
if ( `echo $mlib_args | grep -c profile` ) then
unsetenv PROFILE
endif
if ( `echo $mlib_args | grep -c nocheck` ) then
unsetenv NOCHECK
endif
if ( `echo $mlib_args | grep -c static` ) then
unset STATIC
endif
unset F95
unset G77
unset GFORTRAN
unset ICC7
unset ICC8
unset ABSOFT90
if ( `echo $mlib_args | grep -c f90` ) then
if ( `echo $mlib_args | grep -c f95` ) then
if ( `echo $mlib_args | grep -c g77` ) then
set G77
endif
if ( `echo $mlib_args | grep -c gfortran` ) then
if ( `echo $mlib_args | grep -c icc7` ) then
if ( `echo $mlib_args | grep -c icc8` ) then
if ( `echo $mlib_args | grep -c absoft90` ) then
setenv CERN_INCLUDE $CERN_LIBRARY/../include
if ( $?MOFIA_ROOT ) then
setenv IFLAGS "-I. -I$MOFIA_INCLUDE -I$YBOS_LIBRARY -I$CFM_SOURCE -I$BRU_LIBRARY -I$CERN_INCLUDE -I$CERN_INCLUDE/geant321"
else
if ( $os_type == IRIX64 || $os_type == IRIX ) then
if ( $os_type == Linux ) then
if ( $?ROOTSYS ) then
setenv ROOTCFLAGS `$ROOTSYS/bin/root-config --cflags`
else
if ( $?F95 ) then
if ( $?ABSOFT90 ) then
if ( $?GFORTRAN ) then
if ( $?ICC7 ) then
if ( $?ICC8 ) then
setenv MAKESTD $TRIUMF_SCRIPTS/make.std.g77
if ( $?MOFIA_ROOT ) then
setenv MOFIA_LIBDIR $MOFIA_ROOT/lib
endif
setenv FFLAGS "-Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132"
setenv CFLAGS " -Wall -Wuninitialized"
setenv CXXFLAGS " -Wall -Wuninitialized $ROOTCFLAGS"
if ( ! $?STATIC ) then
setenv ROOTGLIBS "-L/usr/X11R6/lib -Wl,-rpath,$ROOTSYS/lib -L$ROOTSYS/lib -lNew -lCore -lCint -lGraf -lGraf3d -lGpad -lTree -lTreeViewer -lRint -lPostscript -lMatrix -lPhysics -lGui -lm -ldl -lHist -lHtml -lMinuit -lProof -lTree -lGX11 -lX3d -lXpm -lX11"
else
if ( $?MLIB_DEBUG ) then
setenv FFLAGS "-O2 ${FFLAGS}"
setenv CFLAGS "-O2 ${CFLAGS}"
setenv CXXFLAGS "-O2 ${CXXFLAGS}"
setenv LIB_SUFFIX
endif
if ( $?PROFILE ) then
setenv MAKESTD $TRIUMF_SCRIPTS/make.std.g77
setenv DFLAGS "-DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE"
setenv LD_COMP "g77"
if ( $?STATIC ) then
setenv CERN_LIBDIR $CERN_LIBRARY
setenv LIB_SPECIAL "-lcrypt -ldl -lnsl"
endif
else if ( $os_type == OSF1 ) then
if ( -e $TRIUMF_SCRIPTS/mlib-local.csh ) source $TRIUMF_SCRIPTS/mlib-local.csh
if ( -e ./mlib-local.csh ) source mlib-local.csh
query:
if ( $?VERBOSE ) then
echo " --- mlib setups ---"
--- mlib setups ---
echo 'OS type: '$os_type
OS type: Linux
if ( $?MLIB_DEBUG ) then
echo 'Debug: OFF'
Debug: OFF
endif
if ( $?PROFILE ) then
echo 'Profile: OFF'
Profile: OFF
endif
if ( $os_type == Linux ) then
if ( $?F95 ) then
if ( $?GFORTRAN ) then
if ( $?ICC7 ) then
if ( $?ICC8 ) then
if ( $?ABSOFT90 ) then
echo Compiler: g77, g77 CERNLIBs
Compiler: g77, g77 CERNLIBs
endif
endif
if ( $?ROOTSYS ) then
echo 'Root: ' $ROOTSYS
Root: /triumfcs/trshare/olchansk/root/root_v3.10.02.RH8.0
else
if ( $?CERN_LIBDIR ) then
echo 'Cern: ' $CERN_LIBDIR
Cern: /cern/2002/lib
else
if ( $?MOFIA_ROOT ) then
echo Mofia libraries: $MOFIA_LIBDIR
Mofia libraries: /home/e614/e614soft/triumf/mofia/devel/lib
echo Mofia mainf90 modules: $MOFIA_MAINF90
Mofia mainf90 modules: /home/e614/e614soft/triumf/mofia/devel/source/mainf90
else
echo Make rules: $MAKESTD
Make rules: /home/e614/e614soft/triumf/make.std.g77
endif
unsetenv VERBOSE
unsetenv PROFILE
unsetenv NOCHECK
cd $HERE/triumf/geant/devel
./make_all
if ( ! -d bin ) mkdir bin
cd source
make clean
rm -f /home/e614/private_html/nightly_builds/triumf/geant/devel/bin/bat614
rm -f /home/e614/private_html/nightly_builds/triumf/geant/devel/bin/int614
rm -f /home/e614/private_html/nightly_builds/triumf/geant/devel/bin/int614_motif
rm -f *.o Dependencies
rm -f bat614 int614 int614_motif
make
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gumain.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE ipm_dummy.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE ispmci_dummy.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gdcxyz.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE uginit.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE ufiles.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE namfil.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE defcar.F
defcar.F: In subroutine `defcar':
defcar.F:100: warning:
CALL vzero(ivec,25) ! RANLUX random generator state
1
defcar.F:132: (continued):
CALL vzero(v_stra,mstra) ! Default no thin layer option
2
Argument #1 of `vzero' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
defcar.F:100: warning:
CALL vzero(ivec,25) ! RANLUX random generator state
1
defcar.F:138: (continued):
CALL vzero( pgun,npb*13)
2
Argument #1 of `vzero' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
defcar.F:100: warning:
CALL vzero(ivec,25) ! RANLUX random generator state
1
defcar.F:156: (continued):
CALL vzero(psor,npb*9)
2
Argument #1 of `vzero' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
defcar.F:100: warning:
CALL vzero(ivec,25) ! RANLUX random generator state
1
defcar.F:174: (continued):
CALL vzero(pncl,npb*2)
2
Argument #1 of `vzero' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
defcar.F:100: warning:
CALL vzero(ivec,25) ! RANLUX random generator state
1
defcar.F:175: (continued):
CALL vzero(slgt,npb*1)
2
Argument #1 of `vzero' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
defcar.F:100: warning:
CALL vzero(ivec,25) ! RANLUX random generator state
1
defcar.F:176: (continued):
CALL vzero(cone,npb*2)
2
Argument #1 of `vzero' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
defcar.F:100: warning:
CALL vzero(ivec,25) ! RANLUX random generator state
1
defcar.F:177: (continued):
CALL vzero(con2,npb*2)
2
Argument #1 of `vzero' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE apffky.F
apffky.F: In subroutine `apffky':
apffky.F:63: warning:
CALL ffkey('NETT',nett, 1,'INTE') ! Number of Events To Tape
1
apffky.F:86: (continued):
CALL ffkey('RATE',rate_muon,4,'REAL') ! Beam Rates (for pile-up)
2
Argument #2 of `ffkey' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
apffky.F:63: warning:
CALL ffkey('NETT',nett, 1,'INTE') ! Number of Events To Tape
1
apffky.F:88: (continued):
CALL ffkey('MDCT',decay_time,1,'REAL') ! Trigger muon minimum decay time
2
Argument #2 of `ffkey' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
apffky.F:63: warning:
CALL ffkey('NETT',nett, 1,'INTE') ! Number of Events To Tape
1
apffky.F:102: (continued):
CALL ffkey('ROOM',P_atm, 2,'REAL') ! Room parameters - presently
2
Argument #2 of `ffkey' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
apffky.F:63: warning:
CALL ffkey('NETT',nett, 1,'INTE') ! Number of Events To Tape
1
apffky.F:107: (continued):
CALL ffkey('TRSL',tec_sigma0,2,'REAL') ! TEC drift resolution
2
Argument #2 of `ffkey' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
apffky.F:63: warning:
CALL ffkey('NETT',nett, 1,'INTE') ! Number of Events To Tape
1
apffky.F:108: (continued):
CALL ffkey('GCAP',n_admix, 1,'REAL') ! Nitrogen admixture in He gas
2
Argument #2 of `ffkey' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
apffky.F:63: warning:
CALL ffkey('NETT',nett, 1,'INTE') ! Number of Events To Tape
1
apffky.F:120: (continued):
CALL ffkey('MCHL',michel_rho,4,'REAL') ! Set Michel decay parameters
2
Argument #2 of `ffkey' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
apffky.F:63: warning:
CALL ffkey('NETT',nett, 1,'INTE') ! Number of Events To Tape
1
apffky.F:121: (continued):
CALL ffkey('PMU0',Pmu0, 1,'REAL') ! Initial Pmu
2
Argument #2 of `ffkey' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
apffky.F:63: warning:
CALL ffkey('NETT',nett, 1,'INTE') ! Number of Events To Tape
1
apffky.F:125: (continued):
CALL ffkey('UCUT',ucut, 2,'REAL') ! Secondary Emin into track banks
2
Argument #2 of `ffkey' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
apffky.F:63: warning:
CALL ffkey('NETT',nett, 1,'INTE') ! Number of Events To Tape
1
apffky.F:129: (continued):
CALL ffkey('DCIC',acl_dc(1) ,6,'REAL')
2
Argument #2 of `ffkey' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
apffky.F:63: warning:
CALL ffkey('NETT',nett, 1,'INTE') ! Number of Events To Tape
1
apffky.F:130: (continued):
CALL ffkey('TCIC',acl_tc(1) ,6,'REAL')
2
Argument #2 of `ffkey' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
apffky.F:63: warning:
CALL ffkey('NETT',nett, 1,'INTE') ! Number of Events To Tape
1
apffky.F:131: (continued):
CALL ffkey('PCIC',acl_pc(1) ,6,'REAL')
2
Argument #2 of `ffkey' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE ugmate.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE ugstmed.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE b_field_int.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE bfldmap.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE uhinit.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE xstrotm.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_isochrones.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_dc_eff.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_pc_eff.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_tc_eff.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_tdcmaps.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_beam_props.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE check_instrumented_wires.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE ugeom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE open_mcgeom.F
open_mcgeom.F: In subroutine `open_mcgeom':
open_mcgeom.F:22: warning: unused variable `calibplanecorrz'
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_det_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_dc_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_pc_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_tg_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_tar2_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_tar3_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_sc_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_sci2_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_sci3_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE yoke_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE tec_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE hous_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE downstream_geom.F
downstream_geom.F: In subroutine `downstream_geom':
downstream_geom.F:19: warning: unused variable `i'
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE beamline_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE collimator_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE chamber_geom.F
chamber_geom.F: In subroutine `chamber_geom':
chamber_geom.F:201: warning:
If(j.gt.ndfoils)goto 300 ! still check downstream prop. chamber
1
chamber_geom.F:213: (continued):
300 Continue
2
Reference to label at (1) is outside block containing definition at (2)
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE g10_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE targ_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE drift_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE prop_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE scint_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE calibplanecorruv.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE calibplanecorrrot.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE defdet.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gukine.F
gukine.F: In subroutine `gukine':
gukine.F:448: warning:
CALL gskine(plab,ip,nvert,0,0,nt)
1
gukine.F:642: (continued):
CALL gskine(plab,ip,nvert,ubuf,1,nt)
2
Argument #4 of `gskine' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE beam_props.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE load_gun.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE cosang.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gutrev.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gutrak.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE guphad.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE guhadr.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gustep.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE guskip.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gufld.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE spin_prop.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gudcay.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE mudcay.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE polmu.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE spin_precession.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE spin_dir.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE sample_michel.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE f_c.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE f_theta.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE r_c.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE sample_rad_muon_decay.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE fron.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE rn3dim.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE atan4.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_hit_ch.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_hit_sc.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE savespacepoint.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gudigi.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE process_sc_digitization.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE process_dc_digitization.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE process_pc_digitization.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE read_tc_geom.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE process_tc_digitization.F
process_tc_digitization.F: In subroutine `process_tc_digitization':
process_tc_digitization.F:67: warning: unused variable `temp_sort_array_'
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_hit_tc.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE resolve_tdc_signals.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE resolve_adc_signals.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE simulate_1877_tdc.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE add_to_tdc.F
add_to_tdc.F: In subroutine `add_to_tdc':
add_to_tdc.F:47: warning:
write(lout,*)'add_to_tdc: Too many words in tdc slot: ',islot,
^
Implicit declaration of `lout' at (^)
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE parity_bit.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE ybos_routines.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE ybos_make.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE fill_evid.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE fill_tdcp.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE guout.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_fbu.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_mctr.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_mct2.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_mcsp.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_mcs2.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_mcs3.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_mcwi.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_musr.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_calf.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE ascii_out.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE tec_fit.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE muon_pile_up.F
muon_pile_up.F: In subroutine `muon_pile_up':
muon_pile_up.F:20: warning: unused variable `i'
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE positron_pile_up.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE uglast.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gtmuon.F
gtmuon.F: In subroutine `gtmuon':
gtmuon.F:76: warning:
PARAMETER (EPSMAC=1.E-6)
^
Implicit declaration of `epsmac' at (^)
gtmuon.F:87: warning:
DATA IIOCL / 0 /
^
Implicit declaration of `iiocl' at (^)
gtmuon.F:81: warning:
SAVE IKCUT,STOPC
^
Implicit declaration of `ikcut' at (^)
gtmuon.F:83: warning:
COMMON/GCINWOLD/INWOLD
^
Implicit declaration of `inwold' at (^)
gtmuon.F:133: warning:
IPROC = 103
^
Implicit declaration of `iproc' at (^)
gtmuon.F:134: warning:
GEKRT1 = 1. -GEKRAT
^
Implicit declaration of `gekrt1' at (^)
gtmuon.F:135: warning:
IEK1 = IEKBIN+NEK1
^
Implicit declaration of `iek1' at (^)
gtmuon.F:136: warning:
IEK2 = IEKBIN+2*NEK1
^
Implicit declaration of `iek2' at (^)
gtmuon.F:147: warning:
STEPCL = stepcl_dc(1)
^
Implicit declaration of `stepcl' at (^)
gtmuon.F:153: warning:
CALL GRNDM(RNDM,1)
^
Implicit declaration of `rndm' at (^)
gtmuon.F:154: warning:
ZINTCL = - LOG(RNDM)
^
Implicit declaration of `zintcl' at (^)
gtmuon.F:159: warning:
SIOCL = STEPCL*ZINTCL
^
Implicit declaration of `siocl' at (^)
gtmuon.F:235: warning:
SMULOF = GEKRT1*Q(JMULOF+IEKBIN) +GEKRAT*Q(JMULOF+IEKBIN+1)
^
Implicit declaration of `smulof' at (^)
gtmuon.F:254: warning:
DO 10 IST = IQ(JSTAK+3),IQ(JSTAK+1)
^
Implicit declaration of `ist' at (^)
gtmuon.F:255: warning:
JST = JSTAK + 3 + (IST-1)*NWSTAK
^
Implicit declaration of `jst' at (^)
gtmuon.F:269: warning:
DO 20 I = 1,3
^
Implicit declaration of `i' at (^)
gtmuon.F:270: warning:
VECTMP = VECT(I) +STEP*VECT(I+3)
^
Implicit declaration of `vectmp' at (^)
gtmuon.F:307: warning:
INEAR = 0
^
Implicit declaration of `inear' at (^)
gtmuon.F:330: warning:
call glvolu(nlevel,names,number,ier)
^
Implicit declaration of `ier' at (^)
gtmuon.F:335: warning:
CALL GINVOL (VOUT, ISAME)
^
Implicit declaration of `isame' at (^)
gtmuon.F:364: warning:
CORR=0.0001*(STEP/RADL)*(GETOT/(VECT(7)*VECT(7)))**2
^
Implicit declaration of `corr' at (^)
gtmuon.F:388: warning:
I1 = MAX(IEKBIN-1,1)
^
Implicit declaration of `i1' at (^)
gtmuon.F:420: warning:
DEMS = DEMEAN
^
Implicit declaration of `dems' at (^)
gtmuon.F:424: warning:
GEKINT = GEKIN -DESTEP
^
Implicit declaration of `gekint' at (^)
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gtelec.F
gtelec.F: In subroutine `gtelec':
gtelec.F:66: warning:
PARAMETER (EPSMAC=1.E-6)
^
Implicit declaration of `epsmac' at (^)
gtelec.F:77: warning:
DATA IIOCL / 0 /
^
Implicit declaration of `iiocl' at (^)
gtelec.F:85: warning:
PARAMETER ( TLIM = 0.0002)
^
Implicit declaration of `tlim' at (^)
gtelec.F:71: warning:
SAVE IKCUT,STOPC
^
Implicit declaration of `ikcut' at (^)
gtelec.F:73: warning:
COMMON/GCINWOLD/INWOLD
^
Implicit declaration of `inwold' at (^)
gtelec.F:86: warning:
IABAN = NINT(DPHYS1)
^
Implicit declaration of `iaban' at (^)
gtelec.F:135: warning:
IPROC = 103
^
Implicit declaration of `iproc' at (^)
gtelec.F:136: warning:
GEKRT1 = 1. -GEKRAT
^
Implicit declaration of `gekrt1' at (^)
gtelec.F:147: warning:
STEPCL = stepcl_dc(2)
^
Implicit declaration of `stepcl' at (^)
gtelec.F:153: warning:
CALL GRNDM(RNDM,1)
^
Implicit declaration of `rndm' at (^)
gtelec.F:154: warning:
ZINTCL = - LOG(RNDM)
^
Implicit declaration of `zintcl' at (^)
gtelec.F:159: warning:
SIOCL = STEPCL*ZINTCL
^
Implicit declaration of `siocl' at (^)
gtelec.F:213: warning:
SMULOF = GEKRT1*Q(JMULOF+IEKBIN) +GEKRAT*Q(JMULOF+IEKBIN+1)
^
Implicit declaration of `smulof' at (^)
gtelec.F:231: warning:
DO 10 IST = IQ(JSTAK+3),IQ(JSTAK+1)
^
Implicit declaration of `ist' at (^)
gtelec.F:232: warning:
JST = JSTAK + 3 + (IST-1)*NWSTAK
^
Implicit declaration of `jst' at (^)
gtelec.F:249: warning:
DO 20 I = 1,3
^
Implicit declaration of `i' at (^)
gtelec.F:250: warning:
VECTMP = VECT(I) +STEP*VECT(I+3)
^
Implicit declaration of `vectmp' at (^)
gtelec.F:287: warning:
INEAR = 0
^
Implicit declaration of `inear' at (^)
gtelec.F:310: warning:
call glvolu(nlevel,names,number,ier)
^
Implicit declaration of `ier' at (^)
gtelec.F:315: warning:
CALL GINVOL (VOUT, ISAME)
^
Implicit declaration of `isame' at (^)
gtelec.F:345: warning:
CORR=0.0001*(STEP/RADL)*(GETOT/(VECT(7)*VECT(7)))**2
^
Implicit declaration of `corr' at (^)
gtelec.F:376: warning:
I1 = MAX(IEKBIN-1,1)
^
Implicit declaration of `i1' at (^)
gtelec.F:393: warning:
STEP = MAX(STOPMX - STOPC,ZERO)
^
Implicit declaration of `zero' at (^)
gtelec.F:410: warning:
DEMS = DEMEAN
^
Implicit declaration of `dems' at (^)
gtelec.F:414: warning:
GEKINT = GEKIN -DESTEP
^
Implicit declaration of `gekint' at (^)
gtelec.F:474: warning:
TOSTOP=STOPMX-STEP*DESTEP/DEMEAN-STOPC
^
Implicit declaration of `tostop' at (^)
gtelec.F:505: warning:
ALFA=0.18*Z
^
Implicit declaration of `alfa' at (^)
gtelec.F:506: warning:
ALFA1=ALFA+1.
^
Implicit declaration of `alfa1' at (^)
gtelec.F:507: warning:
TGTH2=ALFA*ALFA1/(1.2+ALFA)
^
Implicit declaration of `tgth2' at (^)
gtelec.F:508: warning:
S=TOSTOP*SQRT(1.+TGTH2)/ALFA1
^
Implicit declaration of `s' at (^)
gtelec.F:509: warning:
TGTH=SQRT(TGTH2)
^
Implicit declaration of `tgth' at (^)
gtelec.F:510: warning:
THET=ATAN(TGTH)
^
Implicit declaration of `thet' at (^)
gtelec.F:515: warning:
CT=COS(THET)
^
Implicit declaration of `ct' at (^)
gtelec.F:516: warning:
ST=SQRT(1.-CT*CT)
^
Implicit declaration of `st' at (^)
gtelec.F:518: warning:
PHI=TWOPI*RNDM
^
Implicit declaration of `phi' at (^)
gtelec.F:520: warning:
D1=ST*COS(PHI)
^
Implicit declaration of `d1' at (^)
gtelec.F:521: warning:
D2=ST*SIN(PHI)
^
Implicit declaration of `d2' at (^)
gtelec.F:522: warning:
D3=CT
^
Implicit declaration of `d3' at (^)
gtelec.F:523: warning:
VMM=SQRT(VECT(4)*VECT(4)+VECT(5)*VECT(5))
^
Implicit declaration of `vmm' at (^)
gtelec.F:525: warning:
PD1=VECT(4)/VMM
^
Implicit declaration of `pd1' at (^)
gtelec.F:526: warning:
PD2=VECT(5)/VMM
^
Implicit declaration of `pd2' at (^)
gtelec.F:527: warning:
V4=PD1*VECT(6)*D1-PD2*D2+VECT(4)*D3
^
Implicit declaration of `v4' at (^)
gtelec.F:528: warning:
V5=PD2*VECT(6)*D1+PD1*D2+VECT(5)*D3
^
Implicit declaration of `v5' at (^)
gtelec.F:529: warning:
V6=-VMM*D1+VECT(6)*D3
^
Implicit declaration of `v6' at (^)
gtelec.F:535: warning:
VP=1./SQRT(V4*V4+V5*V5+V6*V6)
^
Implicit declaration of `vp' at (^)
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gthadr.F
gthadr.F: In subroutine `gthadr':
gthadr.F:67: warning:
PARAMETER (EPSMAC=1.E-6)
^
Implicit declaration of `epsmac' at (^)
gthadr.F:70: warning:
PARAMETER (THRESH=0.7,ONE=1)
^
Implicit declaration of `thresh' at (^)
gthadr.F:78: warning:
DATA IIOCL / 0 /
^
Implicit declaration of `iiocl' at (^)
gthadr.F:72: warning:
SAVE CFLD,CHARG2,RMASS,CUTPRO,IKCUT,STOPC
^
Implicit declaration of `cfld' at (^)
gthadr.F:72: warning:
SAVE CFLD,CHARG2,RMASS,CUTPRO,IKCUT,STOPC
^
Implicit declaration of `charg2' at (^)
gthadr.F:72: warning:
SAVE CFLD,CHARG2,RMASS,CUTPRO,IKCUT,STOPC
^
Implicit declaration of `rmass' at (^)
gthadr.F:72: warning:
SAVE CFLD,CHARG2,RMASS,CUTPRO,IKCUT,STOPC
^
Implicit declaration of `cutpro' at (^)
gthadr.F:72: warning:
SAVE CFLD,CHARG2,RMASS,CUTPRO,IKCUT,STOPC
^
Implicit declaration of `ikcut' at (^)
gthadr.F:74: warning:
COMMON/GCINWOLD/INWOLD
^
Implicit declaration of `inwold' at (^)
gthadr.F:128: warning:
IPROC = 103
^
Implicit declaration of `iproc' at (^)
gthadr.F:129: warning:
GEKRT1 = 1. -GEKRAT
^
Implicit declaration of `gekrt1' at (^)
gthadr.F:139: warning:
STEPCL = stepcl_dc(2)
^
Implicit declaration of `stepcl' at (^)
gthadr.F:143: warning:
CALL GRNDM(RNDM,1)
^
Implicit declaration of `rndm' at (^)
gthadr.F:144: warning:
ZINTCL = - LOG(RNDM)
^
Implicit declaration of `zintcl' at (^)
gthadr.F:149: warning:
SIOCL = STEPCL*ZINTCL
^
Implicit declaration of `siocl' at (^)
gthadr.F:185: warning:
GAMASS = GETOT +AMASS
^
Implicit declaration of `gamass' at (^)
gthadr.F:186: warning:
TMAX = EMASS*GEKIN*GAMASS/(0.5*AMASS*AMASS+EMASS*GETOT)
^
Implicit declaration of `tmax' at (^)
gthadr.F:188: warning:
BET2 = GEKIN*GAMASS/(GETOT*GETOT)
^
Implicit declaration of `bet2' at (^)
gthadr.F:189: warning:
Y = DCUTM/TMAX
^
Implicit declaration of `y' at (^)
gthadr.F:190: warning:
SIG = (1.-Y+BET2*Y*LOG(Y))/DCUTM
^
Implicit declaration of `sig' at (^)
gthadr.F:216: warning:
I1 = MAX(IEKBIN-1,1)
^
Implicit declaration of `i1' at (^)
gthadr.F:239: warning:
EKF = (1. - DEEMAX)*GEKIN*RMASS
^
Implicit declaration of `ekf' at (^)
gthadr.F:245: warning:
IKF=GEKA*LOG10(EKF)+GEKB
^
Implicit declaration of `ikf' at (^)
gthadr.F:248: warning:
IK1 = MAX(IKF-1,1)
^
Implicit declaration of `ik1' at (^)
gthadr.F:257: warning:
SLOSP = -YCOEF2+SIGN(ONE,YCOEF1)*SQRT(YCOEF2**2- (YCOEF3-
^
Implicit declaration of `slosp' at (^)
gthadr.F:298: warning:
STCKOV = MXPHOT/MAX(3.*DNDL,1E-10)
^
Implicit declaration of `stckov' at (^)
gthadr.F:317: warning:
DO 20 IST = IQ(JSTAK+3),IQ(JSTAK+1)
^
Implicit declaration of `ist' at (^)
gthadr.F:318: warning:
JST = JSTAK + 3 + (IST-1)*NWSTAK
^
Implicit declaration of `jst' at (^)
gthadr.F:332: warning:
DO 30 I = 1,3
^
Implicit declaration of `i' at (^)
gthadr.F:333: warning:
VECTMP = VECT(I) +STEP*VECT(I+3)
^
Implicit declaration of `vectmp' at (^)
gthadr.F:370: warning:
INEAR = 0
^
Implicit declaration of `inear' at (^)
gthadr.F:393: warning:
call glvolu(nlevel,names,number,ier)
^
Implicit declaration of `ier' at (^)
gthadr.F:398: warning:
CALL GINVOL (VOUT, ISAME)
^
Implicit declaration of `isame' at (^)
gthadr.F:426: warning:
CORR=0.0001*CHARG2*(STEP/RADL)*(GETOT/(VECT(7)*VECT(7)))**2
^
Implicit declaration of `corr' at (^)
gthadr.F:467: warning:
DEMS = DEMEAN/CHARG2
^
Implicit declaration of `dems' at (^)
gthadr.F:472: warning:
GEKINT = GEKIN -DESTEP
^
Implicit declaration of `gekint' at (^)
gthadr.F:513: warning:
GAMMA = GETOT/AMASS
^
Implicit declaration of `gamma' at (^)
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gsrotm.F
gsrotm.F: In subroutine `gsrotm':
gsrotm.F:33: warning:
DIMENSION ANGLES(6),IP(3)
^
Implicit declaration of `angles' at (^)
gsrotm.F:33: warning:
DIMENSION ANGLES(6),IP(3)
^
Implicit declaration of `ip' at (^)
gsrotm.F:18: warning:
SUBROUTINE GSROTM(NMAT,THETA1,PHI1,THETA2,PHI2,THETA3,PHI3)
^
Implicit declaration of `nmat' at (^)
gsrotm.F:53: warning:
NPUSH=NMAT-IQ(JROTM-2)+50
^
Implicit declaration of `npush' at (^)
gsrotm.F:56: warning:
JR1=0
^
Implicit declaration of `jr1' at (^)
gsrotm.F:66: warning:
CALL MZBOOK(IXCONS,JR,JROTM,-NMAT,'ROTM',0,0,16,3,0)
^
Implicit declaration of `jr' at (^)
gsrotm.F:18: warning:
SUBROUTINE GSROTM(NMAT,THETA1,PHI1,THETA2,PHI2,THETA3,PHI3)
^
Implicit declaration of `theta1' at (^)
gsrotm.F:18: warning:
SUBROUTINE GSROTM(NMAT,THETA1,PHI1,THETA2,PHI2,THETA3,PHI3)
^
Implicit declaration of `phi1' at (^)
gsrotm.F:18: warning:
SUBROUTINE GSROTM(NMAT,THETA1,PHI1,THETA2,PHI2,THETA3,PHI3)
^
Implicit declaration of `theta2' at (^)
gsrotm.F:18: warning:
SUBROUTINE GSROTM(NMAT,THETA1,PHI1,THETA2,PHI2,THETA3,PHI3)
^
Implicit declaration of `phi2' at (^)
gsrotm.F:18: warning:
SUBROUTINE GSROTM(NMAT,THETA1,PHI1,THETA2,PHI2,THETA3,PHI3)
^
Implicit declaration of `theta3' at (^)
gsrotm.F:18: warning:
SUBROUTINE GSROTM(NMAT,THETA1,PHI1,THETA2,PHI2,THETA3,PHI3)
^
Implicit declaration of `phi3' at (^)
gsrotm.F:75: warning:
DO 10 N = 1,3
^
Implicit declaration of `n' at (^)
gsrotm.F:76: warning:
THERAD = Q(JR+ 9+2*N)*DEGRAD
^
Implicit declaration of `therad' at (^)
gsrotm.F:77: warning:
PHIRAD = Q(JR+10+2*N)*DEGRAD
^
Implicit declaration of `phirad' at (^)
gsrotm.F:78: warning:
SINTHE = SIN(THERAD)
^
Implicit declaration of `sinthe' at (^)
gsrotm.F:94: warning:
DO 20 J=1,9
^
Implicit declaration of `j' at (^)
gsrotm.F:184: warning:
JJR=JR+J*3-3
^
Implicit declaration of `jjr' at (^)
gsrotm.F:186: warning:
DO 120 I = 1,3
^
Implicit declaration of `i' at (^)
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gprmat.F
gprmat.F: In subroutine `gprmat':
gprmat.F:55: warning:
PARAMETER (MMX=200)
^
Implicit declaration of `mmx' at (^)
gprmat.F:15: warning:
SUBROUTINE GPRMAT(IMATE,IPART,MECAN,KDIN,TKIN)
^
Implicit declaration of `kdin' at (^)
/cern/2002/lib/../include/geant321/gcnmec.inc:16: warning:
PARAMETER(NMECA=45,IBLOWN=23)
^
Implicit declaration of `nmeca' at (^)
/cern/2002/lib/../include/geant321/gcnmec.inc:16: warning:
PARAMETER(NMECA=45,IBLOWN=23)
^
Implicit declaration of `iblown' at (^)
gprmat.F:15: warning:
SUBROUTINE GPRMAT(IMATE,IPART,MECAN,KDIN,TKIN)
^
Implicit declaration of `tkin' at (^)
gprmat.F:59: warning:
DIMENSION TKIN(KDIN),VALUE(MMX),SIGT(MMX),PCUT(5),CU(5)
^
Implicit declaration of `value' at (^)
gprmat.F:59: warning:
DIMENSION TKIN(KDIN),VALUE(MMX),SIGT(MMX),PCUT(5),CU(5)
^
Implicit declaration of `sigt' at (^)
gprmat.F:59: warning:
DIMENSION TKIN(KDIN),VALUE(MMX),SIGT(MMX),PCUT(5),CU(5)
^
Implicit declaration of `pcut' at (^)
gprmat.F:59: warning:
DIMENSION TKIN(KDIN),VALUE(MMX),SIGT(MMX),PCUT(5),CU(5)
^
Implicit declaration of `cu' at (^)
gprmat.F:65: warning:
KDIM = MIN(KDIN,MMX)
^
Implicit declaration of `kdim' at (^)
gprmat.F:15: warning:
SUBROUTINE GPRMAT(IMATE,IPART,MECAN,KDIN,TKIN)
^
Implicit declaration of `imate' at (^)
gprmat.F:71: warning:
JMA = LQ(JMATE-IMATE)
^
Implicit declaration of `jma' at (^)
gprmat.F:15: warning:
SUBROUTINE GPRMAT(IMATE,IPART,MECAN,KDIN,TKIN)
^
Implicit declaration of `ipart' at (^)
gprmat.F:77: warning:
JPA = LQ(JPART-IPART)
^
Implicit declaration of `jpa' at (^)
gprmat.F:80: warning:
DO 10 JSIG=1,MMX
^
Implicit declaration of `jsig' at (^)
gprmat.F:84: warning:
N1 = 1
^
Implicit declaration of `n1' at (^)
gprmat.F:85: warning:
N2 = NMECA
^
Implicit declaration of `n2' at (^)
gprmat.F:88: warning:
DO 20 IMECA=1,NMECA
^
Implicit declaration of `imeca' at (^)
gprmat.F:101: warning:
DO 60 IMEC = N1,N2
^
Implicit declaration of `imec' at (^)
gprmat.F:104: warning:
CALL GFTMAT(IMATE,IPART,MECA,KDIM,TKIN,VALUE,PCUT,IXST)
^
Implicit declaration of `ixst' at (^)
gprmat.F:108: warning:
WRITE(CHMAIL,10100)(IQ(JMA+I),I=1,5),MECA,(IQ(JPA+J),J=1,5)
^
Implicit declaration of `i' at (^)
gprmat.F:108: warning:
WRITE(CHMAIL,10100)(IQ(JMA+I),I=1,5),MECA,(IQ(JPA+J),J=1,5)
^
Implicit declaration of `j' at (^)
gprmat.F:113: warning:
DO 30 K=1,5
^
Implicit declaration of `k' at (^)
gprmat.F:124: warning:
NROW = (KDIM-1)/3 + 1
^
Implicit declaration of `nrow' at (^)
gprmat.F:125: warning:
DO 40 IKB=1,NROW
^
Implicit declaration of `ikb' at (^)
gprmat.F:126: warning:
IK = IKB
^
Implicit declaration of `ik' at (^)
gprmat.F:127: warning:
DE1 = VALUE(IK)
^
Implicit declaration of `de1' at (^)
gprmat.F:128: warning:
CALL GEVKEV(TKIN(IK),EK1,KU1)
^
Implicit declaration of `ek1' at (^)
gprmat.F:132: warning:
DE2 = VALUE(IK)
^
Implicit declaration of `de2' at (^)
gprmat.F:133: warning:
CALL GEVKEV(TKIN(IK),EK2,KU2)
^
Implicit declaration of `ek2' at (^)
gprmat.F:137: warning:
DE3 = VALUE(IK)
^
Implicit declaration of `de3' at (^)
gprmat.F:138: warning:
CALL GEVKEV(TKIN(IK),EK3,KU3)
^
Implicit declaration of `ek3' at (^)
gprmat.F:150: warning:
SIG1 = VALUE(IK)
^
Implicit declaration of `sig1' at (^)
gprmat.F:151: warning:
AL1=0.
^
Implicit declaration of `al1' at (^)
gprmat.F:158: warning:
SIG2 = VALUE(IK)
^
Implicit declaration of `sig2' at (^)
gprmat.F:159: warning:
AL2=0.
^
Implicit declaration of `al2' at (^)
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gtrack.F
gtrack.F: In subroutine `gtrack':
gtrack.F:77: warning:
PARAMETER (EPSMAC=1.E-6)
^
Implicit declaration of `epsmac' at (^)
gtrack.F:73: warning:
DIMENSION CUTS(10),MECA(5,13)
^
Implicit declaration of `cuts' at (^)
gtrack.F:73: warning:
DIMENSION CUTS(10),MECA(5,13)
^
Implicit declaration of `meca' at (^)
gtrack.F:75: warning:
SAVE PRECOR
^
Implicit declaration of `precor' at (^)
gtrack.F:82: warning:
COMMON/GCINWOLD/INWOLD
^
Implicit declaration of `inwold' at (^)
gtrack.F:86: warning:
EPSCUR = EPSMAC
^
Implicit declaration of `epscur' at (^)
gtrack.F:87: warning:
NSTOUT = 0
^
Implicit declaration of `nstout' at (^)
gtrack.F:96: warning:
DO 20 I = 1,5
^
Implicit declaration of `i' at (^)
gtrack.F:123: warning:
JTMN = LQ(JTM)
^
Implicit declaration of `jtmn' at (^)
gtrack.F:316: warning:
PMOM = SQRT(VECT(4)**2+VECT(5)**2+VECT(6)**2)
^
Implicit declaration of `pmom' at (^)
gtrack.F:318: warning:
CMOD = 1./PMOM
^
Implicit declaration of `cmod' at (^)
gtrack.F:358: warning:
NLCUR = NLEVEL
^
Implicit declaration of `nlcur' at (^)
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gschit.F
gschit.F: In subroutine `gschit':
gschit.F:44: warning:
PARAMETER (MAXINT=2147483647)
^
Implicit declaration of `maxint' at (^)
gschit.F:45: warning:
SAVE NMESS
^
Implicit declaration of `nmess' at (^)
gschit.F:15: warning:
SUBROUTINE GSCHIT(ISET,IDET,ITRA,NUMBV,HITS,NHSUM,IHIT)
^
Implicit declaration of `numbv' at (^)
gschit.F:15: warning:
SUBROUTINE GSCHIT(ISET,IDET,ITRA,NUMBV,HITS,NHSUM,IHIT)
^
Implicit declaration of `hits' at (^)
gschit.F:42: warning:
COMMON/GCLOCA/NLOCAL(2),JS,JD,JDH,JH,JHD,LOCAL(15)
^
Implicit declaration of `nlocal' at (^)
gschit.F:42: warning:
COMMON/GCLOCA/NLOCAL(2),JS,JD,JDH,JH,JHD,LOCAL(15)
^
Implicit declaration of `js' at (^)
gschit.F:42: warning:
COMMON/GCLOCA/NLOCAL(2),JS,JD,JDH,JH,JHD,LOCAL(15)
^
Implicit declaration of `jd' at (^)
gschit.F:42: warning:
COMMON/GCLOCA/NLOCAL(2),JS,JD,JDH,JH,JHD,LOCAL(15)
^
Implicit declaration of `jdh' at (^)
gschit.F:42: warning:
COMMON/GCLOCA/NLOCAL(2),JS,JD,JDH,JH,JHD,LOCAL(15)
^
Implicit declaration of `jh' at (^)
gschit.F:42: warning:
COMMON/GCLOCA/NLOCAL(2),JS,JD,JDH,JH,JHD,LOCAL(15)
^
Implicit declaration of `jhd' at (^)
gschit.F:42: warning:
COMMON/GCLOCA/NLOCAL(2),JS,JD,JDH,JH,JHD,LOCAL(15)
^
Implicit declaration of `local' at (^)
gschit.F:15: warning:
SUBROUTINE GSCHIT(ISET,IDET,ITRA,NUMBV,HITS,NHSUM,IHIT)
^
Implicit declaration of `iset' at (^)
gschit.F:15: warning:
SUBROUTINE GSCHIT(ISET,IDET,ITRA,NUMBV,HITS,NHSUM,IHIT)
^
Implicit declaration of `idet' at (^)
gschit.F:15: warning:
SUBROUTINE GSCHIT(ISET,IDET,ITRA,NUMBV,HITS,NHSUM,IHIT)
^
Implicit declaration of `itra' at (^)
gschit.F:15: warning:
SUBROUTINE GSCHIT(ISET,IDET,ITRA,NUMBV,HITS,NHSUM,IHIT)
^
Implicit declaration of `ihit' at (^)
gschit.F:15: warning:
SUBROUTINE GSCHIT(ISET,IDET,ITRA,NUMBV,HITS,NHSUM,IHIT)
^
Implicit declaration of `nhsum' at (^)
gschit.F:54: warning:
NV=IQ(JD+1)
^
Implicit declaration of `nv' at (^)
gschit.F:55: warning:
NH=IQ(JD+3)
^
Implicit declaration of `nh' at (^)
gschit.F:56: warning:
NW=NV+NH+1
^
Implicit declaration of `nw' at (^)
gschit.F:57: warning:
JNEWH = JHD+(IHIT-1)*NW
^
Implicit declaration of `jnewh' at (^)
gschit.F:58: warning:
JCURR = JNEWH
^
Implicit declaration of `jcurr' at (^)
gschit.F:60: warning:
DO 30 I=1,IHIT-1
^
Implicit declaration of `i' at (^)
gschit.F:69: warning:
DO 10 J=2,NV+1
^
Implicit declaration of `j' at (^)
gschit.F:75: warning:
DO 20 K=NW,NW-NHSUM+1,-1
^
Implicit declaration of `k' at (^)
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gmhits_tec.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE cern_vect.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE dgfang.F
dgfang.F: In subroutine `dgfang':
dgfang.F:34: warning:
DSITH = DSQRT(DSITH2)
^
Implicit declaration of `dsith' at (^)
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE grndm.F
g++ -c -o operafld.o -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -O2 -Wall -Wuninitialized -D_REENTRANT -I/triumfcs/trshare/olchansk/root/root_v3.10.02.RH8.0/include operafld.cpp
cc -c -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -O2 -Wall -Wuninitialized iutime.c
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE sort_ch_hits.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE sample_michelb.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_deriv.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_reqnum.F
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE store_nthrown.F
g++ -c -o srvfuncs.o -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -O2 -Wall -Wuninitialized -D_REENTRANT -I/triumfcs/trshare/olchansk/root/root_v3.10.02.RH8.0/include srvfuncs.cpp
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE dtt_gettime.F
g77 -o /home/e614/private_html/nightly_builds/triumf/geant/devel/bin/bat614 -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -L/home/e614/e614soft/triumf/ybos/4.1/library -L/cern/2002/lib -L/usr/X11R6/lib gumain.o ipm_dummy.o ispmci_dummy.o gdcxyz.o uginit.o ufiles.o namfil.o defcar.o apffky.o ugmate.o ugstmed.o b_field_int.o bfldmap.o uhinit.o xstrotm.o read_isochrones.o read_dc_eff.o read_pc_eff.o read_tc_eff.o read_tdcmaps.o read_beam_props.o check_instrumented_wires.o ugeom.o open_mcgeom.o read_det_geom.o read_dc_geom.o read_pc_geom.o read_tg_geom.o read_tar2_geom.o read_tar3_geom.o read_sc_geom.o read_sci2_geom.o read_sci3_geom.o yoke_geom.o tec_geom.o hous_geom.o downstream_geom.o beamline_geom.o collimator_geom.o chamber_geom.o g10_geom.o targ_geom.o drift_geom.o prop_geom.o scint_geom.o calibplanecorruv.o calibplanecorrrot.o defdet.o gukine.o beam_props.o load_gun.o cosang.o gutrev.o gutrak.o guphad.o guhadr.o gustep.o guskip.o gufld.o spin_prop.o gudcay.o mudcay.o polmu.o spin_precession.o spin_dir.o sample_michel.o f_c.o f_theta.o r_c.o sample_rad_muon_decay.o fron.o rn3dim.o atan4.o store_hit_ch.o store_hit_sc.o savespacepoint.o gudigi.o process_sc_digitization.o process_dc_digitization.o process_pc_digitization.o read_tc_geom.o process_tc_digitization.o store_hit_tc.o resolve_tdc_signals.o resolve_adc_signals.o simulate_1877_tdc.o add_to_tdc.o parity_bit.o ybos_routines.o ybos_make.o fill_evid.o fill_tdcp.o guout.o store_fbu.o store_mctr.o store_mct2.o store_mcsp.o store_mcs2.o store_mcs3.o store_mcwi.o store_musr.o store_calf.o ascii_out.o tec_fit.o muon_pile_up.o positron_pile_up.o uglast.o gtmuon.o gtelec.o gthadr.o gsrotm.o gprmat.o gtrack.o gschit.o gmhits_tec.o cern_vect.o dgfang.o grndm.o operafld.o iutime.o sort_ch_hits.o sample_michelb.o store_deriv.o store_reqnum.o store_nthrown.o srvfuncs.o dtt_gettime.o -lybos -lgeant321 -lpawlib -lgraflib -lgrafX11 -lpacklib -lmathlib -lkernlib -llapack3 -lblas -lcrypt -ldl -lnsl -lstdc++
make int614
g77 -c -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 -I. -I/home/e614/e614soft/triumf/mofia/devel/source/include -I/home/e614/e614soft/triumf/ybos/4.1/library -I/home/e614/e614soft/triumf/cfm/2.2/source -I/home/e614/e614soft/triumf/bru/1.1 -I/cern/2002/lib/../include -I/cern/2002/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Dg77 -DCERNLIB_TYPE gxint321.F
gxint321.F: In program `gxint':
gxint321.F:9: warning:
PARAMETER (NWGEAN=3000000,NWPAW=1000000)
^
Implicit declaration of `nwgean' at (^)
gxint321.F:9: warning:
PARAMETER (NWGEAN=3000000,NWPAW=1000000)
^
Implicit declaration of `nwpaw' at (^)
gxint321.F:10: warning:
COMMON/GCBANK/GEANT(NWGEAN)
^
Implicit declaration of `geant' at (^)
gxint321.F:11: warning:
COMMON/PAWC/PAW(NWPAW)
^
Implicit declaration of `paw' at (^)
g77 -o /home/e614/private_html/nightly_builds/triumf/geant/devel/bin/int614 -O2 -Wall -Wuninitialized -Wimplicit -fno-second-underscore -fno-automatic -finit-local-zero -ffixed-line-length-132 gxint321.o uginit.o ufiles.o namfil.o defcar.o apffky.o ugmate.o ugstmed.o b_field_int.o bfldmap.o uhinit.o xstrotm.o read_isochrones.o read_dc_eff.o read_pc_eff.o read_tc_eff.o read_tdcmaps.o read_beam_props.o check_instrumented_wires.o ugeom.o open_mcgeom.o read_det_geom.o read_dc_geom.o read_pc_geom.o read_tg_geom.o read_tar2_geom.o read_tar3_geom.o read_sc_geom.o read_sci2_geom.o read_sci3_geom.o yoke_geom.o tec_geom.o hous_geom.o downstream_geom.o beamline_geom.o collimator_geom.o chamber_geom.o g10_geom.o targ_geom.o drift_geom.o prop_geom.o scint_geom.o calibplanecorruv.o calibplanecorrrot.o defdet.o gukine.o beam_props.o load_gun.o cosang.o gutrev.o gutrak.o guphad.o guhadr.o gustep.o guskip.o gufld.o spin_prop.o gudcay.o mudcay.o polmu.o spin_precession.o spin_dir.o sample_michel.o f_c.o f_theta.o r_c.o sample_rad_muon_decay.o fron.o rn3dim.o atan4.o store_hit_ch.o store_hit_sc.o savespacepoint.o gudigi.o process_sc_digitization.o process_dc_digitization.o process_pc_digitization.o read_tc_geom.o process_tc_digitization.o store_hit_tc.o resolve_tdc_signals.o resolve_adc_signals.o simulate_1877_tdc.o add_to_tdc.o parity_bit.o ybos_routines.o ybos_make.o fill_evid.o fill_tdcp.o guout.o store_fbu.o store_mctr.o store_mct2.o store_mcsp.o store_mcs2.o store_mcs3.o store_mcwi.o store_musr.o store_calf.o ascii_out.o tec_fit.o muon_pile_up.o positron_pile_up.o uglast.o gtmuon.o gtelec.o gthadr.o gsrotm.o gprmat.o gtrack.o gschit.o gmhits_tec.o cern_vect.o dgfang.o grndm.o operafld.o iutime.o sort_ch_hits.o sample_michelb.o store_deriv.o store_reqnum.o store_nthrown.o srvfuncs.o dtt_gettime.o -L/home/e614/e614soft/triumf/ybos/4.1/library -L/cern/2002/lib -L/usr/X11R6/lib -lybos -lgeant321 -lpawlib -lgraflib -lgrafX11 -lpacklib -lmathlib -lkernlib -llapack3 -lblas -lX11 -lcrypt -ldl -lnsl -lstdc++
/cern/2002/lib/libpawlib.a(bugrep.o): In function `br_create_template':
bugrep.o(.text+0xfe): the use of `tmpnam' is dangerous, better use `mkstemp'