finetuning the mandelbrot

2023-05-03 02:46:52 +02:00
parent 89d1cbda85
commit 6066dee701
2 changed files with 7 additions and 7 deletions
--- a/Fraktalism/mandelbrots.f90
+++ b/Fraktalism/mandelbrots.f90
@@ -28,7 +28,7 @@ subroutine mandelbrot_one(pic, start)
    integer   :: iter, maxiter
    logical   :: escape

-    write(0,*) "> plotsomething"
+    ! write(0,*) "> plotsomething"

    width  = ubound(pic, 1)
    height = ubound(pic, 2)
@@ -37,7 +37,7 @@ subroutine mandelbrot_one(pic, start)

    !   initialise constants
    ! 
-    maxiter =  1984
+    maxiter =  3456

    !   enter megaloop
    !