| # | Line 65 | Line 65 | if ($#argv < 2) then | |
|---|---|---|
| 65 | exit 1 | |
| 66 | endif | |
| 67 | # Get shrunken image luminances | |
| 68 | < | set vald=/tmp/val$$ |
| 69 | < | mkdir $vald |
| 68 | > | set vald=`mktemp -d /tmp/val.XXXXXX` |
| 69 | foreach inp ($argv:q) | |
| 70 | set datf="$inp:t" | |
| 71 | set datf="$vald/$datf:r.dat" | |
| # | Line 95 | Line 94 | foreach inp ($argv:q) | |
| 94 | set datf="$vald/$datf:r.dat" | |
| 95 | set outp="$inp:t" | |
| 96 | set outp="$outdir$outp:r.tif" | |
| 98 | – | endif |
| 97 | histo $Lmin $Lmax $histosiz < $datf > $vald/newhisto.dat | |
| 98 | if (-f $vald/oldhisto.dat) then | |
| 99 | rlam $vald/newhisto.dat $vald/oldhisto.dat \ | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |