Deconvolution/2D+: Difference between revisions

Content added Content deleted

Inline

@@ Line 177: / Line 177: @@
 	my @coords;
 	my $j = $index;
-	for @hsize -> $dim{
+	for @hsize -> $dim {
 	    @coords.push( $j % $dim );
 	    $j div= $dim;
@@ Line 246: / Line 246: @@
     my $tab = 2;
     if @array[0] ~~ Array {
-       say ' ' x $indent,"[";
+        say ' ' x $indent,"[";
-       pretty_print( $_, $indent + $tab ) for @array;
+        pretty_print( $_, $indent + $tab ) for @array;
-       say ' ' x $indent, "]{$indent??','!!''}";
+        say ' ' x $indent, "]{$indent??','!!''}";
     } else {
-         say ' ' x $indent, "[{say_it(@array)} ]{$indent??','!!''}";
+        say ' ' x $indent, "[{say_it(@array)} ]{$indent??','!!''}";
     }
@@ Line 299: / Line 299: @@
 =begin skip_output
-say "@g =";
+say "g =";
 pretty_print( @g );
 say '-' x 79;
-say "@f =";
+say "f =";
 pretty_print( @f );
@@ Line 311: / Line 311: @@
 say "# {+size_of(@f)}D array:";
-say "@h =";
+say "h =";
 pretty_print( deconv_ND( @g, @f ) );</lang>
 Output:
 <pre># 3D array:
-@h =
+h =
 [
   [