App-GUI-Juliagraph

 view release on metacpan or  search on metacpan

README  view on Meta::CPAN

    just mathematical diagrams, showing you how iterating the equation
    "z_n+1 = z_n ** 2 + C" behaves on the complex plane. Our running
    variable gets an initial value and gets squared each time, plus an
    constant is added, also each time. Mandelbrot mean this constant are the
    pixel coordinates, Julia means the coordinates are the starting value.
    And the pixel color just contains the information how many iterations
    (times) it took until z got greater than our bailout value.

    This program has additional capabilities/options:

    *   iteration formula with up to four monomials

    *   choosable exponent and factor for each of them

    *   choosable stop value and stop metric

    *   free selection of colors

    *   many option to map th colors onto iteration result values

GUI

lib/App/GUI/Juliagraph.pm  view on Meta::CPAN

<img src="https://raw.githubusercontent.com/lichtkind/App-GUI-Juliagraph/master/img/examples/sonne.png"         alt=""  width="300" height="300">
</p>


This program has additional capabilities/options:

=over 4

=item *

iteration formula with up to four monomials

=item *

choosable exponent and factor for each of them

=item *

choosable stop value and stop metric

=item *

lib/App/GUI/Juliagraph/Frame/Panel/Monomial.pm  view on Meta::CPAN

    $self->{'init_exp'} = $initial_exp // 0;
    $self->{'callback'} = sub {};

    $self->{'active'} = Wx::CheckBox->new( $self, -1, ' On', [-1,-1], [ 60, -1]);
    $self->{'active'}->SetToolTip("switch usage of this polynome on or off");
    $self->{'use_minus'} = Wx::CheckBox->new( $self, -1, ' -', [-1,-1], [ 50, -1]);
    $self->{'use_minus'}->SetToolTip('if on, this monomial will be subtracted instead of added');
    $self->{'use_log'} = Wx::CheckBox->new( $self, -1, ' log', [-1,-1], [ 60, -1]);
    $self->{'use_log'}->SetToolTip(' if on, you put a logarithm in front of this monomial term as in: z_n+1 = log( factor * z_n**exponent )');
    $self->{'use_factor'} = Wx::CheckBox->new( $self, -1, ' Factor', [-1,-1], [ 70, -1]);
    $self->{'use_factor'}->SetToolTip('if on, you employ the complex factor from the text boxes below (Re and Im) in formula z_n+1 = factor * z_n**exponent');
    $self->{'use_coor'} = Wx::CheckBox->new( $self, -1, ' Coor.', [-1,-1], [ 70, -1]);
    $self->{'use_coor'}->SetToolTip('if on, the complex factor or 1 gets multiplied with current complex pixel coordinates');


    my $exp_txt = "exponent above iterator variable z_n+1 = z_n**exponent * factor\nzero turns factor into constant";
    $self->{'lbl_exponent'} = Wx::StaticText->new($self, -1, 'E x p o n e n t :' );
    $self->{'lbl_exponent'}->SetToolTip($exp_txt);
    $self->{'exponent'} = Wx::ComboBox->new( $self, -1, 2, [-1,-1],[75, 35], [1 .. 16]);
    $self->{'exponent'}->SetToolTip($exp_txt);



( run in 0.452 second using v1.01-cache-2.11-cpan-3cd7ad12f66 )