set HERE=`pwd`

source ~/.login







if ( $?path ) then
set path= ( . $HOME/bin $path /triumfcs/linux/bin )
else

set path= ( $path /cern/pro/bin /usr/sbin )
set prompt="`hostname`> "


setenv TERM vt100
setenv EDITOR emacs
setenv TRIUMF_TERMINAL_TYPE X


biff y
stderr is not a tty - where are you?


alias ls 'ls -CF --color'
alias rm 'rm -i'


source ~/e614soft/triumf/setup.com










set LOCAL = /home/e614/e614soft
set TWIST = /home/e614/e614soft
setenv TRIUMF_ROOT ${LOCAL}/triumf
setenv E614_ROOT ${TWIST}/triumf
setenv E614_CAL ${TWIST}



setenv ROOTSYS /twist/local/root




setenv CERN_LIBRARY /cern/2000/lib




setenv CERN_LIBRARY_ABSOFT /twist/local/cern_absoft/2000a/lib




setenv CVS_RSH ssh







setenv CVSROOT /home/e614mgr/cvs





if ( `echo $PATH | grep -c "root/bin" ` ) then

set path= ( $path $ROOTSYS/bin )
setenv LD_LIBRARY_PATH ${ROOTSYS}/lib:/usr/local/lib
endif



setenv GPLOT_DIR ${TRIUMF_ROOT}/gplot
setenv BRU_COMMANDS ${TRIUMF_ROOT}/bru
setenv MOFIA_COMMANDS ${TRIUMF_ROOT}/mofia
setenv GEANT_COMMANDS ${TRIUMF_ROOT}/geant
setenv CFM_COMMANDS ${TRIUMF_ROOT}/cfm
setenv YBOS_COMMANDS ${TRIUMF_ROOT}/ybos




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_ROOT}/mlib.csh; unset mlib_args"



unset LOCAL






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
-------------------------------------------------------------------------------
                                  MOFIA devel  

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}


if ( ${vers} == "2.2" || ${vers} == "new" ) then
setenv CFM_DB ${E614_CAL}/cfm/db_noswap
setenv CAL_DB ${E614_CAL}/caldb_ascii
else



setenv CFM_DOC ${CFM_ROOT}/doc
setenv CFM_LIBRARY ${CFM_ROOT}/lib
setenv CFM_LOG ${E614_CAL}/cfm/log
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
Mon Feb 10 03:09:27 PST 2003





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










set LOCAL = /home/e614/e614soft
set TWIST = /home/e614/e614soft
setenv TRIUMF_ROOT ${LOCAL}/triumf
setenv E614_ROOT ${TWIST}/triumf
setenv E614_CAL ${TWIST}



setenv ROOTSYS /twist/local/root




setenv CERN_LIBRARY /cern/2000/lib




setenv CERN_LIBRARY_ABSOFT /twist/local/cern_absoft/2000a/lib




setenv CVS_RSH ssh







setenv CVSROOT /home/e614mgr/cvs





if ( `echo $PATH | grep -c "root/bin" ` ) then
else



setenv GPLOT_DIR ${TRIUMF_ROOT}/gplot
setenv BRU_COMMANDS ${TRIUMF_ROOT}/bru
setenv MOFIA_COMMANDS ${TRIUMF_ROOT}/mofia
setenv GEANT_COMMANDS ${TRIUMF_ROOT}/geant
setenv CFM_COMMANDS ${TRIUMF_ROOT}/cfm
setenv YBOS_COMMANDS ${TRIUMF_ROOT}/ybos




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_ROOT}/mlib.csh; unset mlib_args"



unset LOCAL






setenv MOFIA_COMMANDS $HERE/triumf/mofia
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
-------------------------------------------------------------------------------
                                  MOFIA devel  

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}


if ( ${vers} == "2.2" || ${vers} == "new" ) then
setenv CFM_DB ${E614_CAL}/cfm/db_noswap
setenv CAL_DB ${E614_CAL}/caldb_ascii
else



setenv CFM_DOC ${CFM_ROOT}/doc
setenv CFM_LIBRARY ${CFM_ROOT}/lib
setenv CFM_LOG ${E614_CAL}/cfm/log
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





mlib f95 debug







































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 " "


setenv SYNTAX "syntax"
if ( $os_type == IRIX64 || $os_type == IRIX ) then

