### ----------------------------------------------------
### -- Grid
### -- Licenses: Artistic-2.0
### -- Authors: Haytham Elganiny
### -- File: examples/rotate-subgrid.p6
### ----------------------------------------------------
#!/usr/bin/env perl6

use Grid;

my @array = < a b c d e f g h i j k l m n o p q r s t u v w x >;

@array does Grid[:4columns];

my @clockwise = 4 ... 19;

@array.grid;

@array.rotate: :@clockwise;

say '';

@array.grid;


