REB_TrapShapeHenon2

 class REB_TrapShapeHenon2(common.ulb:TrapShape) {
 ; Uses the Henon strange attractor as the trap shape.
  public:
    import "common.ulb"
 
 ; Constructor
    func REB_TrapShapeHenon2(Generic pparent)
      TrapShape.TrapShape(pparent)
    endfunc
 
   ; Call this for each iteration being trapped.         
    float func Iterate(complex pz)
     TrapShape.Iterate(pz)
      float scale = sqrt(@h1*@h1+@h2*@h2)
      scale = @scaleadj*scale
     int sgn = 1
     if @sgn
       sgn = -1
     endif
      complex p = pz
      p = @fn1(p)
      float x = real(p)*scale
      float y = imag(p)*scale
      float pxx = 0
      int att_iter = 0
 
      while att_iter < @max_att_iterations
        pxx = x
        x = 1 + y - @h1*x*x
        y = @h2*pxx
        att_iter = att_iter + 1
      endwhile
      m_LastZ = @fn2(x + sgn*flip(y))
      float d = abs(|pz| - |m_LastZ|)
      return d
    endfunc
    
  default:
    title = "Henon 2"
   int param v_trapshapehenon2
     caption = "Version (Trap Shape Henon 2)"
     default = 101
     hint = "This version parameter is used to detect when a change has been made to the formula that is incompatible with the previous version. When that happens, this field will reflect the old version number to alert you to the fact that an alternate rendering is being used."
     visible = @v_trapshapehenon2 < 101
   endparam
    
    float param h1
      caption = "Henon param 1"
      default = 1.4
    endparam
    float param h2
      caption = "Henon param 2"
      default = 0.3
    endparam
    float param scaleadj
      caption = "scale"
      default = 1
    endparam
    int param max_att_iterations
      caption = "Attractor iterations"
      default = 1
    endparam
   func fn1
     caption = "Pre Function"
     default = atan()
   endfunc
   func fn2
     caption = "Post Function"
     default = sinh()
   endfunc
    bool param sgn
      caption = "Conjugate transform"
      default = false
    endparam
  }
Constructor Summary
`REB_TrapShapeHenon2()`
`REB_TrapShapeHenon2(Generic pparent)` Constructor
reb Class REB_TrapShapeHenon2

REB_TrapShapeHenon2

REB_TrapShapeHenon2

Iterate

reb
Class REB_TrapShapeHenon2
