| # | Line 30 | Line 30 | set tp8=`mktemp /tmp/vlr8pic.XXXXXX` | |
|---|---|---|
| 30 | set tf=($tc $tp1 $tp2 $tp4 $tp8) | |
| 31 | set inpic=$argv[1] | |
| 32 | onintr quit | |
| 33 | < | set pr=(`getinfo -d < $inpic | sed 's/^-Y \([1-9][0-9]*\) +X \([1-9][0-9]*\)$/\2 \1/'`) |
| 33 | > | set pr=`getinfo -d < $inpic` |
| 34 | > | set pr=($pr[4] $pr[2]) |
| 35 | # ( vwright V < $inpic ; cat ) > $tc << _EOF_ | |
| 36 | cat > $tc << _EOF_ | |
| 37 | { A : 3438 * sqrt(Vhn/xmax*Vvn/ymax); { pixel size (in minutes) } } | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |