Add initial support for python bindings
[alexxy/gromacs.git] / scripts / demux.pl
index e804f925fbade42e5aaf7681a7bb5de798de859d..f8e2f558ff8c63b1b4ba3cb47ad6ef501dd9bdda 100755 (executable)
@@ -1,5 +1,4 @@
 #!/usr/bin/perl -w
-# $Id$
 
 # in: input filename
 $in = shift || die("Please specify input filename");
@@ -31,7 +30,7 @@ open (TEMP,">$temp") || die("Opening $temp for writing");
 sub pr_order {
     my $t     = shift;
     my $nrepl = shift;
-    printf(NDX "%-8g",$t);
+    printf(NDX "%-20g",$t);
     for(my $k=0; ($k<$nrepl); $k++) {
        my $oo = shift;
        printf(NDX "  %3d",$oo);
@@ -42,7 +41,7 @@ sub pr_order {
 sub pr_revorder {
     my $t     = shift;
     my $nrepl = shift;
-    printf(TEMP "%-8g",$t);
+    printf(TEMP "%-20g",$t);
     for(my $k=0; ($k<$nrepl); $k++) {
        my $oo = shift;
        printf(TEMP "  %3d",$oo);