Acoustic Horn Design – The Easy Way (Ath4)

Member
Joined 2004
Paid Member
That's not what I said. The zero-mode reflection can be managed. It's being done all the time.

- What's still not very clear to me, however, is how it relates to an area expansion rate. Since there probably can be a reflection even without an area change (like in a bended tube or similar), I guess it's not really the same thing.
 
Last edited:
Member
Joined 2004
Paid Member
So it was one perimeter print, but not vase mode?
Yea, I should have explained it better. There's a seam (so not a vase mode) but it's one perimeter.

- This was the fastest and easiest way to see&touch the actual shape in its scale. It's not the final form of course - that will have a mouting lip, etc.
As it is it could be already used as a mold basis I guess.
 
Last edited:
  • Like
Reactions: 1 user
Member
Joined 2004
Paid Member
This is another test. After filling it's like a stone, I really like this approach. Again, not a final form, just a quick test.
The sparse infill prevents deformation.

hollow-adapter-1.jpg
hollow-adapter-2.jpg
 
  • Like
Reactions: 4 users
Member
Joined 2004
Paid Member
This is the structure. I'm not willing to share the actual numbers, sorry - too much work, too little reward.
You only may need to download the latest update: http://www.at-horns.eu/release/ath-4.9.0-pre-release-220919.zip

Code:
HornGeometry = 2
Length = 90
Throat.Diameter = 25.4
Throat.Angle = 0

Horn.Adapter = {
  L = 40
  Width = 40
  Height = 40
  Segments = 8
  ZMap = 0.5,0.3,0.5,0.3
}

Horn.Part:1 = {
  L = 1
  Segments = 20
  H = {
    r0 = 25.4
    a0 = 20
    k = 4.0
    s = 1.0
    a = 45
    n = 5
    q = 0.996
  }
  V = {
    r0 = 25.4
    a0 = 20
    k = 4.0
    s = 1.0
    a = 45
    n = 5
    q = 0.996
  }
  ZMap = 0.5,0.5,0.5,0.9
}

; -------------------------------------------------------

Mesh.AngularSegments = 64
Mesh.ThroatResolution = 4
Mesh.MouthResolution = 10
Mesh.InterfaceResolution = 7
Mesh.RearResolution = 15
Mesh.SubdomainSlices = -3
Mesh.InterfaceOffset = 0

; -------------------------------------------------------

ABEC.SimType = 2
ABEC.f1 = 200 ; [Hz]
ABEC.f2 = 15000 ; [Hz]
ABEC.NumFrequencies = 40
ABEC.MeshFrequency = 1000 ; [Hz]

ABEC.Polars:SPL_H = {
  MapAngleRange = 0,180,37
  Distance = 2
}

ABEC.Polars:SPL_D = {
  MapAngleRange = 0,180,37
  Distance = 2
  Inclination = 45
}

; -------------------------------------------------------

Report = {
  Title = "DS3"
  NormAngle = 0
  DrvImp_Range = 40
  Width = 1000
  Height = 1200
}

Output.STL = 1
Output.ABECProject = 1