add ascii interface

Author: baggepinnen

src/diskmargin.jl

@@ -35,6 +35,23 @@ function Diskmargin(α, σ=0; ω0=mising, f0=missing, δ0=missing, L=nothing)
     Diskmargin(α, ω0, f0, δ0, γmin, γmax, σ, ϕm, L)
 end
 
+
+function Base.getproperty(dm::Diskmargin, s::Symbol)
+    s ∈ fieldnames(typeof(dm)) && return getfield(dm, s)
+    if s ∈ (:margin, :alpha, :diskmargin)
+        return dm.α
+    elseif s ∈ (:gm, :gainmargin)
+        return [dm.γmin, dm.γmax]
+    elseif s === :phasemargin
+        return dm.ϕm
+    else
+        throw(ArgumentError("$(typeof(dm)) has no property named $s"))
+    end
+end
+
+Base.propertynames(dm::Diskmargin) = (fieldnames(typeof(dm))..., :margin, :gainmargin, :phasemargin)
+
+
 function Base.show(io::IO, dm::Diskmargin)
     println(io, "Disk margin with:")
     println(io, "Margin: ", dm.α)

test/test_diskmargin.jl

@@ -15,6 +15,10 @@ nyquistplot(L)
 plot!(dm, nyquist=true)
 plot!(Disk(dm), nyquist=true)
 
+@test dm.alpha == dm.α
+@test length(dm.gainmargin) == 2
+@test dm.phasemargin == dm.ϕm
+@test :gainmargin ∈ propertynames(dm)
 
 
 
@@ -163,9 +167,9 @@ end
 
 
 unsafe_comparisons(true)
-dm = diskmargin(L3, 0, 4.05)
-
-
+dm = loop_diskmargin(L3, 0, 4.05)
+@test dm[1].α isa Particles
+@test pmean(dm[1].α) ≈ 0.794418036911981 rtol=0.01
 
 
 L3 = let