ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/Development/ray/src/util/genBSDF.pl
(Generate patch)

Comparing ray/src/util/genBSDF.pl (file contents):
Revision 2.40 by greg, Sat Oct 13 20:15:43 2012 UTC vs.
Revision 2.43 by greg, Mon Aug 5 22:56:50 2013 UTC

# Line 24 | Line 24 | my $nproc = 1;
24   my $doforw = 0;
25   my $doback = 1;
26   my $pctcull = 90;
27 < my $gunit = "Meter";
27 > my $gunit = "meter";
28   my @dim;
29   # Get options
30   while ($#ARGV >= 0) {
# Line 129 | Line 129 | if ( $geout ) {
129          while (<MGFSCN>) { print $_; }
130          close MGFSCN;
131          print "xf\n";
132 <        print "\t\t</MGFblock>\n";
132 >        print "</MGFblock>\n";
133          print "\t</Geometry>\n";
134   }
135   # Set up surface sampling
# Line 277 | Line 277 | $cmd = "rcalc -if3 -e 'Omega:PI/($ns*$ns)' " .
277          q{-e '$1=(0.265*$1+0.670*$2+0.065*$3)/Omega' };
278   if ($pctcull >= 0) {
279          $cmd .= "-of $td/" . ($bmodnm,$fmodnm)[$forw] . ".flt " .
280 <        "| rttree_reduce -a -h -ff -t $pctcull -r $tensortree -g $ttlog2";
280 >        "| rttree_reduce -h -ff -t $pctcull -r $tensortree -g $ttlog2";
281          system "$cmd" || die "Failure running rttree_reduce";
282   } else {
283          $cmd .= "$td/" . ($bmodnm,$fmodnm)[$forw] . ".flt";

Diff Legend

– Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)