# generovani krychli

source("functions.R");
set.seed(123001);

d <- 3;
for (i in 1:10) { krychle(d,i); }

d <- 4;
for (i in 1:30) { krychle(d,i); }