setenv SYNTAX "syntax: mlib [-h] [debug] [f90] [f95]  [quiet] [[-]query]"
endif
foreach arg ( $mlib_args )
if ( $arg == -h ) then
end
if ( $arg == -h ) then
end
unsetenv SYNTAX

foreach arg ( $mlib_args )
if ( $arg == -query ) goto query
end
if ( $arg == -query ) goto query
end

if ( `echo $mlib_args | grep -c quiet` ) then
if ( `echo $mlib_args | grep -c debug` ) then
setenv DEBUG
setenv DEBUG_STATUS ON
else
unset F90
if ( `echo $mlib_args | grep -c f90` ) then
unset F95
if ( `echo $mlib_args | grep -c f95` ) then
set F95
endif


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 " -I$ROOTSYS/include"
setenv ROOTGLIBS "-L/usr/X11R6/lib -X -rpath -X $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"

endif
if ( $?F90 ) then
if ( $?F95 ) then
if ( ! $?ABSOFT ) source ${TRIUMF_ROOT}/setup_absoft75.com


setenv ABSOFT /opt/absoft
setenv PATH $ABSOFT/bin:$PATH

echo Using ABSOFT 7.5 from $ABSOFT
Using ABSOFT 7.5 from /opt/absoft


if ( $?DEBUG ) then
if ( $?MOFIA_ROOT ) setenv MOFIA_LIBDIR $MOFIA_ROOT/lib-debug
setenv F90FLAGS "-g -s -B19  -B100  -m1 -YEXT_SFX="_"  -YEXT_NAMES=LCS -YCOM_NAMES=LCS -YCFRL=1 -Rb -Rc -Rs -Rp -M878"
setenv CFLAGS "-g "
setenv CXXFLAGS "-g -Wall -fno-rtti -fno-exceptions -fPIC $ROOTCFLAGS"
setenv LIB_SUFFIX _absoft_dbg
else
setenv CXX "g++"
setenv I90FLAGS "$IFLAGS  -p $MOFIA_MAINF90"
setenv MAKESTD $TRIUMF_ROOT/make.std.absoft
setenv DFLAGS "-DUNIX -Dunix -DLINUX -Dlinux -Df90"
setenv LD_COMP "$ABSOFT/bin/f95"
setenv CERN_LIBDIR $CERN_LIBRARY_ABSOFT
setenv LIB_SPECIAL "-L$ABSOFT/lib -lU77 -lf90math -lf77math -lfio -lnsl"
else


else if ( $os_type == OSF1 ) then




if ( -e $TRIUMF_ROOT/mlib-local.csh ) source $TRIUMF_ROOT/mlib-local.csh
if ( -e ./mlib-local.csh ) source mlib-local.csh

query:

if ( $?VERBOSE ) then
echo "  ---  mlib setups ---"
  ---  mlib setups ---
echo The OS is type $os_type. Debug is $DEBUG_STATUS.
The OS is type Linux. Debug is ON.
if ( $os_type == Linux ) then
if ( $?F90 ) then
if ( $?F95 ) then
echo Support for ABSOFT F95 has been requested
Support for ABSOFT F95 has been requested
else
endif
echo " "
 
if ( $?ROOTSYS ) then
echo Root: $ROOTSYS
Root: /twist/local/root
else
echo Cern: $CERN_LIBDIR
Cern: /twist/local/cern_absoft/2000a/lib
if ( $?MOFIA_ROOT ) then
echo Mofia libraries: $MOFIA_LIBDIR
Mofia libraries: /home/e614/public_html/nightly_builds/triumf/mofia/devel/lib-debug
echo Mofia mainf90 modules: $MOFIA_MAINF90
Mofia mainf90 modules: /home/e614/public_html/nightly_builds/triumf/mofia/devel/source/mainf90

else




echo Make rules: $MAKESTD
Make rules: /home/e614/e614soft/triumf/make.std.absoft







endif

