ACOUSTIC PULSES SCATTERED BY A RIGID SPHERE IN A FLUID
Rudgers (1969) · J. Acoust. Soc. Am. 45, 900–910 · Ecuaciones 8, 11, 12–14
Parámetros
k₀a
15.0
θ (°)
180°
Ciclos b
2
Δκ resolución
0.05
▶ COMPUTAR Ψ(τ)
Listo — presiona Computar.
Physics implemented:
·
Eq. 8
— scattered pulseform:
Ψ(τ) = (1/2π) Re∫ g·f·e
iκτ
dκ
evaluated at N
τ
= 700 time points
(τ from −5 to 35)
·
Eq. 11
— far-field form function:
f(κ) = −(2/κ) Σ P
n
(cosθ)(2n+1)·sinη
n
·e
iη
n
N
max
= ⌈κ⌉ + 12 terms per frequency
·
Eq. 14
— incident pulse spectrum:
g(κ) = α
−1
(1−e
−imα
) − β
−1
(1−e
−imβ
)
α = κ+k₀a, β = κ−k₀a, m = 2bπ/k₀a
·
Eq. 10
— phase shifts:
tanη
n
= −[(n+1)j
n
−κj
n−1
] /
[(n+1)y
n
−κy
n−1
]
·
Grid
— κ from 0 to 32π, step Δκ:
N
κ
= ⌊32π/Δκ⌋ frequency points
Cost: N
κ
× N
τ
≈ 2010 × 700 ops
τ_s =
—
τ_cc ≈
—
m =
—
N_κ =
—
N_τ =
—
Ψ(τ) dispersado
llegada especular S
creeping wave CC