| 5 |
|
set Ldmax=100 # maximum display luminance |
| 6 |
|
set nsteps=100 # number of steps in perceptual histogram |
| 7 |
|
set cvratio=0.05 # fraction of pixels to ignore in envelope clipping |
| 8 |
< |
set td=/usr/tmp |
| 8 |
> |
set td=/tmp |
| 9 |
|
set tf0=$td/tf$$ |
| 10 |
|
set tf1=$td/hist$$ |
| 11 |
|
set tf1b=$td/hist$$.diff |
| 18 |
|
shift argv |
| 19 |
|
endif |
| 20 |
|
if ( $#argv != 1 ) then |
| 21 |
< |
echo "Usage: $0 [-a] input.pic > output.pic" |
| 21 |
> |
echo "Usage: $0 [-a] input.hdr > output.hdr" |
| 22 |
|
exit 1 |
| 23 |
|
endif |
| 24 |
|
set ifile=$1 |
| 25 |
|
set ibase=$ifile:t |
| 26 |
< |
if ( "$ibase" =~ *.pic ) set ibase=$ibase:r |
| 26 |
> |
if ( "$ibase" =~ *.hdr ) set ibase=$ibase:r |
| 27 |
|
set ibase=$ibase:t |
| 28 |
|
onintr quit |
| 29 |
|
pextrem -o $ifile > $tf0 |