unset VERBOSE
cd $HERE/triumf/mofia/devel
./make_user
/home/e614/e614soft/triumf/dependf90.csh: No match.
rm -f mofia  plain mofia photo  *.o *_cpp.f90 *_cpp.f *.mod Dependencies
/opt/absoft/bin/f95 -o plain -g -s -B19  -B100  -m1 -YEXT_SFX=_  -YEXT_NAMES=LCS -YCOM_NAMES=LCS -YCFRL=1 -Rb -Rc -Rs -Rp -M878 -L/home/e614/e614soft/triumf/cfm/2.2/main -L/home/e614/e614soft/triumf/bru/1.1 -L/home/e614/e614soft/triumf/ybos/4.1/library -L/home/e614/public_html/nightly_builds/triumf/mofia/devel/lib-debug -L/home/e614/e614soft/triumf/gplot -L/twist/local/cern_absoft/2000a/lib   /home/e614/public_html/nightly_builds/triumf/mofia/devel/source/main/mofia.o -lmain  -lcfm_absoft_dbg -lybos_absoft_dbg -lbru_absoft_dbg -lgplot_absoft_dbg -lpacklib -lmathlib -lkernlib -ldummy -lm -L/opt/absoft/lib -lU77 -lf90math -lf77math -lfio -lnsl
 
using .f90.o rules
/lib/cpp -P -traditional -E -I. -I/home/e614/public_html/nightly_builds/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/2000/lib/../include -I/cern/2000/lib/../include/geant321 -DUNIX -Dunix -DLINUX -Dlinux -Df90 user_hists_mod.f90  user_hists_mod_cpp.f90
/opt/absoft/bin/f95 -c  -o user_hists_mod.o -g -s -B19  -B100  -m1 -YEXT_SFX=_  -YEXT_NAMES=LCS -YCOM_NAMES=LCS -YCFRL=1 -Rb -Rc -Rs -Rp -M878  -I. -I/home/e614/public_html/nightly_builds/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/2000/lib/../include -I/cern/2000/lib/../include/geant321  -p /home/e614/public_html/nightly_builds/triumf/mofia/devel/source/mainf90  user_hists_mod_cpp.f90

MODULE user_hists_mod
       ^              
cf90-855 f90fe: ERROR USER_HISTS_MOD, File = user_hists_mod_cpp.f90, Line = 1, Column = 8 
  The compiler has detected errors in module "USER_HISTS_MOD".  No module information file will be created for this module.

  USE det_geom_mod
      ^            
cf90-292 f90fe: ERROR USER_HISTS_MOD, File = user_hists_mod_cpp.f90, Line = 18, Column = 7 
  "DET_GEOM_MOD" is specified as the module name on a USE statement, but the compiler cannot find it.

  USE chambers_mod
      ^            
cf90-292 f90fe: ERROR USER_HISTS_MOD, File = user_hists_mod_cpp.f90, Line = 19, Column = 7 
  "CHAMBERS_MOD" is specified as the module name on a USE statement, but the compiler cannot find it.

  USE tdc_mod
      ^       
cf90-292 f90fe: ERROR USER_HISTS_MOD, File = user_hists_mod_cpp.f90, Line = 20, Column = 7 
  "TDC_MOD" is specified as the module name on a USE statement, but the compiler cannot find it.

  USE unp_mod
      ^       
cf90-292 f90fe: ERROR USER_HISTS_MOD, File = user_hists_mod_cpp.f90, Line = 21, Column = 7 
  "UNP_MOD" is specified as the module name on a USE statement, but the compiler cannot find it.

  USE filters_mod
      ^           
cf90-292 f90fe: ERROR USER_HISTS_MOD, File = user_hists_mod_cpp.f90, Line = 22, Column = 7 
  "FILTERS_MOD" is specified as the module name on a USE statement, but the compiler cannot find it.

  USE namelist_mod
      ^            
cf90-894 f90fe: ERROR USER_HISTS_MOD, File = user_hists_mod_cpp.f90, Line = 23, Column = 7 
  Module "NAMELIST_MOD" has compile errors, therefore declarations obtained from the module via the USE statement may be incomplete.

  USE calibrations_mod
      ^                
cf90-292 f90fe: ERROR USER_HISTS_MOD, File = user_hists_mod_cpp.f90, Line = 24, Column = 7 
  "CALIBRATIONS_MOD" is specified as the module name on a USE statement, but the compiler cannot find it.

                npplanes-1,0.5,12.5,MAX_WIRES_P,0.5,&
                ^                                     
cf90-113 f90fe: ERROR UDEFINEPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 105, Column = 17 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for data object "NPPLANES".
                                    ^                 
cf90-113 f90fe: ERROR UDEFINEPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 105, Column = 37 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for data object "MAX_WIRES_P".

    use trackrange_mod
        ^              
cf90-292 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 286, Column = 9 
  "TRACKRANGE_MOD" is specified as the module name on a USE statement, but the compiler cannot find it.

    use pattern_mod
        ^           
