Here we present the results
obtained
by SWAMPGREEN.FOR. The problem
was solved for range-independent
bathymetry and
three different sound
speed profiles in Mexican Gulf.
The sound speed profiles were obtained
from Ocean Acoustic Library they are shown on Fig.
1.
The source depth was 900m, there were multiple
receiver depths at spacing from 75m below the water surface to the maximum
water column depth (2025m), test frequency was 500 Hz.
Fig.2 show
plot of the transmission losses versus time and depth at the distance r=500km
far from the source.
Fig.1
The input file for
SWAMPGREEN.FOR, SWAMPRA.IN, was:
1 2025.0 2025.0 900.0 0.0
500.0 ! nwhat,h, hhh, hs, hr, freq
1.0 1.8
1600.0 0.35 ! rho0, rho1, c11, alpha
75 500000.0 500000.0
500000.0 ! dh(mult.r), rstart, rall,
rend
100.0 100.0 100000.0 0
.5 ! rrr1 delrm delrs DMS accuracy
par.
%
Sound speed profile: depth, sound speed %
-1 -1 ! Terminate with -1 –1
The input file for
SWAMPGREEN.FOR, PULSE.IN, was:
500.0 4 5 4096 5 27 5
500000.0 1500.0 75.0 !freq,np,nos,N,nr,nz,nrw,rw,c0,dz
To
simulate the source we considered
the sinusoidal pulse
that had central
frequency 500 Hz and had 5 active periods.
The amplitude of the pulse
was equal to 1
at the distance of 1
meter from the source.
Program SWAMPGREEN.FOR works in
frequency-domain
and we also used
TIME.FOR
program(that has the same input
files
SWAPRA.IN and PULSE.IN)
to
recalculate our results to time-domain.
Fig.2