Solve issue with demux.pl
[alexxy/gromacs.git] / scripts / demux.pl
index f8e2f558ff8c63b1b4ba3cb47ad6ef501dd9bdda..23cb6ef52bdeee392f6fb58959a369b95f0a725a 100755 (executable)
@@ -30,7 +30,7 @@ open (TEMP,">$temp") || die("Opening $temp for writing");
 sub pr_order {
     my $t     = shift;
     my $nrepl = shift;
-    printf(NDX "%-20g",$t);
+    printf(NDX "%-20.2f",$t);
     for(my $k=0; ($k<$nrepl); $k++) {
        my $oo = shift;
        printf(NDX "  %3d",$oo);
@@ -41,7 +41,7 @@ sub pr_order {
 sub pr_revorder {
     my $t     = shift;
     my $nrepl = shift;
-    printf(TEMP "%-20g",$t);
+    printf(TEMP "%-20.2f",$t);
     for(my $k=0; ($k<$nrepl); $k++) {
        my $oo = shift;
        printf(TEMP "  %3d",$oo);