# | Line 52 | Line 52 | while ($#ARGV >= 0) { | |
---|---|---|
52 | $cmd .= q{| rcalc -if -of -e 'cond=9e9-$1;$1=$1' | total -if -u}; | |
53 | my $dmax=`$cmd`; | |
54 | $dmax = 2**(int(log($dmax)/log(2))+1); | |
55 | < | my $unit=`getinfo < '$ARGV[0]' | sed -n 's/^REFDEPTH= *[0-9.]*[^0-9.]//p'`; |
55 | > | my $unit=`getinfo < '$ARGV[0]' | sed -n 's/^REFDEPTH= *[0-9.]*[^a-zA-Z]*//p'`; |
56 | chomp $unit; | |
57 | $unit="Depth" if ( ! $unit ); | |
58 | $cmd = "rcode_depth -r -ff '$ARGV[0]' | pvalue -r -df -b "; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |