p_inc 1[Pa]*exp(i*2*pi*freq/c0*(sin(theta0)*x-cos(theta0)*y)) "Incident plane wave"
p_inf 1[Pa]*exp(i*2*pi*freq/c0*(sin(theta0)*x+cos(theta0)*y)) "Reflected plane wave from infinite baffle"
p_scat p_inf+acpr2.p_s "Scattered pressure"
p_scat_ext p_inf+pext(x,y) "Scattered pressure in the exterior field"
Lp_scat 20*log10(abs(p_scat)/sqrt(2)/(20e-6[Pa]))[dB] "Scattered SPL"
Lp_ext 20*log10(abs(p_scat_ext)/sqrt(2)/(20e-6[Pa]))[dB] "Scattered SPL in the exterior field"
Pw_spec r0*abs(exp(i*2*pi*freq/c0*(sin(theta0)*x_spec+cos(theta0)*y_spec))+pext(x_spec,y_spec))^2 "Scattered power in the specular direction"
Pw_tot intop2(abs(p_scat_ext)^2) "Total scattered power"