1 #ifndef __JACOUSTICS__JUNESCO__
2 #define __JACOUSTICS__JUNESCO__
10 namespace JACOUSTICS {}
11 namespace JPP {
using namespace JACOUSTICS; }
13 namespace JACOUSTICS {
34 - 1.025e-2 * T * (S - 35)
35 - 7.139e-13 * T*D*D*D);
52 const double t = T * 0.1;
53 const double d = D * 1.0e-3;
54 const double c = 1449.05 + 45.7 * t - 5.21 * t*t + 0.23 * t*t*t + (1.333 - 0.126*t + 0.009 * t*t)*(S - 35);
57 (16.23 + 0.253*t) * d +
58 (0.213 - 0.1*t) * d*d +
59 (0.016 + 0.0002*(S-35))*(S - 35)*t*d);
71 inline double getVelocity(
const double D,
const double S,
const double T)
double getVelocityCoppens(const double D, const double S, const double T)
Get sound velocity according UNESCO equation.
double getVelocityMackenzie(const double D, const double S, const double T)
Get sound velocity according UNESCO equation.
do set_variable OUTPUT_DIRECTORY $WORKDIR T
$WORKDIR ev_configure_dqsimulator txt echo process $DQ_SIMULATOR $i $SOURCE_HOST[$index] csh c(setenv ROOTSYS $ROOTSYS &&source $JPP_DIR/setenv.csh $JPP_DIR &&($DQ_SIMULATOR\-u\$NAME\$\-H\$SERVER\$\-M\$LOGGER\$\-d $DEBUG</dev/null > &/dev/null &))'
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
double getVelocity(const double D, const double S, const double T)
Get sound velocity according UNESCO equation ().
do echo Generating $dir eval D