cubic version in progress

Fraktalism/fraktals.f90

@@ -98,7 +98,7 @@ end subroutine
 !  d'après les pages 91/92 du livre de Roger T Stevens
 !       "Fractal programming in C"
 ! 
-subroutine pickover_0(pic, count)
+subroutine plot_pickover(pic, count)
     implicit none
     integer, intent(inout), dimension (:,:)  ::  pic
     integer, intent(in)                      ::  count
@@ -131,7 +131,7 @@ subroutine pickover_0(pic, count)
 
     deallocate(points)
 
-end subroutine pickover_0
+end subroutine plot_pickover
 
 !-----------------------------------------------------
 !