open (TEXT, ">>cell_.txt") or die "Can't create cell_.txt: $!\n";
printf TEXT "%14.11f  %14.11f  %14.11f  %14.11f  %14.11f  %14.11f\n",$a, $b, $c, $alpha_deg, $beta_deg, $gamma_deg;
close TEXT;