cf90-292 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 287, Column = 9 
  "PATTERN_MOD" is specified as the module name on a USE statement, but the compiler cannot find it.

       IF(PC_NPhits(iPlane) > 1) THEN
          ^                           
cf90-232 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 303, Column = 11 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for function "PC_NPHITS".

          wire1P =>  PCWhits(iPlane,1)%iWire
                     ^                       
cf90-232 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 304, Column = 22 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for function "PCWHITS".
                                      ^      
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 304, Column = 39 
  Unexpected syntax: "EOS" was expected but found "%".

          wire2P =>  PCWhits(iPlane,2)%iWire
                                      ^      
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 305, Column = 39 
  Unexpected syntax: "EOS" was expected but found "%".

             wire3P =>  PCWhits(iPlane,3)%iWire
                                         ^      
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 308, Column = 42 
  Unexpected syntax: "EOS" was expected but found "%".

    DO i_hit=1,pcadc_ihits
               ^           
cf90-113 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 321, Column = 16 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for data object "PCADC_IHITS".

       iPlane=pcadc(i_hit)%wireP%planeP%iplane
              ^                                
cf90-232 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 322, Column = 15 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for function "PCADC".
                          ^                    
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 322, Column = 27 
  Unexpected syntax: "EOS" was expected but found "%".

       iWire=pcadc(i_hit)%wireP%iwire
                         ^            
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 323, Column = 26 
  Unexpected syntax: "EOS" was expected but found "%".

       avgadc(iPlane) = avgadc(iPlane) + pcadc(i_hit)%e_lost
                                                     ^       
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 326, Column = 54 
  Unexpected syntax: "EOS" was expected but found "%".

       if((pcadc(i_hit)%e_lost.ge.PC_Emin).and.&
                       ^                         
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 333, Column = 24 
  Unexpected syntax: ")" was expected but found "%".

          (pcadc(i_hit)%e_lost.le.PC_Emax)) then
                       ^                         
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 334, Column = 24 
  Unexpected syntax: ")" was expected but found "%".

          call hfill(userhist_id3+(iPlane-5),pcadc(i_hit)%e_lost,0.0,1.0)
                                                         ^                
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 345, Column = 58 
  Unexpected syntax: ")" was expected but found "%".

          if((pcadc(i_hit)%e_lost.ge.PC_Emin).and.&
                          ^                         
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 348, Column = 27 
  Unexpected syntax: ")" was expected but found "%".

             (pcadc(i_hit)%e_lost.le.PC_Emax)) then
                          ^                         
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 349, Column = 27 
  Unexpected syntax: ")" was expected but found "%".

       avgadc(iPlane) = avgadc(iPlane)/real(pcadc_nphits(iPlane))
                                            ^                     
cf90-232 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 360, Column = 45 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for function "PCADC_NPHITS".

          if(muWin > 0) then
             ^               
cf90-113 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 370, Column = 14 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for data object "MUWIN".

             if (TRmaxR(MuWin) < 4.0) then  
                 ^                           
cf90-232 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 371, Column = 18 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for function "TRMAXR".

    DO i_hit=1,dc_ihits
               ^        
cf90-113 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 380, Column = 16 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for data object "DC_IHITS".

       tdc_time=dctdc(i_hit)%time
                ^                 
cf90-232 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 381, Column = 17 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for function "DCTDC".
                            ^     
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 381, Column = 29 
  Unexpected syntax: "EOS" was expected but found "%".

    DO i_hit=1,sc_ihits
               ^        
cf90-113 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 384, Column = 16 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for data object "SC_IHITS".

       tdc_time=sctdc(i_hit)%time
                ^                 
cf90-232 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 385, Column = 17 
  IMPLICIT NONE is specified in the local scope, therefore an explicit type must be specified for function "SCTDC".
                            ^     
cf90-197 f90fe: ERROR UFILLPOSTFILTERHISTS, File = user_hists_mod_cpp.f90, Line = 385, Column = 29 
  Unexpected syntax: "EOS" was expected but found "%".

f90: Copyright Absoft Corporation 1994-2001; Absoft Pro FORTRAN Version 7.5a 
f90fe: 476 source lines
f90fe: 36 Errors, 0 Warnings, 0 Other messages, 0 ANSI

make: *** [user_hists_mod.o] Error 1