Sunday, 6 June 2021

E r r a t i c

 

 


 

 

time means nothing
history is a blip

formed and crushed
in my perfect world

compressed and stressed
becoming smooth and pushed

as i sit atop
this frozen world

bring me there
put me down

violentlygentlyslowly

cover me with soil
trees and roots

forget me for
tens of thousands of years

find me and dig me out
show me to the sun

crack me open
my insides 

have never
seen the light of day
 

it is glorious






https://steverobert.wordpress.com/the-erratic-tales/?unapproved=5215&moderation-hash=1c987d6d059917fad4193e8c8f2074bb#comment-5215




Thursday, 22 April 2021

fractal

 

 

 

 

 


 

 

 to begin

begin      

         breathe in

breathe in

          breathe out

wrap your thought

      around your heart

warp your heart

through your thoughts

     time

and space

create now

                                               then

when you are ready

you will see

your life is s subtle

                            fractal


double MinRe = -2.0;
double MaxRe = 1.0;
double MinIm = -1.2;
double MaxIm = MinIm+(MaxRe-MinRe)*ImageHeight/ImageWidth;
double Re_factor = (MaxRe-MinRe)/(ImageWidth-1);
double Im_factor = (MaxIm-MinIm)/(ImageHeight-1);
unsigned MaxIterations = 30;

for(unsigned y=0; y<ImageHeight; ++y)
{
    double c_im = MaxIm - y*Im_factor;
    for(unsigned x=0; x<ImageWidth; ++x)
    {
        double c_re = MinRe + x*Re_factor;

        double Z_re = c_re, Z_im = c_im;
        bool isInside = true;
        for(unsigned n=0; n<MaxIterations; ++n)
        {
            double Z_re2 = Z_re*Z_re, Z_im2 = Z_im*Z_im;
            if(Z_re2 + Z_im2 > 4)
            {
                isInside = false;
                break;
            }
            Z_im = 2*Z_re*Z_im + c_im;
            Z_re = Z_re2 - Z_im2 + c_re;
        }
        if(isInside) { putpixel(x, y); }
    }
}