reb
Class REB_TrapShapeHenon2

Object
  extended by common:Generic
      extended by common:TrapShape
          extended by reb:REB_TrapShapeHenon2

class 
TrapShape:REB_TrapShapeHenon2

Uses the Henon strange attractor as the trap shape.


Ultra Fractal Source

Toggle UF Source Code Display

 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
 
Method Summary
 float Iterate(complex pz)
          Call this for each iteration being trapped.
 
Methods inherited from class common:TrapShape
GetColorChannel, GetTextureValue, GetTransformedPoint, Init, IterateSilent, SetThreshold
 
Methods inherited from class common:Generic
GetParent
 
Methods inherited from class Object
 

Constructor Detail

REB_TrapShapeHenon2

public REB_TrapShapeHenon2(Generic pparent)
Constructor


REB_TrapShapeHenon2

public REB_TrapShapeHenon2()
Method Detail

Iterate

public float Iterate(complex pz)
Call this for each iteration being trapped.

Overrides:
Iterate in class TrapShape