@@ -44,16 +44,16 @@ my_kernel_test(){
4444 RHO=` grep -E ' maximum value of rho[[:space:]]+kernel' $file_ref | cut -d = -f 2 | tr -d ' ' `
4545 KAPPA=` grep -E ' maximum value of kappa[[:space:]]+kernel' $file_ref | cut -d = -f 2 | tr -d ' ' `
4646 MU=` grep -E ' maximum value of mu[[:space:]]+kernel' $file_ref | cut -d = -f 2 | tr -d ' ' `
47- KAPPAV =` grep -E ' maximum value of kappav [[:space:]]+kernel' $file_ref | cut -d = -f 2 | tr -d ' ' `
48- MUV =` grep -E ' maximum value of muv [[:space:]]+kernel' $file_ref | cut -d = -f 2 | tr -d ' ' `
47+ ALPHAV =` grep -E ' maximum value of alphav [[:space:]]+kernel' $file_ref | cut -d = -f 2 | tr -d ' ' `
48+ BETAV =` grep -E ' maximum value of betav [[:space:]]+kernel' $file_ref | cut -d = -f 2 | tr -d ' ' `
4949
5050 # need at least rho & kappa (for acoustic kernels)
5151 if [ " $RHO " == " " ]; then
52- echo " missing reference kernel values: RHO=$RHO | KAPPA=$KAPPA KAPPAV= $KAPPAV | MU= $MU MUV= $MUV "
52+ echo " missing reference kernel values: RHO=$RHO | KAPPA=$KAPPA MU= $MU | ALPHAV= $ALPHAV BETAV= $BETAV "
5353 echo
5454 exit 1
5555 else
56- echo " reference kernel values: RHO=$RHO | KAPPA=$KAPPA KAPPAV= $KAPPAV | MU= $MU MUV= $MUV "
56+ echo " reference kernel values: RHO=$RHO | KAPPA=$KAPPA MU= $MU | ALPHAV= $ALPHAV BETAV= $BETAV "
5757 fi
5858 # compares with test output - using a relative tolerance of 0.001 (1 promille) with respect to expected value
5959 # final test result
@@ -72,25 +72,25 @@ my_kernel_test(){
7272 echo " " | awk ' {diff=ex-val;diff_abs=(diff >= 0)? diff:-diff;diff_rel=diff_abs/ex;print " value: expected = "ex" gotten = "val" - difference absolute = "diff_abs" relative = "diff_rel; if (diff_rel>0.001){print " failed"; exit 1;}else{print " good"; exit 0;} }' ex=$KAPPA val=$VAL
7373 if [[ $? -ne 0 ]]; then PASSED=1; fi
7474 fi
75- # checks kappav kernel value (if anisotropic kernels)
76- if [ " $KAPPAV " != " " ]; then
77- VAL=` grep -E ' maximum value of kappav[[:space:]]+kernel' $file_out | cut -d = -f 2 | tr -d ' ' `
78- echo " kernel kappav: $VAL "
79- echo " " | awk ' {diff=ex-val;diff_abs=(diff >= 0)? diff:-diff;diff_rel=diff_abs/ex;print " value: expected = "ex" gotten = "val" - difference absolute = "diff_abs" relative = "diff_rel; if (diff_rel>0.001){print " failed"; exit 1;}else{print " good"; exit 0;} }' ex=$KAPPAV val=$VAL
80- if [[ $? -ne 0 ]]; then PASSED=1; fi
81- fi
8275 # checks mu kernel value
8376 if [ " $MU " != " " ]; then
8477 VAL=` grep -E ' maximum value of mu[[:space:]]+kernel' $file_out | cut -d = -f 2 | tr -d ' ' `
8578 echo " kernel mu : $VAL "
8679 echo " " | awk ' {diff=ex-val;diff_abs=(diff >= 0)? diff:-diff;diff_rel=diff_abs/ex;print " value: expected = "ex" gotten = "val" - difference absolute = "diff_abs" relative = "diff_rel; if (diff_rel>0.001){print " failed"; exit 1;}else{print " good"; exit 0;} }' ex=$MU val=$VAL
8780 if [[ $? -ne 0 ]]; then PASSED=1; fi
8881 fi
89- # checks muv kernel value (if anisotropic kernels)
90- if [ " $MUV " != " " ]; then
91- VAL=` grep -E ' maximum value of muv[[:space:]]+kernel' $file_out | cut -d = -f 2 | tr -d ' ' `
92- echo " kernel muv : $VAL "
93- echo " " | awk ' {diff=ex-val;diff_abs=(diff >= 0)? diff:-diff;diff_rel=diff_abs/ex;print " value: expected = "ex" gotten = "val" - difference absolute = "diff_abs" relative = "diff_rel; if (diff_rel>0.001){print " failed"; exit 1;}else{print " good"; exit 0;} }' ex=$MUV val=$VAL
82+ # checks alphav kernel value (if anisotropic kernels)
83+ if [ " $ALPHAV " != " " ]; then
84+ VAL=` grep -E ' maximum value of alphav[[:space:]]+kernel' $file_out | cut -d = -f 2 | tr -d ' ' `
85+ echo " kernel alphav: $VAL "
86+ echo " " | awk ' {diff=ex-val;diff_abs=(diff >= 0)? diff:-diff;diff_rel=diff_abs/ex;print " value: expected = "ex" gotten = "val" - difference absolute = "diff_abs" relative = "diff_rel; if (diff_rel>0.001){print " failed"; exit 1;}else{print " good"; exit 0;} }' ex=$ALPHAV val=$VAL
87+ if [[ $? -ne 0 ]]; then PASSED=1; fi
88+ fi
89+ # checks betav kernel value (if anisotropic kernels)
90+ if [ " $BETAV " != " " ]; then
91+ VAL=` grep -E ' maximum value of betav[[:space:]]+kernel' $file_out | cut -d = -f 2 | tr -d ' ' `
92+ echo " kernel betav : $VAL "
93+ echo " " | awk ' {diff=ex-val;diff_abs=(diff >= 0)? diff:-diff;diff_rel=diff_abs/ex;print " value: expected = "ex" gotten = "val" - difference absolute = "diff_abs" relative = "diff_rel; if (diff_rel>0.001){print " failed"; exit 1;}else{print " good"; exit 0;} }' ex=$BETAV val=$VAL
9494 if [[ $? -ne 0 ]]; then PASSED=1; fi
9595 fi
9696 # overall pass
0 commit comments