attenuation_of_sound_by_water: Compute attenuation of sound in water given frequency,...

In realTimeloads: Analyte Flux and Load from Estimates of Concentration and Discharge

Compute attenuation of sound in water given frequency, temperature, and salinity

Description

Computes attenuation of sound in water per Ainslie and McColm (1998)

Usage

attenuation_of_sound_by_water(freq, temp, sal)

Arguments

freq	frequency of sound (Hz)
temp	Water temperature (degrees C)
sal	Salinity (PSU)

Value

attenuation of sound in water (dB/m), divide by 20*log10(exp(1)) to convert to Nepers/m

Author(s)

Daniel Livsey (2023) ORCID: 0000-0002-2028-6128

References

Ainslie, M. A., & McColm, J. G. (1998). A simplified formula for viscous and chemical absorption in sea water. The Journal of the Acoustical Society of America, 103(3), 1671-1672.

Author modified Matlab code from David Schoellhamer

Examples

InputData <- realTimeloads::ExampleData
freq <- InputData$ADCP$Accoustic_Frequency_kHz*1000
cond <-InputData$Sonde$Conductivity_uS_per_cm
temp <- InputData$Sonde$Water_Temperature_degC
dbar <- InputData$Sonde$Pressure_dbar
sal <- ctd2sal(cond,temp,dbar)
aw <- attenuation_of_sound_by_water(freq,temp,sal) # dB/m
awNp <- attenuation_of_sound_by_water(freq,temp,sal)/(20*log10(exp(1))) # Np/m

realTimeloads documentation built on Oct. 18, 2023, 5:09 p.m.