Logo by AGUS - Contribute your own Logo!

END OF AN ERA, FRACTALFORUMS.COM IS CONTINUED ON FRACTALFORUMS.ORG

it was a great time but no longer maintainable by c.Kleinhuis contact him for any data retrieval,
thanks and see you perhaps in 10 years again

this forum will stay online for reference
News: Did you know ? you can use LaTex inside Postings on fractalforums.com!
 
*
Welcome, Guest. Please login or register. March 28, 2024, 02:22:42 PM


Login with username, password and session length


The All New FractalForums is now in Public Beta Testing! Visit FractalForums.org and check it out!


Pages: [1]   Go Down
  Print  
Share this topic on DiggShare this topic on FacebookShare this topic on GoogleShare this topic on RedditShare this topic on StumbleUponShare this topic on Twitter
Author Topic: Kleinian Group 112.10302  (Read 1697 times)
0 Members and 1 Guest are viewing this topic.
trafassel
Fractal Bachius
*
Posts: 531


trafassel
« on: December 28, 2016, 03:49:00 AM »

Kleinian Group 112.10302



http://www.fractalforums.com/index.php?action=gallery;sa=view;id=19888

// Escape time algorithm for Kleinian group limit sets from JosLeys and Knighty.
// http://www.fractalforums.com/index.php?topic=24728.0
// Small modification in line of separation compared to Kleinian_test15-bis.frag:
// Change scale from 0.2 to 0.1 and remove x-translation.
public override void Init()
{
  base.Init();
  if(GetString("intern.Formula.TempUpdateVal")!="51532b7a12e09959693210c0e512ffbf")
  {
    SetParameterBulk("Formula.Parameters: bailout=9 box_size_x=0.5 box_size_y=0 box_size_z=0.5 KleinI=-0.033 KleinR=1.94 losScale=0.1 minBailout=0.25 useLineOfSeparation=1 Formula.Static: Cycles=44 Julia=1 jx=0 jy=0 jz=0 Scene: CenterX=4.65261700975822 CenterY=1.21069676611542 CenterZ=0.95446213517343 Radius=0.00783400456513604 Transformation.Camera: AngleX=65.0528340203052 AngleY=-4.02927136476102 AngleZ=-163.761451217425 IsometricProjection=0 Position=1 intern.Formula: TempUpdateVal=51532b7a12e09959693210c0e512ffbf");
  }
}
public double KleinR;
public double KleinI;
public double box_size_x;
public double box_size_y;
public double box_size_z;
public double bailout;
public double minBailout;
public bool useLineOfSeparation;
public double losScale;
public override bool GetBool(double x,double y,double z)
{
  double f=KleinI<0 ?-1:1 ;
  for (int i=0;i < _cycles;  i++)
  {
    double vxx=x+box_size_x;
    double vxz=z+box_size_z;
    double vax=2.0 * box_size_x ;
    double vaz=2.0 * box_size_z;
    x=vxx-vax*Math.Floor(vxx/vax)-box_size_x;
    y-=KleinR*Math.Floor(y/KleinR);
    z=vxz-vaz*Math.Floor(vxz/vaz)-box_size_z ;
    if(useLineOfSeparation)
    {
      if (y >=KleinR * (0.5+losScale* Math.Sin(f * Math.PI * x / box_size_x)))
      {
        x=-KleinI-x;
        y=KleinR-y;
        z=-z;
      }
    }
    double xx=x*x;
    double yy=y*y;
    double zz=z*z;
    double r=xx+yy+zz;
    if(r>0)
    {
      x /=-r;
      y /=-r;
      z /=-r;
      if(r>0.00000000001 && i>2)
      {
        Red+=xx/r;
        Green+=yy/r;
        Blue+=zz/r;
      }
      if(r<minBailout)return false;
      if(r>bailout)return false;
    }
    x=-KleinI-x;
    y=KleinR+y;
  }
  return true;
}
Logged
Pages: [1]   Go Down
  Print  
 
Jump to:  

Related Topics
Subject Started by Replies Views Last post
Kleinian Group Holiday Design Images Showcase (Rate My Fractal) Ross Hilbert 0 2153 Last post December 22, 2008, 02:15:20 PM
by Ross Hilbert
3d mobius kleinian group Mandelbulb3D Gallery ericr 0 948 Last post October 30, 2012, 02:28:14 PM
by ericr
A 3D Kleinian group 3D Fractal Generation « 1 2 » JosLeys 26 10234 Last post February 23, 2013, 10:05:28 AM
by ericr
kleinian group ? Mandelbulb3D Gallery ericr 0 1056 Last post March 08, 2013, 07:44:46 PM
by ericr
Kleinian-group in black pen Images Showcase (Rate My Fractal) alij 2 1602 Last post September 24, 2013, 08:45:42 PM
by alij

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2015, Simple Machines

Valid XHTML 1.0! Valid CSS! Dilber MC Theme by HarzeM
Page created in 0.514 seconds with 29 queries. (Pretty URLs adds 0.019s, 2q)