; -------------------------------------------------------------------------
;   ATH Tritonia-M Waveguide
;   Marcel Batik, 02/2025
;
;   This Ath script is provided under the CC BY-NC-SA 4.0 licence.
; -------------------------------------------------------------------------

Scale = 0.702

Throat.Profile = 1 ; OS-SE
Throat.Diameter = 36.182 ; = 25.4/Scale [mm]
Throat.Angle = 10 ; [deg]
Length = 135 ; [mm]

Coverage.Angle = 48.5 - 7*cos(2*p)^5 - 16*sin(p)^12 ; [deg]
Term.s = 0.7 + 0.2*cos(p)^2
Term.n = 3.7
Term.q = 0.992

Morph.TargetShape = 1
Morph.FixedPart = 0.0
Morph.Rate = 3
Morph.CornerRadius = 18 ; [mm]

Mesh.Enclosure = {
  Spacing = 25,25,25,300 ; [mm]
  Depth = 280 ; [mm]
  EdgeRadius = 18 ; [mm]
  EdgeType = 2
  FrontResolution = 10,10,20,25 ; [mm]
  BackResolution = 40,40,40,40 ; [mm]
  
  LFSource.B = {
    Radius = 100 ; [mm]
	Spacing = 35 ; [mm]
	DrivingWeight = 0
	SID = 1
  }
}

Mesh.Quadrants = 14
Mesh.VerticalOffset = 80

Mesh.AngularSegments = 80
Mesh.LengthSegments = 20
Mesh.CornerSegments = 4

Mesh.ThroatResolution = 5 ; [mm]
Mesh.MouthResolution = 10 ; [mm]
Mesh.InterfaceResolution = 8 ; [mm]

; Disable subdomain interface, i.e. set this to empty value
Mesh.SubdomainSlices =

ABEC.SimType = 2 ; free space
ABEC.f1 = 400 ; [Hz]
ABEC.f2 = 16000 ; [Hz]
ABEC.NumFrequencies = 40
ABEC.MeshFrequency = 1000 ; [Hz]

ABEC.Polars:SPL_H = {
  MapAngleRange = 0,180,37  ; [deg]
  Distance = 2 ; [m]
  NormAngle = 10 ; [deg]
}

ABEC.Polars:SPL_V = {
  MapAngleRange = 0,180,37  ; [deg]
  Distance = 2 ; [m]
  Inclination = 270 ; [deg]
  NormAngle = 10 ; [deg]
}

Output.ABECProject = 1
Output.STL = 0

Report = {
  Title = "ATH Tritonia-M"
  PolarData = SPL_H
  PolarDataV = SPL_V
  NormAngle = 10
}