reb
Class REB_TrapShapeHenon2

Object
  common:Generic
      common:TrapShape
          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