4 if [ -z $JPP_DIR ];
then
5 echo "Variable JPP_DIR undefined."
9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/
null
14 set_variable FORMULA
"[0] + [1]*(sqrt(1.0 + 0.5*(x-[2])*(x-[2])/([3]*[3])) - 1.0)"
16 if ( do_usage $* );
then
20 if (( $# != 0 ));
then
21 fatal
"Wrong number of arguments."
27 if [[ ! -
f $VELOCITY_TXT ]];
then
28 fatal
"No sound velocity file $VELOCITY_TXT."
35 sort -gr -
k 2,2 $VELOCITY_TXT | tail -1 |
read X Y RMS
38 -
f ${VELOCITY_ROOT}:\.\* \
47 set_array P2 `JPrintFit -
f $WORKDIR/fit.root:\.\* -@
p2`
49 printf
"result %10.5f +/- %10.5f\n" $P2[1] $P2[2]
void set_variable(const std::string &name, const std::string &value)
Set environment variable.
then cat $WORKDIR tripod txt<< EOF 12 587888 4017079-3450.0 14 587436 4016992-3450.0 16 587843 4016727-3450.0EOF fi if[[!-f $WORKDIR/base.txt]];then $DIR/JBaseModuleWriter-a $WORKDIR/detector.detx-o $WORKDIR/base.txt fi if[[!-f $WORKDIR/toashort.root]];then JConvertDB-q toashort-@"detid = `getDetector -D $DETECTOR`"-@"minrun = $RUN"-@"maxrun = $RUN"-o $WORKDIR/toashort.root-d $DEBUG--!fi if(!reuse_file $VELOCITY_TXT);then for A in 1500.0 1510.0 1520.0 1530.0 1532.0 1534.0 1536.0 1538.0 1540.0 1542.0 1544.0 1546.0 1548.0 1550.0 1560.0 1570.0 1580.0;do rm-f event.root JAcousticsEventBuilder-a $WORKDIR/detector.detx-f $WORKDIR/toashort.root-@"Q = $QUANTILE;"-@"TMax_s = $TMAX_S;"-@"numberOfHits = $NUMBER_OF_HITS;"-T $WORKDIR/tripod.txt-B $WORKDIR/base.txt-o $WORKDIR/event.root-V"$A"-d $DEBUG--!RMS=`$DIR/JPrintRMS-f $WORKDIR/event.root-N 1-d0`let RMS="$RMS*1000"echo"$A $RMS" > $VELOCITY_TXT done fi JGraph f $VELOCITY_TXT o $VELOCITY_ROOT JPlot1D f $VELOCITY_ROOT
bool read(Vec &v, std::istream &is)
Read a Vec(tor) from a stream.
then fatal No sound hydrophone file $HYDROPHONE_TXT fi JGraph f $HYDROPHONE_TXT o $HYDROPHONE_ROOT sort gr k
then fatal Wrong number of arguments fi set_variable STRING $argv[1] set_variable DETECTORXY_TXT $WORKDIR $DETECTORXY_TXT tail read X Y CHI2 RMS printf optimum n $X $Y $CHI2 $RMS awk v Y
do set_variable OUTPUT_DIRECTORY $WORKDIR T
then break fi done getCenter read X Y Z let X
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable ACOUSTICS_DEBUG
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
then usage $script< detector file >< inputfile > fi case set_variable WORKDIR
esac $JPP_BIN JLogger sh $LOGGER until pgrep JGetMessage</dev/null > dev null
#define DEBUG(A)
Message macros.