| # | Line 15 | Line 15 | set extrem=`pextrem -o $inp:q | rcalc -e "vmin:$vmin" | |
|---|---|---|
| 15 | set nseg=`ev "ceil(log10($extrem[2]/$extrem[1])/$sigma)"` | |
| 16 | if ( $nseg > 20 ) set nseg=20 | |
| 17 | onintr done | |
| 18 | < | set tdir=/tmp/blf$$ |
| 19 | < | mkdir $tdir |
| 18 | > | set tdir=`mktemp -d /tmp/blf.XXXXXX` |
| 19 | set gfunc="sq(x):x*x;gfunc(x):if(sq(x)-sq($sigma),0,sq(1-sq(x/$sigma)))" | |
| 20 | set i=0 | |
| 21 | set imglist=() | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |