$main::hd=[[]];
$main::a = [0.25];
$main::b = [0.25,0.5];
$main::c = [1,0.75,0.75];
push @{$main::hd}, $main::a;
push @{$main::hd}, $main::b;
push @{$main::hd}, $main::c;