| # | Line 1 | Line 1 | |
|---|---|---|
| 1 | #!/bin/csh -f | |
| 2 | < | # SCCSid "$SunId$ LBL" |
| 2 | > | # RCSid: $Id$ |
| 3 | # | |
| 4 | < | # Do depth-of-field blurring on picture |
| 4 | > | # Generate views for depth-of-field blurring on picture |
| 5 | # | |
| 6 | if ($#argv != 4) then | |
| 7 | echo "Usage: $0 aperture distance nsamp viewfile" >/dev/tty | |
| # | Line 11 | Line 11 | set a = "$1" | |
| 11 | set d = "$2" | |
| 12 | set n = "$3" | |
| 13 | set vf = "$4" | |
| 14 | – | set piopt = ($argv[6-]:q) |
| 14 | cnt $n | rcalc -e `vwright i < $vf` \ | |
| 15 | -e "M:$n/5+1;a:$a/2;d:$d;N:$n;" -e 'tmax:PI*a*(M+1)' \ | |
| 16 | -e 't=tmax/N*($1+rand($1))' \ | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines (old) |
| > | Changed lines (new) |