| 60 |
|
$cmd .= "| falsecolor -l '$unit' -m 1 -s $dmax | ra_bmp - '$dest'"; |
| 61 |
|
} elsif ("$format" =~ /^[1-9][0-9]*-bit_indexed_name *$/) { |
| 62 |
|
$cmd = "rcode_ident -r -n '$ARGV[0]' " . |
| 63 |
< |
"| getinfo +d -c rcalc -e 'cc(x):(.1+.8*rand(x))^2' " . |
| 63 |
> |
"| getinfo +d -c rcalc -of -e 'cc(x):(.1+.8*rand(x))^2' " . |
| 64 |
|
q{-e '$1=cc(.398*$1-11.2);$2=cc(-1.152*$1+41.7);$3=cc(8.571*$1-8.15)' } . |
| 65 |
< |
"| pvalue -r -d "; |
| 65 |
> |
"| pvalue -r -df "; |
| 66 |
|
$cmd .= "| $pfilt " if ($pfilt); |
| 67 |
|
$cmd .= "| ra_bmp - '$dest'"; |
| 68 |
|
} elsif ("$format" =~ /^32-bit_encoded_normal *$/) { |
